title image


Smiley Re: How aus einem Verzeichniss Dateien auslesen und in ein Form einlesen?
Hallo You,Schaltflächencode zum anpassen:Private Sub Befehl4_Click()Dim rs As Recordset 'Bei Access2000: Dim rs As DAO.RecordsetSet rs = Me.RecordsetCloners.MoveFirstDo While Not rs.EOFrs.EditIf Dir("C:\Bilder\" & rs!ArtikelNr & "*") "" Thenrs!Bildurl = "Bilder/" & Dir("C:\Bilder\" & rs!ArtikelNr & "*")Elsers!Bildurl = "Bilder/Dummy.gif"End Ifrs.Updaters.MoveNextLoopSet rs = NothingEnd SubGrußWalter

geschrieben von

Login

E-Mail:
  

Passwort:
  

Beitrag anfügen

Symbol:
 
 
 
 
 
 
 
 
 
 
 
 
 

Überschrift: