VBA i access 97 hurtigt svar ønskes
jeg har et script :Function kopier_billeder()
Dim db As Database
Dim rs As DAO.Recordset
Dim StartFolder As String
StartFolder = "d:\billeder\"
Set db = CurrentDb
Set rs = db.OpenRecordset("test", dbOpenSnapshot)
rs.MoveFirst
Do Until rs.EOF
FileCopy StartFolder & rs![Navn], rs![sti] & rs![Navn]
rs.MoveNext
Loop
rs.Close
Set rs = Nothing
db.Close
MsgBox "Data er nu kopieret"
End Function
Jeg får dog en fejl i linien :
FileCopy StartFolder & rs![Navn], rs![sti] & rs![Navn]
hvor den skriver "path not found"
rs![sti] = d:\billeder_1\siemens\
hvad gør jeg forkert idet folderen findes ???
