Úvod do skriptu VB: Príručka pre začiatočníkov: 11 krokov

2024 Autor: John Day | [email protected]. Naposledy zmenené: 2024-01-30 12:01

*** ((((UPOZORNENIE: Hoci existuje veľa krokov. Toto je v skutočnosti celkom jednoduché. Len všetko podrobne vysvetlím začiatočníkom. Ak chcete, aby kód preskočil na posledný krok a nájdete úplné znenie) kód.)))) *** Hrám veľa hier Xbox naživo a vždy musím vypnúť internet v počítači, pretože narúša šírku pásma. Hlavne preto, že veci stále sťahujem alebo nahrávam. Problém nie je vypnúť ho, ale opäť ho zapne, na čo zabudnem, a tak sa dostanem tam, kde stratím všetok čas nahrávania/sťahovania. Preto som sa rozhodol vytvoriť program, ktorý to urobí za mňa. Chcel som to napísať na Vb.net, ale len nedávno som musel jadro a pripraviť môj operačný systém na počítači kvôli zlej búrke, ktorá vyprážala môj pevný disk, a zatiaľ som VB.net nepreinštaloval, takže som si myslel, že to bude dajte mi dôvod hrať s vbscript. Vytvoril som aj obrázok v farbe, ktorý sa má zobrazovať na pozadí, takže som vedel, že je spustený.

Krok 1: Zistite, čo chcete urobiť

Prvá vec, ktorú vždy urobím, je vytvoriť plán. Čo chcem, aby program robil? A) Chcem mať možnosť otvoriť skript a automaticky vypne pripojenie. B) Chcem, aby zobrazoval obrovský displej na pozadí, aby nedošlo k chybe, že je internet vypnutý, takže ho nezabudnem znova zapnúť. C) Chcem, aby mi dal možnosť zapnúť ho znova zapnite a potom čakajte na odpoveď. D) Chcem, aby som sa ubezpečil, že ho znova zapnem, aby som nezabudol. E) Potom, čo skutočne poviem áno, znova ho zapnem, skript ho znova zapne. a potom zatvorí pozadie. F) Ukončite všetko.

Krok 2: Veci, ktoré používam, ale nie sú skutočne potrebné

Všetko, čo skutočne potrebujete, je textový editor ako poznámkový blok. Všetko ostatné je voliteľné. Keď robím skript VB, používam program Poznámkový blok ++, pretože s ním zaobchádza ako s vb.net s farbami a pozná jazyk. Pomáha predchádzať chybám. Očísluje aj riadky, aby ste mohli diagnostikovať, v čom je problém, keď sa zobrazí chybový kód. Môžete ho získať tu, poznámkový blok ++

Krok 3: Začnite programovať

Prvá vec, ktorú musíte urobiť, je vytvoriť textový súbor a uložiť ho pod ľubovoľným názvom s príponou.vbsExample: NetworkShutOffScriptThatShutsOffTheInternetSoIcanPlayGamesOnMyXboxAndNotGetLag.vbsExample 2: games.vbs.vbs Obvykle to robím na pracovnej ploche, pretože keď to pracujem, otvorím to asi miliónkrát. Teraz kliknite pravým tlačidlom myši na súbor a kliknite na položku Upraviť alebo Upraviť v programe Poznámkový blok ++.

Krok 4: Krok 1: Otvorenie okna príkazového riadka

Rozhodol som sa teda vykonať väčšinu práce, pričom budem používať programy už uložené v počítači a robiť tak to, čo chcem. Menej kódovania a žiadne sťahovanie … Woohoo. Najľahšie je príkazový riadok. Preto chceme otvoriť okno príkazového riadka, aby sme vytvorili objekt, ktorý zadáme takto: set shellobj = CreateObject ("WScript. Shell") Čo to robí: Nastavte inštanciu shellobj na rovnakú hodnotu, aby sa vytvoril objekt s shell skriptu. Týmto spôsobom všetko, čo musíme urobiť, je napísať shellobj namiesto CreateObject („WScript. Shell“) vždy, keď potrebujeme nový príkaz. Teraz, keď sme vytvorili objekt, poučíme ho, aby otvorilo okno príkazového riadka. Zadáme: shellobj.run "cmd" Čo to robí: To by bolo ekvivalentom napísania CMD do poľa pre spustenie v ponuke Štart. Ak by sme nenastavili premennú shellobject, museli by sme zadať: CreateObject ("WScript. Shell"). Spustiť "cmd" … zistíte, ako je to teraz jednoduchšie. Menej priestoru pre chyby. Kliknite na súbor … potom na Uložiť … potom prejdite na pracovnú plochu a dvakrát kliknite na súbor vbs, ktorý ste vytvorili, aby sa spustil. Ak je všetko v poriadku, mali by ste zobraziť príkazový riadok systému Windows …..yaaaaaa !!! ak nie začiarknuť vaše kódovanie, doteraz by ste mali mať: set shellobj = CreateObject ("WScript. Shell") shellobj.run "cmd" Do svojho skriptu môžete pridávať komentáre, aby ste si neskôr pamätali, čo ste urobili, a tak, že pred riadok umiestnite čiarku toto: „Toto má otvoriť príkazový riadok Keď kódujem mnohokrát, urobím to, aby som si spomenul na to, čo som urobil neskôr, keď sa na to pozerám. Skript tento riadok ignoruje a pokračuje ďalej. Ak ich uvidíte, môžete urobiť to isté.

Krok 5: Krok 2: Nastavenie časovačov

Ok, teraz, keď máme spiffy nové okno, musíme ho naplniť príkazmi, aby sme ho mohli prinútiť robiť to, čo chceme. Problém je v tom, že niektorým počítačom trvá otváranie okien dlhšie ako iným, takže chceme, aby skript chvíľu počkal trochu na začiatok. ak sa spustí príliš skoro, počítač vyplní prázdne miesto, než otvoríte okno a dostanete buď čiastočný príkaz, alebo žiadny. Preto musíme nastaviť časovač. Za týmto účelom napíšeme: wscript.sleep 200 Čo robí: Hovorí skriptu, aby počkal X krát pred vykonaním nasledujúceho príkazu. 1000 sa rovná jednej sekunde, takže moja čaká pätinu sekundy. Môže sa stať, že váš počítač bude musieť čakať dlhšie alebo menej. Ak sledujete počítač a nepíše správne príkazy, zmeňte číslo na vyššie číslo, napríklad 2 000 by boli 2 sekundy a pravdepodobne dostatok času. Teraz uložte súbor a váš kód v tomto mieste by mal byť: set shellobj = CreateObject ("WScript. Shell") shellobj.run "cmd" wscript.sleep 200

Krok 6: Krok 3: Vytvorte si obrázok

Práve som otvoril farbu a zadal do nej príkaz „Internet Disconected“a urobil ho s rozmermi 800 x 600 a uložil ako id.bmp a uložil do svojho koreňového adresára, v mojom prípade k: \, ale váš bude pravdepodobne c:

Krok 7: Krok 4: Odosielanie príkazov, otvorenie obrázku

Ok, keď máme príkazové okno, ktoré čaká na príkazy, všetko, čo musíte urobiť, je napísať príkazy do okna pomocou príkazu sendkeys. Keď použijeme príkaz sendkeys, je to ako písanie, ale napíše to, čo chceme, aby napísal. Čokoľvek, čo môžeme napísať, môžeme odoslať, vrátane klávesov Enter potrebných na spustenie programov. Teraz vieme, že odosielanie kľúčov umožňuje otvoriť obrázok, ktorý sme práve vytvorili, a potom vložiť ďalšie doslov časovača, aby mal obrázok čas na načítanie. Za týmto účelom napíšeme: shellobj.sendkeys "k: / id.bmp {enter}" wscript.sleep 200 Čo to robí: Je to rovnaké ako zadanie k: / id.bmp do poľa pre spustenie. Mal by otvoriť váš obrázok v predvolenom prehliadači obrázkov pre bmp … v mojom prípade je to prehliadač obrázkov a faxov Windows, ale väčšina ľudí inštaluje programy po uvedení na trh, ktoré to robia rovnako, takže kto vie, v čom sa otvorí ten váš. Teraz uložte svoj súbor a spustite ho. Mali by ste dostať príkazový riadok a vyskočiť obrázok. zatiaľ dobrý !!! Váš doterajší kód by mal byť: set shellobj = CreateObject ("WScript. Shell") shellobj.run "cmd" wscript.sleep 200shellobj.sendkeys "k: / id.bmp {enter}" wscript. spi 200

Krok 8: Krok 5: Odosielanie príkazov, Vypnite internet

V tomto prípade, ak ste to ešte neurobili, stiahnite si súbor pdf na konci, takže ak sa pokazíte, stiahnete si návod na opravu. Teraz sa začína zábava. Ok, takže použijeme ipconfig na uvoľnenie našej IP adresy. Bez adresy IP nemôžeme získať žiadny internetový prenos, pretože smerovač nevie, kam ho odoslať do počítača. Za týmto účelom napíšeme: shellobj.sendkeys "ipconfig /release {enter}" Čo to urobí: Tento program zadá programu IPCONFIG, aby uvoľnil IP adresu. {enter} informuje počítač, že stlačíte kláves Enter. bolo by to ako zadať ipconfig /release do okna behu a stlačiť kláves Enter. Keď to urobíte, zvyčajne po spustení programu ipconfig vám oznámi, že vaša adresa IP je 0,0,0,0. To je to, čo chceme. Bez IP adresy router nevie, že sme tu a žiadne programy sa nedajú takpovediac „vytočiť“. Teraz, keď sme úspešne ukončili vypínanie IP, chceme zavrieť okno. Teraz by sme mohli napísať ďalší riadok, ktorý hovorí: shellobj.sendkeys "exit {enter}" Ale bolo by jednoduchšie jednoducho upraviť vyššie uvedený riadok a pridať ho na koniec, aby ste mali: shellobj.sendkeys "ipconfig /release {enter} exit {enter} „Teraz ho uložte, ale nespúšťajte, pretože vypnete internetové pripojenie. Ak ho spustíte a internet sa vypne, stačí zmeniť prepínač z ipconfig /release na ipconfig /renew a znova ho spustiť a mal by ho znova zapnúť. A ak všetko ostatné zlyhá, reštartujte počítač a mali by ste byť v poriadku. Váš doterajší kód by mal byť: set shellobj = CreateObject ("WScript. Shell") shellobj.run "cmd" wscript.sleep 200shellobj.sendkeys "k: / id.bmp { zadajte} "wscript.sleep 200shellobj.sendkeys" ipconfig /release {enter} exit {enter}"

Krok 9: Krok 6: Vytvorenie okna so správou a čakanie na odpoveď

Ok, teraz, keď sme úspešne vypli internet a zavreli okno príkazového riadka, chceme, aby sa objavilo okno so správou s otázkou, či chceme internet znova zapnúť. Ale tu je to zložité, chceme, aby to počkalo áno, ale ak klikneme na nie, nechceme, aby to zmizlo, takže na to použijeme príkaz while. Najprv musíme dimenzovať premennú pre schránku správ, aby sme jej mohli priradiť číselné premenné. Viem, že to znie mätúco, ale v skutočnosti to tak nie je. už sme to raz urobili s riadkom: set shellobj = CreateObject („WScript. Shell“), tento je ešte jednoduchšie nastaviť, stačí napísať: Dim MyVar Čo to robí: Teraz sme okótovali premennú s názvom MyVar Keď dostanete „áno“/nie "vyskočí na vašu obrazovku okno a kliknete na tlačidlá, ktoré priradia hodnotu každému tlačidlu, v tomto prípade" áno "je 1 a" nie "je 2. Chceme, aby premenná začínala" nie " predvolene priradíme číslo 2, týmto spôsobom sa pozastaví, kým nekliknete na tlačidlo. Na tento účel zadáme: myvar = 2 Čo to robí: teraz sa MyVar rovná 2, týmto spôsobom sa v nasledujúcom riadku zastaví a čaká na zadanie. Teraz chceme, aby to sedelo a čakalo, kým nebudeme pripravení znova zapnúť internet. Na tento účel napíšeme: while myvar = 2 Čo to robí: Tým sme povedali skriptu, že pokiaľ je hodnota myvaru = 2, potom pokračujte v sledovaní schránky správ, kým nezískame inú hodnotu ako 2, ktorá v tomto prípade môže byť iba 1. Ďalej skutočne chceme, aby sa zobrazilo okno so správou pomocou tlačidiel áno/nie. zadáme toto: MyVar = MsgBox („Zapnúť internetové pripojenie“, 65, „Zapnúť internetové pripojenie“) Čo to robí: Teraz bude premennej MyVar priradená akákoľvek hodnota priradená tlačidlu, na ktoré sa kliká na pole so správou. prvá časť úvodzoviek je to, čo schránka správ vlastne povie. 65 to označuje ako schránku správ Áno/Nie. a posledná časť v úvodzovkách je popis schránky správ. Ak chcete zistiť, akú hodnotu priraďuje, kliknutím na tlačidlo áno alebo nie môžete pridať riadok s textom msgbox (myVar) a vytlačí akúkoľvek hodnotu, ktorá je myvaru priradená v okno so správou. Teraz, keď máme pole so správou, musíme príkaz while zavrieť. Všetko, čo je medzi otvorením a zatvorením príkazu while, sa spustí zakaždým, keď kliknete na nie, pretože ak kliknete na nie, hodnota je stále 2 a vráti sa do prvej časti. Ak chcete ukončiť príkaz príkazu while: wend robí: Hneď ako ukončíte príkaz while, bude pôsobiť ako slučka, kým argument prestane byť splnený. Ak teda budete pokračovať v trefovaní nie, bude sa to opakovať, ale akonáhle kliknete na áno, vymaní sa to zo slučky a bude pokračovať v skripte. Uložte súbor, ale počkajte na jeho spustenie do ďalšieho kroku. Váš doterajší kód by mal byť: set shellobj = CreateObject ("WScript. Shell") shellobj.run "cmd" wscript.sleep 200shellobj.sendkeys "k: / id.bmp { zadajte} "wscript.sleep 200shellobj.sendkeys" ipconfig /release {enter} exit {enter} "Dim MyVarmyvar = 2 while myvar = 2MyVar = MsgBox (" Turn on internet connection ", 65," Turn On Internet Connection ") wend

Krok 10: Krok 7: Opätovné zapnutie internetu

Teraz, keď niekto konečne klikol na áno a prešlo vyhlásenie while, musíme urnovať internet. Obvykle vyskočím na potvrdenie, aby koncový používateľ vedel, čo sa deje, ale je to čisto voliteľné. Ak chcete otvoriť typ potvrdenia: msgbox („Teraz znova zapneme internetové pripojenie !!!“) Čo to urobí: odošle okno so správou, že teraz znova zapneme internetové pripojenie !!! a dá vám tlačidlo OK na kliknutie. Teraz všetko, čo musíte urobiť, je znova zapnúť internet a zatvoriť všetko. Ak chcete internet znova zapnúť, stačí otvoriť príkazový riadok, nastaviť časovač a potom znova použiť príkaz ipcionfig. typ: shellobj.run "cmd" wscript.sleep 200shellobj.sendkeys "ipconfig /renew {enter}" Čo to robí: zmení predchádzajúci príkaz na vypnutie a obnoví vašu IP adresu. Keď si obnovíte svoju IP adresu, môžete teraz znova získať internetové pripojenie. Teraz už len musíme vyčistiť otvorené okná. Opäť by sme mohli použiť príkaz sendkeys, ale iba pridám posledný riadok, aby sa vykonali aj vyčistenia. V tomto prípade použijem program taskkill na zabitie programu zobrazujúceho obrázok. V tomto prípade je to prehliadač obrázkov a faxov systému Windows a zobrazuje sa ako rundll32.exe na karte procesov v správcovi úloh, takže to je to, čo musíme zabiť. Ak sa váš obrázok otvára pomocou iného programu, ako je irfanview alebo acdsee, nájdite na karte procesov jeho názov a umiestnite súbor rundll32.exe tak, ako nájdete. Príkaz by bol: taskkill /F /IM rundll32.exe Čo to je robí: taskkill je názov programu, /prepínač /F mu povie, aby vynútil zabitie a /IM prepínač mu povie názov obrázku. Takže teraz to pripájame k poslednému riadku, zadajte príkaz enter na vykonanie príkazu a potom príkaz exit a ďalší enter, a vyzerá to takto: shellobj.sendkeys "ipconfig /renew {enter} taskkill /F /IM rundll32.exe {enter} exit {enter}" Uložte súbor.

Krok 11: Hotový výrobok

Ak všetko prebehlo správne, váš hotový produkt by mal vyzerať takto: 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 ("Turn on internet connection", 65, "Turn On Internet Connection") wendmsgbox ("Teraz zmeníme internet Pripojenie späť !!! ") shellobj.run" cmd "wscript.sleep 200shellobj.sendkeys" ipconfig /renew {enter} taskkill /F /IM rundll32.exe {enter} exit {enter} "_end of script_Now that the program is is Hotovo, môžete spustiť program. Čo by sa malo stať: 1.) Na veľmi krátku dobu by sa vám malo otvoriť okno CMD a potom ho zavrieť 2.) Váš internet by už nemal fungovať. ale to neuvidíte3.) Váš obrázok by sa mal otvoriť.4.) Malo by sa vám zobraziť vyskakovacie okno s otázkou, či chcete znova zapnúť internet. 5.) Bez ohľadu na to, koľkokrát kliknete, nemalo by sa hlásiť okno správy. znova sa opýtajte, či chcete znova zapnúť internet. 6.) Keď kliknete na tlačidlo áno, okno so správou by malo zmiznúť a malo by sa zobraziť okno CMD 7.) Po obnovení IP adresy sa okno CMD a obrázok by sa malo zavrieť. Tu to máte. Veľmi ľahký VBscript na zapnutie a vypnutie internetu. Dúfam, že sa vám to páči. V skutočnosti som vytvoril ďalší skript, ktorý je takmer identický s týmto a ktorý vypína sieťové adaptéry pomocou programu s názvom DevCon, ktorý je ako správca zariadení príkazového riadka. Funguje naozaj dobre. Skript je identický s týmto, okrem prípadov, keď v tomto prípade obsahuje čiarky pre ipconfig, že jeden má príkazy pre DevCon.