strFileToCopy = "c:\scripts\test.txt"
strFolder = "c:\scripts\temp\"

Const OverwriteExisting = TRUESet objFSO =
CreateObject("Scripting.FileSystemObject")

 If objFSO.FolderExists(strFolder) Then
  objFSO.CopyFile strFileToCopy, strFolder, OverwriteExisting  Else
  Wscript.Echo "Target Folder does not exist."End If



*-Thanks & Regards,*

*RAJ KAMAL*
*
*

-- 
You received this message because you are subscribed to the Google
"QTP - HP Quick Test Professional - Automated Software Testing"
group.
To post to this group, send email to [email protected]
To unsubscribe from this group, send email to
[email protected]
For more options, visit this group at
http://groups.google.com/group/MercuryQTP?hl=en

Reply via email to