使用VBS通过3种方式浏览本地文件，获取完整路径。

XP下：

Function BrowseForFile( )
' Select File dialog based on a script by Mayayana
' Known issues:
' * Tree view always opens Desktop folder
' * In Win7/IE8 only the file NAME is returned correctly, the path returned will always be C:\fakepath\
' * If a shortcut to a file is selected, the name of that FILE will be returned, not the shortcut's
    On Error Resume Next 
 '===========1, file browserer in XP ==================
 Set objDialog = CreateObject("UserAccounts.CommonDialog")
 objDialog.Filter = "txt|*.txt"
 objDialog.InitialDir = "C:\"
 intResult = objDialog.ShowOpen
 If intResult <> 0 Then
  BrowseForFile = objDialog.FileName
  exit function
 else
  msgb