Automation Testing
Quick Test Professional.
Thursday, January 14, 2010
Write a program to compare 2 folder
Dim fso, fsofol, filespec, fsoNfol, fsoDfol
filespec = "C:\Test\"
Set fso = CreateObject("Scripting.FileSystemObject")
Set fsofol = fso.GetFolder(filespec)
If (fsofol.IsRootFolder = False) Then
MsgBox "Folder Exists"
End If
No comments:
Post a Comment
Newer Post
Older Post
Home
Subscribe to:
Post Comments (Atom)
No comments:
Post a Comment