Компьютерээ автоматаар унтрааж, хүссэн цагийг нь тохируулах замаар програмчлах: 4 алхам

2024 Зохиолч: John Day | [email protected]. Хамгийн сүүлд өөрчлөгдсөн: 2024-01-30 11:06

Хөөе, энэ бол миний өдөр тутмын амьдралаас авсан өөр нэг заавар юм …

Хамгийн сүүлд би маш олон програм хангамжийг компьютер дээрээ татаж аваад нэг шөнийн дотор татаж авахыг зөвшөөрсөн боловч татаж аваад дуусаад шөнөжингөө компьютерээ асаахыг хүсээгүй бөгөөд үүнийг хүлээхийн тулд сэрүүн байж чадсангүй. татаж аваад дуусгахын тулд унтраана уу! Тиймээс би компьютерийг интерактив байдлаар автоматаар унтраах боломжийг олгодог VBscript хийлээ! Татаж авахад хэр их хугацаа шаардагдахыг харгалзан унтрахаасаа өмнө компьютерийг асаах минутыг зааж өгдөг, үүнд би бага зэрэг нэмэлт цаг өгдөг. Татаж авахад шаардагдах хугацааны дараа унтрааж, хурд буурах магадлалтай ч гэсэн би сэрүүн байж, шөнөжингөө компьютерээ асаахгүй, юу ч хийхгүй байх болно! Энэ тохиолдолд компьютер нь хэрэглэгчидтэй харилцан үйлчлэх болно, учир нь би түүнд зарим дуу хоолой, өгүүллэг нэмж оруулсан болно! Тиймээс миний зааварчилгааг анхаарч үзээрэй! мөн хэрэв танд таалагдаж байвал сэтгэгдлээ бичээрэй! баярлалаа

Алхам 1: Скрипт бичихээс эхэлнэ үү …

Notepad -ийг нээгээд дараах скриптийг тэмдэглэлийн дэвтэрт бичнэ үү: Dim xDim yset oShell = createobject ("wscript.shell") Sapi = Wscript. CreateObject ("SAPI. SpVoice") -ийг тохируулна уу x = InputBox ("Та компьютерээ унтраасны дараа Хариулт: тийм/үгүй "," АВТОМАТ СИСТЕМИЙГ ХААХ! SCRIPTmaster -ээр ") хэрэв x =" тийм "бол y = InputBox (" Автоматаар унтрах хүртэл үлдсэн хугацааг оруулна уу (минутаар …): ", "AUTOMATIC SYSTEM SHUTDOWN!") Sapi.speak y + "унтрахад минут үлдсэн" oShell. Run "shutdown.exe -s -t" & (y * 60) & "-f -c" "Систем автоматаар тохируулагдсан болно. татан авалт дуусахыг хүлээх хэрэггүй, унтаж болно! САЙН ШӨНӨ! u 2morow -ийг үзнэ үү! >>>> энэ автомат унтраалтыг цуцлахын тулд скриптийг дахин ажиллуулаад x = "үгүй бол no" "төгсгөлийг бичнэ үү. "Дараа нь sapi.speak" за, баяртай гэж хэлэхэд скриптийг бичсэн Айман Фархат SCRIPTmaster "oShell.run" shutdown.exe -a "төгсгөлтэй бол

Алхам 2: Скрипт дэх кодын дэлгэрэнгүй тайлбар …

Dim x ба Dim y /// нь x ба y хувьсагчдыг хариулт, цагийг хариуцдаг гэж зарлана. OShell = createobject ("wscript.shell") /// нь OS бүрхүүлийг дуудаж, wscript.shellSet Sapi = объектыг үүсгэдэг. Wscript. CreateObject ("SAPI. SpVoice") /// нь SAPI цонхнуудыг дуудаж, хэрэглэгчдэд хэлж өгөхдөө энэхүү скрипт дэх яриаг хариуцдаг SAPI. SpVoice объектыг үүсгэдэг … x = InputBox ("Та унтраахыг хүсч байна уу? Хэсэг хугацааны дараа таны компьютер? хариулт: тийм/үгүй "," АВТОМАТ СИСТЕМ ХААГДСАН! "/// хэрэв хэрэглэгч x =" тийм "бол /// бол компьютерээ унтраахыг хүсч байгаа бол хэрэглэгчийн хэлж буй оролтыг дуудна. салбарласан мэдэгдэл = InputBox ("Унтраалт автоматаар явагдахын тулд үлдсэн хугацааг оруулна уу (хэдэн минутын дотор …):", "АВТОМАТ СИСТЕМ ХААГДАХ!") // хэрэв хэрэглэгч тийм гэж сонговол үлдсэн хугацааг тохируулах өөр оролт танд амласан байна. унтраахад sapi.speak y + "унтраахад хэдэн минут үлдсэн" /// цонхнууд SAPI нь үлдсэн минутуудыг уншдаг oShell. Run "shutdown.exe -s -t" & (y * 60) & "-f -c" "System Одоо автоматаар унтрахаар тохируулав! Татаж авахыг хүлээх хэрэггүй, та унтаж болно! ШӨНӨ ШӨНӨ! 2 -р уулзацгаая! >>>> Энэхүү Автомат унтраалтыг зогсоохын тулд скриптийг дахин ажиллуулаад "" "/// гэж бичнэ үү. Энэ бол системийг унтраах ажиллуулах боломжтой гэж нэрлэдэг бөгөөд энэ тохиолдолд компьютерийг өгөгдсөн цагийн дагуу унтраадаг. хувьсагч y! төгсгөл бол // эхний if if төгсдөг бол энэ тохиолдолд тийм бол x = "үгүй" бол // бол өөр хариулт өгөхгүй байх үүргийг хариуцна. by Ayman Farhat SCRIPTmaster "/// SAPI нь хэрэглэгчтэй ярилцаж, түүнд баяртай гэж хэлээрэй oShell.run" shutdown.exe -a " / /Энэ тохиолдолд shutdown.exe -ийг дууддаг бөгөөд үүнийг унтрааж болохгүй гэж хэлдэг. -a! end if // if if -ийн төгсгөл! гэдэг нь тодорхой боловч дэлгэрэнгүй тайлбар байсан бол юу хийхээ мэдэхийн тулд дараагийн алхам руу орно уу …

Алхам 3: Скриптээ хадгалах

Тэмдэглэлийн дэвтэр бичихийн тулд скриптээ оруулсны дараа та үүнийг хадгалах ёстой.

Хадгалах дээр дарж, файлынхаа нэрийг бичиж буй газарт зургийн дагуу үзүүлсэн файлынхаа нэрийг оруулна уу.

Алхам 4: Скриптээ ажиллуулна уу …

дөнгөж хадгалсан VB програм дээрээ хоёр дарж ид шидийг үзээрэй!

Зураг дээр үзүүлсэн шиг хаах эсвэл унтраах хүсэлтэй байгаа бол танд анхны оролт өгөх болно. хэрэв та "үгүй" гэж бичээд унтраахаар шийдээгүй бол програм автоматаар дуусах болно … хэрэв та тийм гэж бичээд унтраахаар шийдсэн бол зураг дээр үзүүлсэн шиг таны компьютерийг хэдэн минутын турш асаахыг хүссэн өөр оролт гарч ирэх болно. доор тэгээд хэрэв та ямар нэгэн шалтгаанаар энэ унтраалтаа зогсоохыг хүсвэл програмыг дахин ажиллуулаад no гэж бичээд автоматаар дуусах болно. Тиймээс энэ нь маш олон компьютер хэрэглэгчдийн зовж шаналж буй асуудлын шийдэл байсан юм! Хэрэв танд таалагдсан бол миний зааварчилгаа таалагдсан гэж найдаж байна, сэтгэгдлээ үлдээнэ үү, би танаас сонсоход таатай байх болно. АМЖИЛТ, АМЖИЛТТАЙ ШӨНӨ!