copy/rename

  • Thread starter Thread starter Guest
  • Start date Start date
G

Guest

I need to copy a file c:\reports\datafile\1st471.ltr and rename it c:\reports\datafile\letter1.dbf. I need to link to letter1.dbf. I tried creating a function with the following

Function MakeDBF(
FileSystemObject.Copyfile "c:\reports\datafile\1st471.ltr", "c:\reports\datafile\letter1.dbf", tru
End Functio

I receive a 427 Runtime error
 
You do not need the FileSystemObject to copy a file; there is a built-in VBA
statement that you can use:

FileCopy "c:\reports\datafile\1st471.ltr", "c:\reports\datafile\letter1.dbf"



hth,
--

Cheryl Fischer, MVP Microsoft Access
Law/Sys Associates, Houston, TX


Rosie said:
I need to copy a file c:\reports\datafile\1st471.ltr and rename it
Click to expand...
c:\reports\datafile\letter1.dbf. I need to link to letter1.dbf. I tried
creating a function with the following:
Function MakeDBF()
FileSystemObject.Copyfile "c:\reports\datafile\1st471.ltr",
Click to expand...
"c:\reports\datafile\letter1.dbf", true
 
Private Sub Command10_Click()
FileCopy "sourcefile", "destinationfile"
End Sub

or if the file is in use try

Private Sub Command10_Click()
Dim fso As Object
Dim boverwrite As Boolean

Set fso = CreateObject("Scripting.fileSystemObject")
fso.copyfile "sourcefile", "sourcefile"

Set fso = Nothing

End Sub

Jim
-----Original Message-----
I need to copy a file c:\reports\datafile\1st471.ltr and
Click to expand...
rename it c:\reports\datafile\letter1.dbf. I need to link
to letter1.dbf. I tried creating a function with the following:
Function MakeDBF()
FileSystemObject.Copyfile
Click to expand...
"c:\reports\datafile\1st471.ltr",
"c:\reports\datafile\letter1.dbf", true
 
Sorry the fso.copyfile should be
fso.copyfile "sourcefile", "destinationfile"

I like this because I can copy open databases

Jim
 
Just because you can copy open databases doesn't mean you should!

It's entirely possible that your copied database will be inconsistent if it
was open when you copied it, so you really shouldn't rely on it for any
purpose.
 
Back
Top