Problems trying to copy files and such

[HeSaidJoe]

'copy or save a file to a different directory
'provided text1 = a valid dir path
'and text 2 a valid file path
'If not errors will occur and you will have to trap them


Private Sub Command1_Click()

Dim SourcePath As String, DestPath As String
SourcePath = text1.text & "\" & text2.text

'where you are copying the file to
DestPath = "c:\download\whodoneit.txt"


FileCopy SourcePath, DestPath

End Sub