something wrong here in open file function

[Pouncer]

in a module i have this:

Public Function File_Exists(strFilePath As String)
    If Dir(strFilePath, vbNormal + vbHidden + vbSystem + vbReadOnly) = "" Then
        File_Exists = False
    Else
        File_Exists = True
    End If
End Function
 
Public Function ShellOpenFile(filepath As String)
    If (File_Exists(filepath)) Then
        Shell "notepad filepath", vbNormalFocus
    Else
        MsgBox "No such file: " & filepath
    End If
End Function

in my form1, i have this..

Private Sub Command2_Click()
    ShellOpenFile ("C:\test.txt")
End Sub

but it keeps saying that 'filename.txt' doesnt exist

[high6]

Public Function File_Exists(strFilePath As String)
    If Dir(strFilePath, vbNormal + vbHidden + vbSystem + vbReadOnly) = "" Then
        File_Exists = False
    Else
        File_Exists = True
    End If
End Function
 
Public Function ShellOpenFile(filepath As String)
    If (File_Exists(filepath)) = true Then
        Shell filepath , vbNormalFocus
    Else
        MsgBox "No such file: " & filepath
    End If
End Function

Private Sub Command2_Click()
    ShellOpenFile ("C:\test.txt")
End Sub

now try it

[Pouncer]

that gives me:

invalid procedure call or argument on

line

Shell filepath, vbNormalFocus

[si_the_geek]

The problem is in this line: Shell "notepad filepath", vbNormalFocus

The problem is that filepath is inside the quotes, so you are passing the text filepath rather than the contents of it (C:\test.txt). What you should use instead is:

Shell "notepad " & filepath, vbNormalFocus

[longwolf]

I could be wrong, but shouldn't:

If Dir(strFilePath, vbNormal + vbHidden + vbSystem + vbReadOnly) = "" Then

be

If Dir(strFilePath, vbNormal Or vbHidden Or vbSystem Or vbReadOnly) = "" Then

[pnish]

I could be wrong, but shouldn't:

If Dir(strFilePath, vbNormal + vbHidden + vbSystem + vbReadOnly) = "" Then

be

If Dir(strFilePath, vbNormal Or vbHidden Or vbSystem Or vbReadOnly) = "" Then

In this case Or and + are synonomous. eg 1 Or 2 = 3, as does 1 + 2. Try it.

[longwolf]

In this case Or and + are synonomous. eg 1 Or 2 = 3, as does 1 + 2. Try it.

humm, your right
They both came up with 7