Introduktion till VB Script: en nybörjarguide: 11 steg

2024 Författare: John Day | [email protected]. Senast ändrad: 2024-01-30 12:47

*(kod där.))))) *** Jag spelar mycket Xbox live och måste alltid inaktivera internet på min dator eftersom det ökar bandbredden. Främst för att jag laddar ner eller laddar upp saker hela tiden. Problemet är inte att stänga av det, men det är att slå på det igen som jag glömmer, vilket gör att jag tappar bort all den uppladdnings-/nedladdningstiden. Så jag bestämde mig för att skapa ett program för att göra det åt mig. Jag tänkte skriva det i Vb.net men jag var nyligen tvungen att skaka och bana mitt operativsystem på min dator på grund av en dålig storm som stekte min hårddisk och har inte installerat om VB.net än så jag tänkte bara att detta skulle ge mig en anledning att spela med vbscript. Jag gjorde också en bild i färg för att visa i bakgrunden så jag visste att den körde.

Steg 1: Ta reda på vad du vill göra

Det första jag alltid gör är att göra en plan. Vad vill jag att programmet ska göra? A) Jag vill kunna öppna manuset och det stänger automatiskt av anslutningen. B) Jag vill att den ska visa en gigantisk display i bakgrunden så det är inget misstag att internet är avstängt, så glömmer jag inte att slå på det igen. C) Jag vill att det ska ge mig ett val att slå det igen och vänta sedan på ett svar. D) Jag vill att det ska se till att jag slår på det igen så att jag inte glömmer det. e) När jag faktiskt säger ja för att slå på det igen, aktiverar manuset det igen och stänger sedan bakgrunden. F) Avsluta allt.

Steg 2: Saker jag använder men inte verkligen behövs

Allt du verkligen behöver är en textredigerare som anteckningsblock. Allt annat är valfritt. Jag använder Notepad ++ när jag gör VB -skript så eftersom det behandlar det som vb.net gör med färger och kan språket. Det hjälper till att undvika misstag. Det numrerar också raderna så att du kan diagnostisera vad som är problemet när du får en felkod. Kan hämtas härifrån anteckningsblock ++

Steg 3: Starta programmeringen

Det första du vill göra är att skapa en textfil och spara den till vad du vill att den ska heta med filtillägget.vbsExample: NetworkShutOffScriptThatShutsOffTheInternetSoIcanPlayGamesOnMyXboxAndNotGetLag.vbsExempel 2: games.vbsAllt som är viktigt är att du heter det med filtillägget Jag gör vanligtvis detta på skrivbordet eftersom jag öppnar det ungefär en zillion gånger medan jag arbetar med det. Nu högerklickar du på filen och trycker på redigera eller redigera med anteckningsblock ++

Steg 4: Steg 1: Öppna ett kommandotolkfönster

Så jag bestämde mig för att göra det mesta av arbetet. Jag skulle bara använda program som redan är lagrade på datorn för att göra vad jag vill. Mindre kodning och inga nedladdningar … Woohoo. Easiest är kommandotolken. Så vi vill öppna ett kommandotolkfönster för att göra så vi vill bygga ett objekt för att göra så skriver vi: set shellobj = CreateObject ("WScript. Shell") Vad det gör: Ställ in en instans av shellobj att vara lika för att skapa objekt w -skriptskal. På så sätt behöver vi bara skriva shellobj istället för CreateObject ("WScript. Shell") varje gång vi behöver ett nytt kommando. Nu när vi har skapat ett objekt instruerar vi objektet att öppna ett kommandotolkfönster. För att göra det skriver vi: shellobj.run "cmd" Vad det gör: Detta skulle motsvara att skriva CMD i körrutan på startmenyn. Hade vi inte ställt in variabeln shellobject hade vi behövt ha skrivit: CreateObject ("WScript. Shell"). Kör "cmd" … se hur mycket lättare det är nu. Mindre utrymme för misstag. Klicka på filen … sedan Spara … gå sedan till skrivbordet och dubbelklicka på vbsfilen du gjorde att den skulle köras Om allt går rätt bör du få en Windows -kommandotolk för att dyka upp …..yaaaaaa !!! om inte kolla din kodning, så långt bör du ha: set shellobj = CreateObject ("WScript. Shell") shellobj.run "cmd" Du kan lägga till kommentarer i ditt skript så att du kommer ihåg vad du gjorde senare genom att placera ett komma framför raden som detta: 'detta är för att öppna en kommandotolk När jag kodar många gånger kommer jag att göra detta så jag kommer ihåg vad jag gjorde senare när jag tittar på det för. Skriptet ignorerar bara den raden och går vidare. Om du ser dem kan du göra detsamma.

Steg 5: Steg 2: Konfigurera timers

Ok nu när vi har ett nytt nytt fönster måste vi fylla i det med kommandon så att vi kan få det att göra vad vi vill. Problemet är att vissa datorer tar längre tid än andra att öppna fönster så vi vill att manuset ska vänta lite lite att börja. Om det startar för tidigt kommer datorn att fylla i tomrummet innan du öppnar fönstret och du får antingen ett delvis kommando eller inget alls. Så vi måste ställa in en timer. För att göra detta skriver vi: wscript.sleep 200 Vad det gör: Det säger att manuset ska vänta X tid innan nästa kommando utförs. 1000 är lika med en sekund så min väntar en femtedel av en sekund. Det kan hända att din dator behöver vänta mer eller mindre. Om du tittar på datorn och den inte skriver kommandona korrekt ändrar du numret till ett högre nummer som 2000 skulle vara 2 sekunder och förmodligen gott om tid. Spara filen nu bör din kod vid denna tidpunkt vara: set shellobj = CreateObject ("WScript. Shell") shellobj.run "cmd" wscript.sleep 200

Steg 6: Steg 3: Gör en bild

Jag öppnade bara färg och skrev "Internet Disconected" i den och gjorde den 800x600 och sparade den som id.bmp och sparade den i min rotkatalog, i mitt fall k: / men din kommer förmodligen att vara c:

Steg 7: Steg 4: Skicka kommandon, öppna bilden

Ok nu när vi har ett kommandofönster som väntar på kommandon, allt vi behöver göra är att skriva kommandona i fönstret med kommandot sendkeys. När vi använder kommandot sendkeys är det som att skriva, men det kommer att skriva vad vi vill att det ska skriva. Allt vi kan skriva kan vi skicka inklusive enter -nycklarna som behövs för att köra program. Nu när vi vet hur vi skickar nycklar kan vi öppna vår bild som vi just gjort och sedan lägga in ett annat timer efterord så att det ger bilden tid att ladda. För att göra detta skriver vi: shellobj.sendkeys "k: / id.bmp {enter}" wscript.sleep 200 Vad det gör: Detta är samma sak som att skriva k: / id.bmp i körrutan. Det bör öppna din bild i standardbildvisaren för en bmp … i mitt fall är det Windows bild- och faxvisare men de flesta installerar efter marknadsföringsprogram som gör detta också så vem vet vad din kommer att öppna. Nu spara din fil och kör det. Du bör få en kommandotolk och en bild att dyka upp. så långt så bra !!! din kod hittills borde vara: set shellobj = CreateObject ("WScript. Shell") shellobj.run "cmd" wscript.sleep 200shellobj.sendkeys "k: / id.bmp {enter}" wscript. sova 200

Steg 8: Steg 5: Skicka kommandon, stäng av Internet

Om du inte har gjort det ännu, ladda ner pdf -filen i slutet så om du skruvar upp dig har du laddat ner en instruktionsbok om hur du åtgärdar det. Nu börjar det roliga. Ok så vi kommer att använda ipconfig för att släppa vår IP -adress. Utan en IP -adress kan vi inte få någon internettrafik eftersom routern inte vet vart den ska skickas till datorn. För att göra detta skriver vi: shellobj.sendkeys "ipconfig /release {enter}" Vad det gör: Detta instruerar programmet IPCONFIG att släppa IP -adressen. {enter} säger till datorn att du trycker på enter -knappen. detta skulle vara som att skriva ipconfig /release i körfönstret och trycka på enter. Vanligtvis när du gör detta, om du kör ipconfig kommer det att berätta att din IP -adress är 0.0.0.0 Detta är vad vi vill ha. Utan en IP -adress vet inte routern att vi är här och inga program kan "ringa ut" så att säga. Nu när vi har avslutat stängningen av IP -adressen vill vi stänga fönstret. Nu kan vi skriva en annan rad som säger: shellobj.sendkeys "exit {enter}" Men det skulle vara lättare att bara redigera raden ovan och lägga till den i slutet så att du har: shellobj.sendkeys "ipconfig /release {enter} exit {enter} "Spara det nu men kör det inte eftersom du stänger av din internetanslutning. Om du kör det och ditt internet stängs av, byt bara omkopplaren från ipconfig /release till ipconfig /förny så kör det igen och det bör slå på det igen. Och om allt annat misslyckas startar du om och du ska ha det bra. Din kod hittills bör vara: set shellobj = CreateObject ("WScript. Shell") shellobj.run "cmd" wscript.sleep 200shellobj.sendkeys "k: / id.bmp { enter} "wscript.sleep 200shellobj.sendkeys" ipconfig /release {enter} exit {enter}"

Steg 9: Steg 6: Skapa meddelanderuta och väntar på svar

Ok, nu när vi har lyckats stänga av internet och stängt kommandotolken, vill vi att en meddelanderuta dyker upp och frågar om vi vill slå på internet igen. Men här är det svårt, vi vill att det ska vänta för ett ja, men om vi klickar nej vill vi inte att det ska försvinna så vi kommer att använda en stund -sats för att göra detta. Först måste vi dimensionera en variabel för meddelandefältet så att vi kan tilldela det nummervariabler. Jag vet att det låter förvirrande men det är det verkligen inte. vi gjorde det redan en gång med raden: set shellobj = CreateObject ("WScript. Shell") den här är till och med lätt att ställa in det skriver vi bara: Dim MyVarWhat it does: Nu har vi dimensionerat en variabel som heter MyVarWhen du får ett "ja /nej "meddelanderuta dyker upp på skärmen och du klickar på knapparna, det tilldelar varje knapp ett värde, i det här fallet är" ja "1 och" nej "är 2. Vi vill att variabeln ska börja med ett" nej "Så vi tilldelar det nummer 2 som standard, så pausar det tills en knapp klickas. För att göra detta skriver vi: myvar = 2 Vad det gör: nu är MyVar lika med 2, så stannar det på nästa rad och väntar på inmatning. Nu vill vi bara att den ska sitta där och vänta tills vi är redo att slå på internet igen. För att göra detta skriver vi: medan myvar = 2 Vad det gör: Genom att göra detta har vi berättat för manuset att så länge värdet på myvar är = 2, fortsätt bara att loopa meddelandefältet tills vi får något annat värde än 2, vilket i det här fallet bara kan vara 1Nästa vill vi faktiskt få en meddelanderuta att dyka upp med ja/nej -knappar. detta skriver vi: MyVar = MsgBox ("Slå på internetanslutning", 65, "Slå på internetanslutning") Vad det gör: Nu kommer MyVar -variabeln att tilldelas vilket värde som tilldelas knappen som klickas på meddelanderutan. den första delen i citaten är vad meddelandelådan faktiskt kommer att säga. 65 betecknar det som en Ja/Nej meddelandebox. och den sista delen i citattecken är meddelandefältets etikett. för att kontrollera vilket värde det tilldelar när du klickar ja eller nej kan du lägga till i en rad som säger msgbox (myVar) och det kommer att skriva ut vilket värde som tilldelas myvar i en meddelanderuta. nu att vi har en meddelanderuta måste vi stänga medan -uttalandet. Allt som är mellan öppet och stängt av medan -satsen kommer att köras varje gång du klickar nej, för om du klickar nej är det fortfarande värdet 2 och går tillbaka till den första delen. För att avsluta medan -satsen typ: wendWhat it gör: När du sätter stopp för en stund -sats kommer den att fungera som en loop tills argumentet inte längre uppfylls. Så om du fortsätter att slå nej kommer det att loopa, men när du väl har tryckt på ja kommer det att slippa slingan och fortsätta med skriptet. Spara filen men vänta med att köra den till nästa steg. Din kod hittills bör vara: set shellobj = CreateObject ("WScript. Shell") shellobj.run "cmd" wscript.sleep 200shellobj.sendkeys "k: / id.bmp { enter} "wscript.sleep 200shellobj.sendkeys" ipconfig /release {enter} exit {enter} "Dim MyVarmyvar = 2 while myvar = 2MyVar = MsgBox (" Slå på internetanslutning ", 65," Slå på Internetanslutning ") wend

Steg 10: Steg 7: Slå på Internet igen

Nu när någon äntligen klickade på ja och det har passerat medan -uttalandet, måste vi urn på internet. Jag brukar dyka upp en bekräftelse så att slutanvändaren vet vad som händer men det är rent valfritt. För att dyka upp en bekräftelsestyp: msgbox ("Vi slår nu på internetanslutningen igen !!!") Vad den gör: den skickar en meddelanderuta som säger att vi nu slår på internetanslutningen igen !!! och ger dig en ok -knapp att klicka på. Nu är allt vi behöver göra att slå på internet igen och stänga allt. för att slå på internet igen öppnar vi bara en kommandotolk, ställ in timern och använd sedan ipcionfig igen. för att göra detta type: shellobj.run "cmd" wscript.sleep 200shellobj.sendkeys "ipconfig /renew {enter}" Vad det gör: det vänder avstängningskommandot från tidigare och förnyar din IP -adress. När du har förnyat din IP -adress kan du nu få internetanslutningar igen. Nu är det bara att städa upp de öppna fönstren. Återigen kan vi använda ett kommando med sendkeys men jag ska bara lägga till den sista raden för att också hålla saneringarna. I det här fallet kommer jag att använda taskkill -programmet för att döda programmet som visar bilden. I det här fallet är det windows bild- och faxvisare och visas som rundll32.exe på processfliken i aktivitetshanteraren så det är vad vi behöver döda. Om din bild öppnas med ett annat program, som irfanview eller acdsee, leta reda på namnet den går till på processfliken och byt ut rundll32.exe med namnet du hittar. Kommandot skulle vara: taskkill /F /IM rundll32.exe Vad det gör: taskkill är namnet på programmet /F -omkopplaren säger att den tvingar ett dödande och /IM -omkopplaren berättar det bildnamnet Så nu lägger vi till det på den sista raden, lägger till en enter för att utföra kommandot och sedan en avsluta kommandot och en annan enter och det ser ut så här: shellobj.sendkeys "ipconfig /renew {enter} taskkill /F /IM rundll32.exe {enter} exit {enter}" Spara din fil.

Steg 11: Färdig produkt

Om allt gick rätt skulle din färdiga produkt se ut ungefär så här: set shellobj = CreateObject ("WScript. Shell") shellobj.run "cmd" wscript.sleep 200shellobj.sendkeys "k: / id.bmp {enter}" wscript.sleep 200shellobj.sendkeys "ipconfig /release {enter} exit {enter}" Dim MyVarmyvar = 2 while myvar = 2MyVar = MsgBox ("Slå på internetanslutning", 65, "Slå på internetanslutning") wendmsgbox ("Nu ska vi slå på Internet Anslutning igen !!! ") shellobj.run" cmd "wscript.sleep 200shellobj.sendkeys" ipconfig /renew {enter} taskkill /F /IM rundll32.exe {enter} exit {enter} "_end of script_Now that the programmering is gjort kan du köra programmet. Vad ska hända: 1.) Du ska få CMD -fönstret att dyka upp under en mycket kort tid och sedan stänga2.) Ditt internet ska inte längre fungera. men du kommer inte att se detta. 3) Din bild ska öppnas. 4.) Du får en popup som frågar dig om du vill slå på internet igen. men du öppnar igen och frågar om du vill slå på internet igen. bör stänga. Där har du det. En mycket enkel VBscript att slå på och av internet. Hoppas du gillar det. Jag gjorde faktiskt ett annat skript som är nästan identiskt med det här som stänger av nätverkskortet med ett program som heter DevCon, som är som en kommandorads enhetshanterare. Fungerar riktigt bra till. Skriptet är identiskt med det här förutom där det i det här har kommandon för ipconfig att man har kommandon för DevCon.