我在菜单栏增加一个功能“显示”,点击后希望获得所选文件(在ListView1内)的完整路径。
如何能得到?请指点。
谢谢!

解决方案 »

  1.   

    VBExplorer(或EnumDeskVB)
    可能用过,是什么呀????
    解释一下,帮助回忆!!!!
      

  2.   

    把这部分代码倒回来:VBExplorer:Private Sub Dir1_Change()
    On Error GoTo errHandler
    Dim Buffer As String
    Dim rtn
    Dim DirPath
    Dim fExt As String
    ListView2.Visible = False
    ListView1.Visible = True
    mnuSortAZ_Click
    Buffer = Space(MAX_PATH)
    rtn = GetWindowsDirectory(Buffer, Len(Buffer))
    WinPath = Left(Buffer, rtn)
    On Error Resume Next
    DelTree32 WinPath & "\Temp\Temp1"
    MkDir WinPath & "\Temp\Temp1"
    cmdUndoDelete.Enabled = False
    cmdUndoRename.Enabled = False
    On Error GoTo errHandler
    fPath = Dir1.path & "\"
    Dir1.path = fPath
    Call vbGetFileList
    Exit Sub
    errHandler:
    DirPath = DriveLetter & fExt
    fPath$ = DirPath
    If fPath$ > "" Then vbGetFileList
    Dir1.path = fPath
    Call vbGetFileList
    End Sub
      

  3.   

    多谢两位!VBExplorer(或EnumDeskVB)是用VB写的资源管理器
    http://www.mvps.org/btmtz/vbexplorer/小弟只是初学VB,楼上给的代码我不知如何运用
    我是希望能获得所选文件的绝对路径(如:d:\aaa\bbb\file.txt)
    这样就可以对文件进行其他操作
      

  4.   

    API版的bbe大侠给出了答案,有兴趣可到API版看看