- Katılım
- 27 Ağustos 2006
- Mesajlar
- 69
Access 2007 ile klasör kopyalamak için epey uğraştım. İnternette Aşağıdaki kodlara benzer bir çok kod var.
-------------------------------
Dim fso As Scripting.FileSystemObject
Dim sSourceDir As String, sDestinationDir As String
Set fso = New Scripting.FileSystemObject
sSourceDir = "C:\A\*.*"
sDestinationDir = "C:\B" 'No ending back slash for the final directory!
fso.CopyFile sSourceDir, sDestinationDir, True
------------------------------------------------------
Ama bu tür kodlar, "User-defined type not defined" hatası veriyor. Hatayı gidermek için Visual Basic Kod Penceresinde
Tools>References ten "Microsoft Scripting Runtime"'i işaretlemek gerekiyor.
Saygılar.
-------------------------------
Dim fso As Scripting.FileSystemObject
Dim sSourceDir As String, sDestinationDir As String
Set fso = New Scripting.FileSystemObject
sSourceDir = "C:\A\*.*"
sDestinationDir = "C:\B" 'No ending back slash for the final directory!
fso.CopyFile sSourceDir, sDestinationDir, True
------------------------------------------------------
Ama bu tür kodlar, "User-defined type not defined" hatası veriyor. Hatayı gidermek için Visual Basic Kod Penceresinde
Tools>References ten "Microsoft Scripting Runtime"'i işaretlemek gerekiyor.
Saygılar.