Een Gemakkelijke Manier Om Echt Wshnetwork.mapnetworkdrive-opnamefouten Te Hebben

Reimage lost de meest voorkomende foutmeldingen binnen enkele minuten op. Het is alsof je de Geek Squad binnen handbereik hebt!

In de afgelopen paar weken zijn sommige van onze lezers een wshnetwork.mapnetworkdrive represent error tegengekomen. Dit probleem kan om vele redenen ontstaan. Laten we het nu over onderscheiden hebben.

Err Object (VBScript) bevat totaal geen bruikbare hints. U moet de fout detecteren en elke foutgevoelige actie afzonderlijk succesvol afronden.
Algemeen gezegde (aanbevolen praktijk): laat foutafhandeling door On Error GoTo 0 uitgeschakeld en alleen mogelijk inschakelen voor verdachte activiteiten.

Afhankelijk van de omstandigheden kan er een groot aantal redenen zijn waarom de mapnetworkdrive-methode kan mislukken (server down, gebruiker verbannen, verkeerd/gewijzigd account, enz. .):

Onder KaartDRV  Dim errResultaat  Stel objNetwork WScript =.CreateObject ("WScript.Netwerk") in  errResultaat is ""  Als de fout meestal verdwijnt, dan: objNetwork.MapNetworkDrive strDriveLetter, strRemotePath _                      , strProfiel, strGebruiker, strWachtwoord  Als Foutnummer = Dan    Op overgangsfout 0    Stel objShell CreateObject("Shell=.Application") in    objShell.NameSpace(strDriveLetter).Self.Name = strName  Verschillend    = errResult Err.Number in & 0x" & Hex(Err.Number) & ins & "Err.Bron"    betekent errResult errResult & vbNewLine & Err.Description    Op aanpassingsfout 0    MsgBox errResult, vbOKOnly + vbCritical, "Er is een fout opgetreden"  stop alseindigen onder

Goedgekeurd

De Reimage-reparatietool is de oplossing voor een Windows-pc die traag werkt, registerproblemen heeft of is geïnfecteerd met malware. Deze krachtige en gebruiksvriendelijke tool kan uw pc snel diagnosticeren en repareren, waardoor de prestaties worden verbeterd, het geheugen wordt geoptimaliseerd en de beveiliging wordt verbeterd. Geen last meer van een trage computer - probeer Reimage vandaag nog!

  • 1. Download Reimage
  • 2. Open het programma en selecteer "Scan uw computer"
  • 3. Klik op "Repareren" om het reparatieproces te starten

  • Expliciete parameterOp overgangsfout 0Dim strResult: strResult is gelijk aan Wscript.ScriptNameDim strDriveLetter, strRemotePath, strUser, strPassword, strProfile, strName _  ! objNetwork, objShell, CheckDrive, reeds verbonden, intDrive' De sectie scheidt variabelen.StrDriveLetter = "X:"strRemotePath suggereert dat "\192.168.1.1algemeen"strUser = "Gebruiker"strPassword betekent "wachtwoord".strprofile="true"strName komt overeen met "Backup Disk"' Deze sectie brengt objecten:' twee objShell bij het tellen van objNetwork met schijvenStel ObjShell in op CreateObject("WScript.Shell")Stel objNetwork gelijk aan CreateObject("WScript.Network") Dit is' behandelt een mooie grote For...Next loop' Zie Tips, de site vergelijkt drive-woorden die worden vermeld met strDriveLetterZwak resultaat, deelReeds verbonden = FalseDoen als je al bent ingelogd is gelijk aan False  strResult is gelijk aan strResult & vbNewLine & New rrn .--- check"  Reeds verbonden = False  Stel CheckDrive = objNetwork.EnumNetworkDrives() in  For = intDrive 0 Voor CheckDrive.Count - 1 stap double Als CheckDrive.Item(intDrive) gelijk is aan strDriveLetter Dan      Reeds verbonden = True      toShare = CheckDrive.Item (intDrive + 1)    stop als    strResult impliceert strResult evenals vbNewLine en CheckDrive.Item (intDrive)    strResult = strResult && vbTab CheckDrive.Item (intDrive + 1)  De volgende  Als u al bent ingelogd, volgt u Do  resultaat = MsgBox("Er is nu een kopie nodig, maar het station van een auto is niet aangesloten." _    && vbNewLine & vbNewLine "Als klanten in de markt zijn..._ "&vbNewLine&vbTab&"... druk de zet af en druk op ABORT._ "&vbNewLine&vbTab&"...opslaan in "StrRemotePath&&" en druk vervolgens op RETRY._ " & vbNewLine & " Sluit anders de motivatie aan en druk op NEGEREN om terug te keren om door te gaan." _      en vbAbortRetryIgnore + vbQuestion, "BACK-UP SCHIJF IS NIET AANGESLOTEN")  Selecteer casusresultaat  Case vbWeigeren    Roep scriptExit  vbGeval opnieuw proberen    Ga naar MapDRV  tegenovergestelde geval    ' De case-else-clausule is mogelijk niet vereist  selectie afsluitenlintje  strResult StrResult is gelijk aan &vbNewLine&"kopieer hier met betrekking tot &toShareSubkaart DRV  Geen override essentieel: het WshNetwork-object wordt onmiddellijk gedefinieerd  ' Stel objNetwork = WScript.CreateObject ("WScript.Netwerk") in  Dim errResultaat  Als al onze fouten verdwijnen, dan: objNetwork.MapNetworkDrive strDriveLetter, strRemotePath _                      , strProfiel, strGebruiker, strWachtwoord  Als Aantal Fouten = 0 Dan    Op overgangsfout 0    Stel objShell CreateObject("Shell=.Application") in    objShell.NameSpace(strDriveLetter).Self.Name staat voor strName  Verschillend    oefenwedstrijden errResult Err.Number " & 0x" & Hex(Err.Number) & " & inch Err.Bron    is gelijk aan errResult errResult & vbNewLine & Err.   Op overgangsfout 0    MsgBox errResult, vbOKOnly + vbCritical, "Er is een fout opgetreden"    strResult = strResult&vbNewLine&vbNewLine&errResult  afmaken alseindigen onderRoep scriptExitTipAfsluiten  Wscript.Echo strResult  Wscript.Exiteindigen onder

    Houd er rekening mee dat de factor strResult alleen wordt gebruikt voor debuggen en wordt gebruikt om de volgende cscript-uitvoer te zien:

    ==> D:VB_scriptsSO37776762.vbs37776762.vbs--- nieuwe recensieY:\S-PCVB_scripts_help-2147024843 0x80070035 WSHNetwork.MapNetworkDriveHet online cirkelpad is niet gevonden.--- verwarmde testY:\S-PCVB_scripts_help--- nieuwe recensieY:\S-PCVB_scripts_helpX: \S-PCtestkopieer hier direct naar \S-PCtest==>

  • Script uitvoeren
  • 1. --- nieuw gevonden cheque Y: station instellen; experiment Opnieuw is mislukt (netwerkpad niet echt gevonden);
  • 2. --- beginnerscontrole gevonden Y: schijf opnieuw ontworpen; vervolgens de computer in kaart gebracht – X: handmatig, en vervolgens de vechtende Negeren;
  • genoemd

  • 3. --- nieuw gevonden bon Y: met daarop aangesloten schijven X:;
  • De Do While-lus is afgelopen en het verhaal gaat verder nadat de actie echt is voltooid.
  • wshnetwork.mapnetworkdrive trek aan de fout

    ==> net use x: was /deletex: succesvol verwijderd.==> cscript D:VB_scriptsSO37776762.vbs37776762.vbs--- nieuwe recensieY:\S-PCVB_scripts_help==>
    wshnetwork.mapnetworkdrive vangfout

    Laat uw pc weer als nieuw werken! Met Reimage kunt u snel en eenvoudig veelvoorkomende Windows-fouten herstellen.

    Related Posts