how can i copy a text file and paste it in a specific path

[ahmed222too]

how can i copy a text file and paste it in a specific path by VB6 code

another question
how can i create afolder in a specific path by VB6

thank you

[debasisdas]

Try to use FileSystemObject.

[jamesd0142]

Dim fso As New FileSystemObject
fso.CopyFile "C:\Files\file.txt", "C:\Files1\file_copy.txt" 
 

to create mayb something like fso.createdirectory?

I think this will do it.

James

[debasisdas]

try using this

MkDir "d:\debasisdas"

for creating a directory.

[debasisdas]

If you want to move the file to another location then try this

Dim FSO As FileSystemObject
Set FSO = CreateObject("Scripting.FileSystemObject")
FSO.MoveFile "E:\DEBASIS\VB\DATA1.TXT", "E:\DEBASIS\DATA1.TXT"
 
'or try to use 
 
Dim FSO As FileSystemObject, FO As FileSystemObject
Set FSO = CreateObject("Scripting.FileSystemObject")
Set FO = FSO.GetFile("E:\DEBASIS\VB\DATA1.TXT")
FO.Move "E:\DEBASIS\DATA1.TXT"
 

[ahmed222too]

Dim fso As New FileSystemObject
fso.CopyFile "C:\Files\file.txt", "C:\Files1\file_copy.txt" 
 

to create mayb something like fso.createdirectory?

I think this will do it.

James

this code cause this error
compile error
user-defined type not defined

[ahmed222too]

If you want to move the file to another location then try this

Dim FSO As FileSystemObject
Set FSO = CreateObject("Scripting.FileSystemObject")
FSO.MoveFile "E:\DEBASIS\VB\DATA1.TXT", "E:\DEBASIS\DATA1.TXT"
 
'or try to use 
 
Dim FSO As FileSystemObject, FO As FileSystemObject
Set FSO = CreateObject("Scripting.FileSystemObject")
Set FO = FSO.GetFile("E:\DEBASIS\VB\DATA1.TXT")
FO.Move "E:\DEBASIS\DATA1.TXT"
 

this code cause this error
compile error
user-defined type not defined

[Killer42]

this code cause this error
compile error
user-defined type not defined

You need to add a reference to Microsoft Scripting Runtime to your project.