you can also use the script of markdmac with DateStringToDate function :
Dim objFSO, objFile
Set objFSO = CreateObject("scripting.filesystemobject")
Set objFile = objFSO.GetFile("D:\IIS\consultime_vbs\cvVerif.wsf")
WScript.Echo DateStringToDate(objFile.DateLastModified, "dmy") & vbcrlf &...
Hi,
Here's my version:
ScreenVar = ""
if filesystem.folderexists("C:\TEMP5") then
files = filesystem.getfolder("C:\TEMP5").files
if files.count > 0 then
ScreenVar = files(0).name
end if
end if
if ScreenVar = "" then
ScreenVar = "default value"
end if
This site uses cookies to help personalise content, tailor your experience and to keep you logged in if you register.
By continuing to use this site, you are consenting to our use of cookies.