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.
Function Main()
Dim objFSO
Dim cFilePath
Dim cFileName
cFilePath = "<file path>"
cFileName = "<file name>"
' instantiate the Scripting Object
set objFSO = CreateObject("Scripting.FileSystemObject")
With objFSO
If .FileExists(cFilePath & cFileName) Then
' set on Global Variable that file exists..
End if
End With
Set objFSO = Nothing
Main = DTSTaskExecResult_Success
End Function