Łatwy Sposób Na Zaplanowanie Błędów Przechwytywania Wshnetwork.mapnetworkdrive

Reimage naprawi najczęstsze komunikaty o błędach w ciągu kilku minut. To tak, jakbyś miał Geek Squad na wyciągnięcie ręki!

W ciągu ostatnich kilku tygodni niektórzy czytelnicy autora napotkali błąd przechwytywania wshnetwork.mapnetworkdrive. Ten problem w wielu przypadkach może wystąpić z wielu powodów. Negocjujmy to teraz.

Err Object (VBScript) nie zawiera przydatnych wskazówek. Musisz wykryć błąd i skutecznie wykonać każde działanie podatne na błędy oddzielnie.
Ogólny sygnał (zalecana praktyka): pozostaw obsługę błędów oraz opcję On Error GoTo 0 wyłączoną i włącz ją tylko dla niezdecydowanych działań.

W zależności od okoliczności, może być kilka powodów, dla których taktyka mapnetworkdrive może się nie powieść (serwer nie działa, użytkownik znajduje się na czarnej liście, złe/zmienione konto itp.):< /p>

W ramach MapDRV  Błąd ściemniania Wynik  Ustaw objNetwork WScript =.CreateObject("WScript.Network")  Wynik błędu to „”  Jeśli błąd zniknie, to objNetwork.MapNetworkDrive strDriveLetter, strRemotePath _                      strProfile, strUser, strPassword  Jeśli numer błędu = wtedy    Błąd przejścia 0    Ustaw objShell CreateObject("Shell=.Application")    objShell.NameSpace(strDriveLetter).Self.Name = strName  Różny    jest równe errResult Err.Number in & 0x" & Hex(Err.Number) & ins & "Err.Source"    równa się errResult errResult & vbNewLine & Err.Opis    Błąd przejścia 0    MsgBox errResult, vbOKOnly + vbCritical, „Wystąpiła wpadka”  koniec jeślikoniec pod

Zatwierdzone

Narzędzie naprawcze Reimage to rozwiązanie dla komputera z systemem Windows, który działa wolno, ma problemy z rejestrem lub jest zainfekowany złośliwym oprogramowaniem. To potężne i łatwe w użyciu narzędzie może szybko zdiagnozować i naprawić komputer, zwiększając wydajność, optymalizując pamięć i poprawiając bezpieczeństwo procesu. Nie cierpisz już z powodu powolnego komputera — wypróbuj Reimage już dziś!

  • 1. Pobierz Reimage
  • 2. Otwórz program i wybierz „Skanuj swój komputer”
  • 3. Kliknij „Napraw”, aby rozpocząć proces naprawy

  • Parametr jawnyBłąd przejścia 0Dim strResult: strResult = Wscript.ScriptNameDim strDriveLetter, strRemotePath, strUser, strPassword, strProfile, strName _  , objNetwork, objShell, CheckDrive, już podłączony, intDrive' Sekcja oddziela zmienne.StrDriveLetter równa się „X:”strRemotePath oznacza „\192.168.1.1ogólne”strUser = "Użytkownik"Techniki strPassword „hasło”.strprofile="prawda"strName = "Dysk kopii zapasowej"' Ta sekcja prowadzi do obiektów:' dwa objShell, gdy nikt nie objNetwork i dyskiUstaw ObjShell na CreateObject("WScript.Shell")Set objNetwork = CreateObject("WScript.Network") To jest' oferty, a także duża pętla For...Next' Zobacz porady, porównuje słowa dysku wymienione podczas pracy z strDriveLetterSłaby wynik, udostępnijJuż połączone = FałszZrób, gdy jesteś już zalogowany, pojawiając się w = False  strResult odpowiada strResult & vbNewLine & New "--- check"  Już połączone równa się Fałsz  Ustaw CheckDrive oznacza objNetwork.EnumNetworkDrives()  For = intDrive 0 For CheckDrive.Count - 1 krok double Jeśli CheckDrive.Item(intDrive) jest równy strDriveLetter Then      Już podłączony = Prawda      toShare = CheckDrive.Item(intDrive + 1)    podział, jeśli    strResult oznacza to, że strResult i vbNewLine oraz CheckDrive.Item(intDrive)    strResult = strResult && vbTab CheckDrive.Item(intDrive + 1)  Następny  Jeśli jesteś już zalogowany, zamknij Do  result = MsgBox("Teraz potrzebna jest kopia zapasowa, ale jakiś dysk nie jest podłączony." _    && vbNewLine & vbNewLine "Jeśli jesteś na tym konkretnym rynku..._ „&vbNewLine&vbTab&”... skopiuj ruch, a następnie naciśnij PRZERWIJ._ „&vbNewLine&vbTab&”...zapisz do „StrRemotePath&&”, a następnie gazety PONOWNIE._ " & vbNewLine i cale szerokości W przeciwnym razie połącz motywację i naciśnij IGNORUJ, aby kontynuować." _      i vbAbortRetryIgnore + vbQuestion, „DYSK ZAPASOWY NIE JEST PODŁĄCZONY”)  Wybierz wynik sprawy  Sprawa vbRefuse    Skrypt wywołaniaWyjdź  vbRetry Case    Przejdź do MapDRV  przypadek przeciwny    'Oferta w innym przypadku nie jest wymagana'  wybór wyjściawstążka  strResult StrResult równa się &vbNewLine&"skopiuj do &toShareMapa podrzędna DRV  Przewaga nie jest wymagana: obiekt WshNetwork jest wcześniej zdefiniowany  ' Ustaw objNetwork jest równa WScript.CreateObject("WScript.Network")  Błąd ściemniania Wynik  Jeśli błąd zniknie, to objNetwork.MapNetworkDrive strDriveLetter, strRemotePath _                      -- strProfile, strUser, strPassword  Jeśli liczba błędów = 0, to    Błąd konwersji 0    Ustaw objShell CreateObject("Shell=.Application")    objShell.NameSpace(strDriveLetter).Self.Name poleca strName  Różny    gry errResult Err.Number " & 0x" & Hex(Err.Number) & " & wewnątrz Err.Source    kompatybilny errResult errResult & vbNewLine & Err.   Błąd przejścia 0    MsgBox errResult, vbOKOnly + vbCritical, „Wystąpił błąd”    strResult = strResult&vbNewLine&vbNewLine&errResult  na dole, jeślikoniec podSkrypt wywołaniaWyjdźWskazówkaWyjdź  Wscript.Echo strResult  Wscript.Exitkoniec pod

    Zauważ, że liczne strResult są używane tylko w celach debugowania, aby zobaczyć tutaj wyjście cscript:

    ==> D:VB_scriptsSO37776762.vbs37776762.vbs--- nowa recenzjaY:\S-PCVB_scripts_help-2147024843 0x80070035 WSHNetwork.MapNetworkDriveNie znaleziono ścieżki sieciowej.--- test rozpalaniaY:\S-PCVB_scripts_help--- nowa recenzjaY:\S-PCVB_scripts_helpX: \S-PCtestskopiuj tutaj, że \S-PCtest==>

  • Uruchom skrypt
  • 1. --- nowo rozpoznane sprawdzenie Y: zaplanowany przejazd; następnie, jak również zgłoszenia nie powiodło się Ponowna próba (ścieżka sieciowa nie została naprawdę znaleziona);
  • 2. --- znaleziono nowy test Y: płyta zaprogramowana ponownie; następnie ręcznie zmapował komputer osobisty do X:, a następnie wywołał działanie Ignoruj;
  • 3. --- nowo wyczuwalne potwierdzenie Y: z podłączonymi dyskami X:;
  • Pętla Do While zakończyła się i nasz własny skrypt będzie kontynuowany po zakończeniu aktywności.
  • błąd wykrywania wshnetwork.mapnetworkdrive

    ==> użycie sieci x: byłoby /deletex: Usunięto pomyślnie.==> cscript D:VB_scriptsSO37776762.vbs37776762.vbs--- nowo zakupiona recenzjaY:\S-PCVB_scripts_help==>
    błąd przechwytywania wshnetwork.mapnetworkdrive

    Spraw, aby Twój komputer znów działał jak nowy! Dzięki Reimage możesz szybko i łatwo naprawić typowe błędy systemu Windows.

    Related Posts