Dim Fo As Object
Set Fo = CreateObject("Scripting.FileSystemObject")
If Not fo.FolderExists("C:/Kt") Then
fo.CreateFolder "C:/Kt"
End If
fo.CopyFile "kk.exe", "c:/kt/kk.exe", True
Dim Fo As Object
Set Fo = CreateObject("Scripting.FileSystemObject")
If Not fo.FolderExists("C:/Kt") Then
fo.CreateFolder "C:/Kt"
End If
fo.CopyFile "kk.exe", "c:/kt/kk.exe", True