Visual Basic 2010의 네트워크 드라이브

Question

네트워크 드라이브를 매핑하고 연결을 끊은 다음 네트워크 드라이버를 다시 매핑하는 방법에 대한 Visual Basic 2010 코드를 얻으려고 몇 달을 보냈습니다.

프로필 폴더에 다음과 같이 매핑 할 수 있어야합니다. 전체 경로; "\ 10.10.10.12 \ 프로필 폴더". 내가 매핑이 메시지와 함께 성공하면 다음 확인 를 네트워크 폴더 /user:Domainname\UserName Password에 액세스 할 수 있도록 로그인해야합니다.

매핑 후 나는 프로파일 이름을 요청합니다 해당 프로필 폴더가 네트워크에 있는지 확인하십시오. 프로필이 존재하는 경우 프로필이 있음을 알리는 메시지를 반환하고 읽기 전용 인 경우 같은 폴더 속성을 덮어 쓰는 메시지를 반환하십시오.

다른 작업이 있지만 막 다른 골목에 닿은 곳입니다.

Answer 1

이 질문은 오래되었지만 OP가 찾을 때까지. 나는 잠시 후 네트워크 주소를 가상 드라이브에 매핑하기 위해 HTA 페이지를 작성했다. 코드는 VBScript이므로 VB.net의 기본 요소가 아닌 WScript 라이브러리를 사용합니다. 자세한 내용은 WScript in VB.Net on StackOverflow을 참조하십시오.

커넥트 스크립트 :

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 

개인적으로, 내가 발견하지 않은 코드는 닷넷에서 같은 일을합니다. 위에 표시된 VBScript는 매우 원시적입니다. WScript를 바인딩하는 것에 대한 정보에 아이디어 나 두 가지를 제공하기를 바랍니다.

편집 : Eric Dalnas' code, here