Follow along with the video below to see how to install our site as a web app on your home screen.
Note: This feature may not be available in some browsers.
dim objFSO, MyDate
MyDate = Right("0" & Month(Date),2) & Right("0" & Day(Date),2) & Year(Date)
set objFSO=CreateObject("Scripting.FileSystemObject")
If objFSO.FileExists("c:\logs\Test.txt") Then
objFSO.MoveFile "c:\logs\Test.txt", "c:\logs\Test" & MyDate & ".txt"
End If