none
"如果想把一个文件夹(例如 D:\ABC)影射成盘符(例如 W:),有什么有效的VB命令吗?"如果想把一个文件夹(例如 D:\ABC)影射成盘符(例如 W:),有什么有效的VB命令吗? RRS feed

  • 问题

  • "如果想把一个文件夹(例如 D:\ABC)影射成盘符(例如 W:),有什么有效的VB命令吗?
     

     

    2007年8月2日 7:13

答案

  • 在vb6 中映射local folder to drive可以使用以下两种方式:、

    1.
    Dim WshNetwork
    Set WshNetwork = CreateObject("WScript.Network")

    WshNetwork.MapNetworkDrive "w:", "\\127.0.0.1\d$\abc"
    MsgBox "Drives has been map successful"

    Set WshNetwork = Nothing

    2.
    Dim strLocalDriveLetter As String

    Dim strPassword As String

    Dim strNetworkPathName As String

    strLocalDriveLetter = "w:" 'Local drive letter to be mapped

    strPassword = "" 'specify network password if required

    strNetworkPathName = "\\127.0.0.1\d$\abc" 'path to network drive

    If WNetAddConnection(strNetworkPathName, vbNullString, strLocalDriveLetter) > 0 Then

    MsgBox ("An Error occurred mapping the drive")

    Else

    MsgBox ("Drive successfully mapped!")

    End If

    2007年8月2日 8:19