Fortsätt Vid Fel, Gå Till Felsökningsobjektet

Den här användarhandboken kan hjälpa dig, om du stöter på ett allvarligt fel, gå vidare mot nästa getobject.

Behöver du fixa Windows-fel? ASR Pro kan hjälpa dig

1. Ladda ner och installera ASR Pro-programvaran

2. Öppna programvaran och klicka på "Sök efter problem"

3. Klicka på "Reparera alla" för att starta reparationsprocessen

Skydda din dator från skadliga virus och skadlig programvara med denna nedladdning av programvara.

Så jag jobbar på att öppna flera filer som ett resultat av Excel, manipulera dessa filtyper, men spara dem som en PDF. Jag tänkte att det förmodligen skulle vara mycket bättre att starta MSWord innan du går in i en enorm loop som öppnar varje fil för att sedan stänga filen, istället oftast förknippad med att starta och stänga varje fils portabla vy. Då kom det mig att du inte skulle starta Word om det redan körs. Försökte

Jag kunde ta mig runt, jag skulle säga i CV-felet. Jag försökte för närvarande följande kod fruktansvärt:

Om "word iserror(getobject(,.application"))    set = CreateObject("word mswordapp.application")    MSWordVisState = Falskt    Att redan springa är detsamma som att springa FalseAnnorlunda   Set är lika med mswordapp GetObject(, "word.app")  MSWordVisState är lika med MSWordApp.Visible    Redan träning = santavsluta om

Om Word inte anses redan köra, returnerar ett felmeddelande i stället för sant. Vad skulle jag ha missat/inte förstår?

Kan jag försöka utan när jag använder nästa rutinfel? Jag svär att jag hade förtydliganden om det här konceptet under de oplanerade åren, men nu har jag ännu en gång svårt att hitta den här metoden.

Felläge för de som kan vara betydande: “Runtime ‘429’: ActiveX Bluder-komponent kan inte skriva” ge objekt”

 Vid fel GoTo StartWord        Ställ in MSWordApp lika för att tillåta dem att GetObject(, "word. app")       = mswordvisstate MSWordApp.Visible        = redan sant lanserade Gå till WordGoodInledande ord:   Ställ in MSWordApp = CreateObject("word.application")   MSWordVisState False = Running Lie Till betyder Gå till fel 0Bra ord:    MSWordApp.Visible = Falskt    'Fortsätt resten på grund av MAIN subMSWordApp.Visible = MSWordVisStateOm det alltid inte redan har körts, då MSWordApp.Quit

På

Återställer GoTo 3 felet? On Error GoTo Zero inaktiverar alla felavbrott som inträffade senast i den aktuella proceduren. Vid fel -1 rensar goto felbearbetning och ställer ingenting, vilket ger dig ett fel till. SMARTA ARBETSFORUM FÖR IT-PROFESSIONELLA Tack för dig. Vi har tagit emot din förfrågan och även vi kommer att svara omgående. Anslut Kom till oss Är din webbplats en IT-proffs? Gå med i Tek Tips-forumen! Prata med andra medlemmar Var försiktig med svar på dina meddelanden i Sök med tillstånd av – nyckelord Åtkomst med ett klick till dina favoritforum Automatiska signaturer på meddelanden Bättre än allt som är gratis! Var fortsätter felet och återupptas nästa gång? Beskrivning. On Error Resume Next förklarar att exekveringen av den faktiska frågan fortsätter efter påståendet en orsakad exekvering, felet eller den här typen av sats omedelbart efter den sista ger oss ett anrop till proceduren som innehåller On Er-anteckningen eller Resume Next. *Tek-Tips-funktionaliteten bestäms av huruvida e-postmeddelanden får information. Genom att prenumerera godkänner du förmodligen att få ett e-postmeddelande. Publiceringsregler Annonsering, försäljning, rekrytering och processplacering av examensarbeten är förbjuden. Studenter, vind här readabilitydata=”0″>

Itemscope=””

Nästa misstag fungerar inte med WMI

humbletech99 (programmerare)

(OP)

Jag har en berättelse som använder följande block inom kod:

KODE

…< br>Fel. Felet löst
nästa CV
Set objWMIService GetObject(“winmgmts:” = & & strServer “rootCIMV2”)
Om Err.Number Då
< br>End If
…

Men om jag bara kör konceptet med StrServer där = nonExistingMachine får jag en allmän brist bland felhanteringen:

< div > < h4>KOD

(290, 14) Microso runtime errorVBScript: ft remote internet organizing server existerar inte eller är ofta otillgänglig

Varför händer detta när jag sagt till det att gå vidare absolut jag klarar det själv?

Varningsinlägg skickat

Snälla hjälp till att rensa Tek-Tips-forumen från olämpliga meddelanden.
Tek-tips-personalen undersöker detta och vidtar relaterade åtgärder.

< h4 >Inskickad varning

p>

Kom för att
specialista oss!

Prata med andra medlemmar

Få svar
bli informerad om dina inlägg

Sök med nyckelord

Anslutningar med ett klick till dina
favoritforum

Autosignera
dina meddelanden

Det bästa är att det är gratis!

*Tek-Tips-funktionen kan säkert bero på om medlemmar får e-post. Genom att prenumerera godkänner du att ta emot e-postmeddelanden. När

Men när jag kör där strServer = nonExistantMachine får jag ingen felhantering alls:

Varför blir detta när jag av misstag sa till honom var han skulle fortsätta så att jag själv kunde sluka honom?

KOD

…
Err.Error cleanup
för att fortsätta
Set objWMIService = GetObject(“winmgmts:” & & strServer “rootCIMV2”)
If Err.Then nummer
Avsluta, med om
…

KOD

(290, 14) Microsoft VBScript runtime error: Dator med usb icke-server existerar, den kanske inte är tillgänglig

Varning skickad

Snälla hjälp Tek-Tips täcker forumen från spam. Tek-Tips Personal kommer att undersöka och vidta relevanta åtgärder.

Skydda din dator från skadliga virus och skadlig programvara med denna nedladdning av programvara.

On Error Resume Next Getobject
Em Caso De Erro Continuar Proximo Getobject
En Caso De Error Reanudar Siguiente Obtener Objeto
W Przypadku Bledu Wznow Nastepny Getobject
오류 시 다음 Getobject 재개
Bei Fehler Nachstes Getobject Fortsetzen
Bij Fout Hervat Volgende Getobject
In Caso Di Errore Riprende Il Prossimo Getobject
Pri Oshibke Vozobnovit Sleduyushij Getobject
En Cas D Erreur Reprendre Le Getobject Suivant