Ներածություն VB Script: a Beginners Guide: 11 Steps

2024 Հեղինակ: John Day | [email protected]. Վերջին փոփոխված: 2024-01-30 09:52

*** ((((ԱՇԽԱՏՈԹՅՈՆ. Չնայած կան բազմաթիվ քայլեր. Սա իրականում բավականին հեշտ է. Ես պարզապես ամեն ինչ մանրամասն բացատրում եմ սկսնակների համար: Եթե պարզապես ուզում եք, որ կոդը անցնի վերջին քայլին, և դուք կգտնեք ամբողջականը կոդը այնտեղ))))) *** Ես շատ եմ ուղիղ Xbox- ով խաղում և միշտ ստիպված եմ անջատել ինտերնետը իմ համակարգչում, քանի որ այն խցանում է թողունակությունը: Հիմնականում այն պատճառով, որ ես անընդհատ բեռնում կամ բեռնում եմ իրեր: Խնդիրը ոչ թե այն անջատելն է, այլ այն նորից միացնելը, որը ես մոռանում եմ, հասցնելով այնտեղ, որտեղ կորցնում եմ այդ ամբողջ բեռնման/ներբեռնման ժամանակը: Այսպիսով, ես որոշեցի ստեղծել ծրագիր, որը դա կանի ինձ համար: Ես պատրաստվում էի գրել այն Vb.net- ում, բայց ես վերջերս ստիպված էի խոցել և համակարգչում բացել իմ օպերացիոն համակարգը իմ կոշտ սկավառակը տապակած վատ փոթորկի պատճառով, և դեռ չեմ նորից տեղադրել VB.net- ը, այնպես որ ես պարզապես մտածեցի, որ դա ինձ պատճառ տվեք vbscript- ով խաղալու համար: Ես նաև նկար եմ պատրաստել ներկով `հետին պլանում ցուցադրելու համար, որպեսզի իմանայի, որ այն աշխատում է:

Քայլ 1: Պարզեք, թե ինչ եք ուզում անել:

Առաջին բանը, որ ես միշտ անում եմ, ծրագիր կազմելն է: Ի՞նչ եմ ուզում անել ծրագիրը: Ա) Ես ուզում եմ, որ կարողանամ բացել սցենարը, և այն ինքնաբերաբար կդադարեցնի կապը: Բ) Ես ուզում եմ, որ այն հսկայական էկրան ցուցադրի հետին պլանում, որպեսզի սխալ չլինի, որ ինտերնետն անջատված է, այս կերպ ես չեմ մոռանում այն նորից միացնել: Գ) Ես ուզում եմ, որ այն ընտրելու հնարավորություն տա այն դարձնել միացրեք և ապա սպասեք պատասխանին: իսկ հետո փակում է ֆոնը:)) Ելք ամեն ինչից:

Քայլ 2: Բաներ, որոնք ես օգտագործում եմ, բայց իրականում անհրաժեշտ չեն

Այն, ինչ ձեզ իսկապես անհրաժեշտ է, տեքստային խմբագիր է, ինչպիսին է նոթատետրը: Մնացած ամեն ինչ պարտադիր չէ: Ես օգտագործում եմ Notepad ++ - ը, երբ VB սցենար եմ անում, քանի որ այն դրան վերաբերվում է ինչպես vb.net- ը գույներով և տիրապետում է լեզվին: Այն օգնում է խուսափել սխալներից: Այն նաև թվարկում է տողերը, որպեսզի կարողանաք ախտորոշել, թե որն է խնդիրը, երբ ստանում եք սխալի կոդ: Կարող եք ստանալ այստեղից տետր ++

Քայլ 3: Սկսեք ծրագրավորում

Դե, առաջին բանը, որ ուզում ես անել, ստեղծել տեքստային ֆայլ և պահել այն այն, ինչ ուզում ես, որ այն անվանվի ֆայլի ընդլայնմամբ:.vbs.vbs Սովորաբար դա անում եմ աշխատասեղանի վրա, քանի որ դրա վրա աշխատելիս այն բացում եմ մոտ մեկ միլիարդ անգամ: Այժմ պարզապես աջ սեղմեք ֆայլի վրա և հարվածեք խմբագրել կամ խմբագրել նոթատետրով ++

Քայլ 4: Քայլ 1. Հրամանի տողի պատուհանի բացում:

Այսպիսով, ես որոշեցի անել աշխատանքի մեծ մասը, ես պարզապես կօգտագործեի համակարգչում արդեն պահված ծրագրերը `այն, ինչ ուզում եմ: Ավելի քիչ կոդավորում և ներլցումներ չկան … Woohoo. Easyest- ը հրամանի տող է: ուստի մենք ցանկանում ենք բացել հրամանի տող պատուհան, որպեսզի դա անենք, մենք ցանկանում ենք օբյեկտ կառուցել, որպեսզի մուտքագրենք. Մուտքագրեք ՝: Սահմանեք shellobj- ի օրինակը հավասար, որպեսզի ստեղծեք օբյեկտ w script shell- ով: Այս կերպ մենք պետք է անենք ՝ CreatObject- ի («WScript. Shell») փոխարեն, ամեն անգամ, երբ մեզ նոր հրաման է պետք: shellobj.run "cmd" Ինչ է դա անում. Սա կլինի համարժեք CMD մուտքագրել մեկնարկի ընտրացանկի գործարկման վանդակում: Եթե մենք փոփոխական shellobject- ը դնեինք, մենք ստիպված կլինեինք մուտքագրել ՝ CreateObject («WScript. Shell»), գործարկել «cmd»… տեսեք, թե որքան ավելի հեշտ է այժմ: Սխալների համար ավելի քիչ տարածք: Սեղմեք ֆայլը … այնուհետև Պահպանեք … այնուհետև գնացեք աշխատասեղան և կրկնակի կտտացրեք ձեր պատրաստած vbsfile- ին, այն պետք է գործարկվի: Եթե ամեն ինչ ճիշտ է ընթանում, դուք պետք է հայտնվեք windows հրամանի հուշում …..աաաաաա !!! եթե ոչ ստուգեք Ձեր ծածկագրումը, մինչ այժմ պետք է ունենաք. սա: «սա հրամանի տող բացելն է: Երբ ես շատ անգամ կոդավորում եմ, կանեմ դա, որպեսզի հիշեմ, թե ինչ եմ արել հետագայում, երբ փնտրում եմ այն: Սցենարը պարզապես անտեսում է այդ գիծը և առաջ գնում: Եթե դրանք տեսնեք, կարող եք նույնն անել:

Քայլ 5: Քայլ 2: Timամաչափերի կարգավորում

Դե, հիմա, երբ մենք ունենք փխրուն նոր պատուհան, մենք պետք է այն համալրենք հրամաններով, որպեսզի կարողանանք դա անել այն, ինչ ուզում ենք: Խնդիրն այն է, որ որոշ համակարգիչների պատուհանները բացելու համար ավելի երկար ժամանակ է պահանջվում, քան մենք ցանկանում ենք, որ սցենարը մի փոքր սպասի քիչ սկսել: եթե այն շատ շուտ սկսվի, համակարգիչը կլրացնի դատարկը ՝ նախքան պատուհանը բացելը, և դուք կամ մասնակի հրաման կստանաք, կամ ընդհանրապես ոչ մեկը: Այսպիսով, մենք պետք է ժամանակաչափ տեղադրենք: Դա անելու համար մենք մուտքագրում ենք. 1000 -ը հավասար է մեկ վայրկյանի, այնպես որ իմը սպասում է վայրկյանի հինգերորդին: Դուք կարող եք գտնել, որ ձեր համակարգիչը պետք է ավելի կամ ավելի քիչ ժամանակ սպասի: Եթե դուք դիտում եք համակարգիչը և այն ճիշտ չի մուտքագրում հրամանները, ապա համարը 2000 -ի նման ավելի մեծ թվին փոխելը կլինի 2 վայրկյան և, հավանաբար, շատ ժամանակ: Պահեք ֆայլը հիմա ձեր կոդը այս պահին պետք է լինի. Սահմանել shellobj = CreateObject ("WScript. Shell") shellobj.run "cmd" wscript.sleep 200

Քայլ 6: Քայլ 3. Պատկերացրեք

Ես պարզապես բացեցի ներկը և դրա մեջ մուտքագրեցի «Ինտերնետը անջատված է», այն դարձրեցի 800x600 և պահեցի որպես id.bmp և պահեցի իմ արմատային գրացուցակում, իմ դեպքում k: / բայց քոնը հավանաբար կլինի c:

Քայլ 7: Քայլ 4. Հրամաններ ուղարկելը, նկարի բացումը

Լավ, հիմա, երբ մենք ունենք հրամանի պատուհան, որը սպասում է հրամաններին, մեզ մնում է միայն հրամանները մուտքագրել պատուհանում ՝ օգտագործելով sendkeys հրամանը: Երբ մենք օգտագործում ենք sendkeys հրամանը, դա նման է մուտքագրմանը, բայց այն մուտքագրում է այն, ինչ ցանկանում ենք, որ այն մուտքագրվի: Thingանկացած բան, որը կարող ենք մուտքագրել, կարող ենք ուղարկել, ներառյալ ծրագրերը գործարկելու համար անհրաժեշտ մուտքագրման ստեղները: այժմ, երբ մենք գիտենք, թե ինչպես ուղարկել բանալիներ, թույլ է տալիս բացել մեր ստեղծած նկարը, այնուհետև տեղադրել այլ ժամաչափի հետադարձ բառ, որպեսզի նկարին բեռնելու ժամանակ տա: Դա անելու համար մենք մուտքագրում ենք. Այն պետք է ձեր պատկերը բացի լռելյայն պատկերի դիտիչի վրա bmp- ի համար … իմ դեպքում դա Windows- ի նկարների և ֆաքսի դիտիչ է, բայց մարդկանց մեծ մասը տեղադրում է շուկայական ծրագրերից հետո, որոնք նույնպես դա անում են, ուստի ով գիտի, թե ինչում կբացվի ձեր ֆայլը: այժմ պահեք ձեր ֆայլը և գործարկեք այն. Դուք պետք է ստանաք հրամանի տող և հայտնվի նկար առայժմ այնքան լավ է !!! ձեր առայժմ ծածկագիրը պետք է լինի. քնել 200

Քայլ 8: Քայլ 5. Հրամանների ուղարկում, Անջատեք ինտերնետը:

Այս պահին, եթե դեռ դա չեք արել, ներբեռնեք pdf ֆայլը վերջում, այնպես որ, եթե պտուտակեք, դուք ունեք Instructable ներբեռնված, թե ինչպես այն շտկել: Այժմ այստեղ է, որ սկսվում է զվարճանքը: Լավ, մենք կօգտագործենք ipconfig ՝ մեր IP հասցեն ազատելու համար: Առանց IP հասցեի մենք չենք կարող ինտերնետային տրաֆիկ ստանալ, քանի որ երթուղիչը չգիտի, թե որտեղից այն ուղարկի համակարգչին: Դա անելու համար մենք մուտքագրում ենք. {enter} - ը համակարգչին ասում է, որ սեղմել եք մուտքագրման ստեղնը: սա նման կլինի ipconfig /release- ի մուտքագրմանը գործարկվող պատուհանում և սեղմել enter: Սովորաբար դա անելուց հետո, եթե գործարկեք ipconfig- ը, այն ձեզ կասի, որ ձեր IP հասցեն 0.0.0.0 է: Սա այն է, ինչ մենք ուզում ենք: Առանց IP հասցեի, երթուղիչը չգիտի, որ մենք այստեղ ենք, և ոչ մի ծրագիր չի կարող այսպես ասած «հավաքել»: Այժմ, երբ մենք հաջողությամբ ավարտել ենք IP- ի անջատումը, մենք ցանկանում ենք փակել պատուհանը: Այժմ մենք կարող ենք գրել մեկ այլ տող, որտեղ ասվում է. {enter} «Այժմ պահեք այն, բայց մի գործարկեք, քանի որ դուք կդադարեցնեք ձեր ինտերնետային կապը: Եթե դուք այն գործարկեք, և ձեր ինտերնետն անջատված է, պարզապես փոխեք անջատիչը ipconfig /release- ից ipconfig /երկարաձգմանը, և այն նորից կաշխատի, և այն պետք է նորից միացնի: Եվ եթե ամեն ինչ ձախողվի, ապա վերագործարկեք, և դուք պետք է լավ լինեք: մինչ այժմ ձեր ծածկագիրը պետք է լինի. enter} "wscript.sleep 200shellobj.sendkeys" ipconfig /release {enter} exit {enter}"

Քայլ 9: Քայլ 6. Ստեղծեք հաղորդագրությունների տուփ և սպասեք պատասխանի

Լավ, հիմա, երբ մենք հաջողությամբ անջատեցինք ինտերնետը և փակեցինք հրամանի տողերի պատուհանը, մենք ցանկանում ենք, որ հաղորդագրությունների տուփ հայտնվի ՝ հարցնելով, թե արդյոք ցանկանում ենք նորից միացնել ինտերնետը: Բայց ահա թե որտեղ է այն բարդ դառնում, մենք ցանկանում ենք, որ այն սպասի այո, բայց եթե կտտացնում ենք ոչ, մենք չենք ցանկանում, որ այն անհետանա, ուստի դա անելու համար կօգտագործենք while հայտարարություն: Սկզբում մենք պետք է չափիչ փոփոխենք messagebox- ի համար, որպեսզի կարողանանք նրան թվային փոփոխականներ նշանակել: Գիտեմ, որ շփոթեցուցիչ է հնչում, բայց իրականում այդպես չէ: մենք դա արդեն մեկ անգամ արել ենք տողով. /ոչ »հաղորդագրության տուփը հայտնվում է ձեր էկրանին, և սեղմելով կոճակները, այն արժեք է տալիս յուրաքանչյուր կոճակին, այս դեպքում« այո »-ն 1 է,« ոչ »՝ 2: Մենք ցանկանում ենք, որ փոփոխականը սկսվի« ոչ »-ով: մենք նրան լռելյայն տալիս ենք 2 թիվը, այս կերպ այն դադարում է մինչև կոճակը սեղմելը: Դա անելու համար մենք մուտքագրում ենք. myvar = 2 Ինչ է դա անում. այժմ MyVar- ը հավասար է 2 -ի, այս կերպ հաջորդ տողում այն կդադարի և կսպասի մուտքագրմանը: Այժմ մենք պարզապես ցանկանում ենք, որ այն նստած լինի և սպասի, մինչև պատրաստ լինենք նորից միացնել ինտերնետը: դա անելու համար մենք մուտքագրում ենք. = 2, ապա պարզապես շարունակեք հաղորդագրությունների արկղը, մինչև որ ստանանք 2 -ից այլ արժեք, որը այս դեպքում կարող է լինել միայն 1: Հաջորդը մենք իրականում ցանկանում ենք հաղորդագրության տուփը հանել այո/ոչ կոճակներով: Դա անելու համար սա մենք մուտքագրում ենք ՝ MyVar = MsgBox («Միացնել ինտերնետային կապը», 65, «Միացնել ինտերնետային կապը») Ինչ է դա անում. Այժմ MyVar փոփոխականին կտրվի այն արժեքը, որը նշանակված է հաղորդագրության տուփի վրա սեղմված կոճակին: մեջբերումների առաջին մասն այն է, ինչ իրականում կասի հաղորդագրության տուփը: 65 -ը նշանակում է որպես Այո/Ոչ հաղորդագրության տուփ: և մեջբերումների վերջին մասը հաղորդագրության տուփի նշանն է: ստուգելու համար, թե ինչ արժեք է այն տալիս այո կամ ոչ սեղմելիս կարող եք ավելացնել տուփ, որն ասում է msgbox (myVar) և այն տպելու է այն արժեքը, որը նշանակված է myvar- ում հաղորդագրությունների տուփ: այժմ, երբ մենք ունենք հաղորդագրությունների տուփ, մենք պետք է փակենք while հայտարարությունը: Այն ամենը, ինչ գտնվում է while- ի բացման և փակման միջև, կգործի ամեն անգամ, երբ սեղմում եք ոչ, քանի որ եթե ոչ, այն դեռ 2 արժեք է և վերադառնում է առաջին մասին: իսկ հայտարարության տիպը ավարտելու համար. Wend անում է. Երբ վերջ դնես մի քիչ հայտարարությանը, այն կգործի որպես օղակ, մինչև փաստարկն այլևս չհանդիպի: Այսպիսով, եթե շարունակեք ոչ -ին հարվածելը, այն կշրջվի, բայց մեկ անգամ այո հարվածելիս այն կազատվի օղակից և կշարունակի սցենարը: Պահեք ֆայլը, բայց սպասեք այն գործարկելուն մինչև հաջորդ քայլին: Մինչ այժմ ձեր ծածկագիրը պետք է լինի. enter} "wscript.sleep 200shellobj.sendkeys" ipconfig /release {enter} exit {enter} "Dim MyVarmyvar = 2 while myvar = 2MyVar = MsgBox (" Միացնել ինտերնետային կապը ", 65," Միացնել ինտերնետ կապը ")

Քայլ 10: Քայլ 7: Ինտերնետը նորից միացնելը:

Այժմ, երբ ինչ -որ մեկը վերջապես կտտացրեց այո և այն անցավ while հայտարարությունը, մենք պետք է միացնենք ինտերնետին: Ես սովորաբար բացում եմ հաստատում, որպեսզի վերջնական օգտագործողը իմանա, թե ինչ է կատարվում, բայց դա զուտ ընտրովի չէ: Հաստատման տեսակը բացելու համար ՝ msgbox («Այժմ մենք նորից կմիացնենք ինտերնետային կապը !!!») Ինչ է դա անում. Այն ուղարկում է հաղորդագրությունների տուփ, որտեղ ասվում է. Այժմ մենք նորից կմիացնենք ինտերնետ կապը !!! և կտա ձեզ OK կոճակ կտտացնելու համար: Այժմ մեզ մնում է միայն միացնել ինտերնետը և փակել ամեն ինչ: Ինտերնետը նորից միացնելու համար մենք պարզապես բացում ենք հրամանի տող, որը սահմանում է ժամաչափը, այնուհետև նորից օգտագործում ipcionfig: դա անելու համար մուտքագրեք ՝ shellobj.run "cmd" wscript.sleep 200shellobj.sendkeys "ipconfig /rinu {enter}" Ինչ է անում. այն հակադարձում է նախկինում անջատված հրամանը և նորացնում ձեր IP հասցեն: Ձեր IP հասցեն թարմացնելուց հետո կարող եք նորից ինտերնետ կապեր ստանալ: Այժմ մեզ մնում է մաքրել բաց պատուհանները: Կրկին մենք կարող ենք օգտագործել sendkeys հրահանգը, բայց ես պարզապես կցեմ վերջին տողը `մաքրումները նույնպես անցկացնելու համար: Այս դեպքում ես պատրաստվում եմ օգտագործել taskkill ծրագիրը `նկարը ցուցադրող ծրագիրը սպանելու համար: Այս դեպքում դա Windows- ի պատկերների և ֆաքսերի դիտիչ է և առաջադրանքի մենեջերի գործընթացների ներդիրում ցուցադրվում է որպես rundll32.exe, այնպես որ դա այն է, ինչ մեզ պետք է սպանել: Եթե ձեր նկարը բացվում է մեկ այլ ծրագրի միջոցով, օրինակ ՝ irfanview կամ acdsee, գտեք այն անվանումը, որն անցնում է գործընթացների ներդիրում և տեղադրեք rundll32.exe- ն ՝ գտած անունով: Հրամանը կլինի ՝ taskkill /F /IM rundll32.exe Ինչ է դա անում է. taskkill- ը ծրագրի անվանումն է, որը /F անջատիչն ասում է նրան, որ ստիպի սպանել, և /IM անջատիչն ասում է պատկերի անունը: exit հրամանը և մեկ այլ մուտքագրեք, և այն հետևյալ տեսքն ունի.

Քայլ 11: Պատրաստի արտադրանք:

Եթե ամեն ինչ ճիշտ է ընթանում, ապա պատրաստի արտադրանքը պետք է ունենա այսպիսի տեսք. 200shellobj.sendkeys "ipconfig /release {enter} exit {enter}" Dim MyVarmyvar = 2 while myvar = 2MyVar = MsgBox ("Միացնել ինտերնետային կապը", 65, "Միացնել ինտերնետ կապը") wendmsgbox ("Այժմ մենք կմիացնենք ինտերնետը Միացումը նորից միացված է !!! ") shellobj.run" cmd "wscript.sleep 200shellobj.sendkeys" ipconfig /rinew {enter} taskkill /F /IM rundll32.exe {enter} exit {enter} "_script of script_Now that the programming is Դուք կարող եք գործարկել ծրագիրը: Ինչ պետք է տեղի ունենա. բայց դուք դա չեք տեսնի 3)): Ձեր նկարը պետք է բացվի: 4): Դուք պետք է բացվող պատուհան ունենաք ՝ հարցնելով, արդյոք ցանկանում եք նորից միացնել ինտերնետը: 5): Դուք կրկին աշխատում եք ՝ հարցնելով, թե արդյոք ցանկանում եք նորից միացնել ինտերնետը: 6): Այո սեղմելուց հետո հաղորդագրության տուփը պետք է անհետանա, և CMD պատուհանը պետք է կրկնվի: 7) IP հասցեի թարմացումից հետո CMD պատուհանը և նկարը: պետք է փակվի: Այնտեղ ունեք Շատ հեշտ VBscript ՝ ձեր ինտերնետը միացնելու և անջատելու համար: Հուսով եմ, ձեզ դուր է գալիս. Ես իրականում պատրաստեցի մեկ այլ սցենար, որը գրեթե նույնական է այս սցենարին, որն անջատում է ցանցի ադապտերները ՝ օգտագործելով DevCon կոչվող ծրագիրը, որը նման է հրամանի տողի սարքի կառավարիչին: Իրականում լավ է աշխատում: Script- ը նույնական է այս մեկին, բացառությամբ այն դեպքերի, երբ այս մեկում այն ունի ipconfig- ի հրամաններ, որոնցից մեկը DevCon- ի համար հրամաններ ունի: