File Path VisualBasic Script

Sub ReadPersistedRecordset()
    Dim strFileName As String
    strFileName = "c:\test.txt"
    If Len(Dir(strFileName)) = 0 Then
        msgBox "File Not Found"
        Exit Sub
    End If
End Sub