1

ネットワーク ドライブをマップし、それらを切断し、ネットワーク ドライバーを再マップする方法に関する Visual Basic 2010 コードを取得するのに何ヶ月も費やしました。

次のようなプロファイル フォルダーにマップできるようにする必要があります。「\10.10.10.12\Profile フォルダー」。ネットワーク フォルダーにアクセスするにはログインする必要があります。/user:Domainname\UserName Password次に、メッセージでマッピングが成功したかどうかを確認します。

マッピング後、プロファイル名を要求し、そのようなプロファイル フォルダがネットワーク上に存在するかどうかを確認します。存在する場合は、プロファイルが存在することを示すメッセージを返し、プロファイル フォルダーを削除して、読み取り専用などのフォルダー プロパティを上書きします。

他のタスクがありますが、彼は私が行き止まりになっているところです。

4

1 に答える 1

1

この質問は古いですが、OPがまだ探している可能性があります。しばらく前に、ネットワーク アドレスを仮想ドライブにマップするために HTA ページを書きました。コードは VBScript であるため、VB.net のネイティブ部分ではない WScript ライブラリを使用します。詳細については、StackOverflow の VB.Net の WScript を参照してください。

接続スクリプト:

SUB doLogOn()
Dim objNetwork, errNum, ojbFSO, strDrive, iNum
Set objFSO = CreateObject("Scripting.FileSystemObject")
If objFSO.FolderExists("\\MyServer\MyFolder\") = False Then
   strDrive = "J:"
   Set objNetwork = CreateObject("WScript.Network")
   On Error Resume Next
   objNetwork.MapNetworkDrive strDrive, "\\MyServer\MyFolder", False, "username", "password"
   If Err.Number <> 0 Then
          Err.Clear
   End If
   Set objFSO = Nothing
   Set objNetwork = Nothing
End If
END SUB

個人的には、.Net で同じことを行うコードを見つけられませんでした。上記の VBScript はかなり原始的なものです。ただし、WScript のバインドに関する情報に加えて、1 つまたは 2 つのアイデアが得られることを願っています。

編集:ここで、Eric Dalnas のコードを参照してください。

于 2013-02-22T00:06:47.223 に答える