怎么判断变量文件名的文件是否存在

如何判断变量文件名的文件是否存在
如何判断media.txt内列表的文件是否存在,怎么判断都提示不存在，但如果把变量改成文件名就提示存在
media.txt内容如下,
ASDFG.MP3
ADDFG.MP3
ASFFG.MP3
ASHFG.MP3

代码如下：

Private Declare Function PathFileExists Lib "shlwapi.dll" Alias "PathFileExistsA" (ByVal pszPath As String) As Long

Private Sub Command1_Click()


   Dim i As Integer, M As String, FullFileName As String, sz As String
i = FreeFile
Open "d:\ftp-media\work\cfg\media.txt" For Input As #i                                  
    Do While Not EOF(i)
        Line Input #i, M
    
        If PathFileExists("D:\ftp-media\work\media\" & M & "") = "1" Then
     MsgBox "存在"
Else
     MsgBox "不存在"
End If
         
    Loop
Close #i
End Sub
------解决思路----------------------
你用记事本打开media.txt，然后另存为，对话框下面的当前编码是不是 Unicode？
VB6只支持 ANSI 编码。