Mundarija:

VBScript ekran qulfi: 6 qadam
VBScript ekran qulfi: 6 qadam

Video: VBScript ekran qulfi: 6 qadam

Video: VBScript ekran qulfi: 6 qadam
Video: интересные vbs скрипты 2024, Iyul
Anonim
VBScript ekran qulfi
VBScript ekran qulfi
VBScript ekran qulfi
VBScript ekran qulfi
VBScript ekran qulfi
VBScript ekran qulfi

Men Internetda juda ko'p ekran qulflarini ko'rganman, shuning uchun men buni qilishga harakat qildim. Men uni nashr etishga qaror qildim, chunki agar sizda parol bo'lmasa, kompyuterni qulflash juda foydali bo'lishi mumkin. Shunday qilib, men sizga buni qanday qilishni o'rgataman. Yoki oldindan tayyorlaganimni yuklab olish uchun 6-bosqichga o'ting.

Bu dastur unchalik murakkab emas, faqat kompyuterni faylga kiritgan parolingiz bilan qulflash kifoya. PS: bekor qilish tugmasi ishlamaydi = D.

Dastur VBScript yordamida yaratilgan.

QAYD: Agar siz vbscript -ni bilmasangiz, mana bu erda sizga yordam beradigan kirish, LINK (lekin agar siz vbs yoki VB. NET haqida asosiy ma'lumotga ega bo'lsangiz, bu skriptni tushunish oson bo'lishi kerak = D)

DIQQAT: Agar siz bepul vbseditorga qiziqsangiz, quyida bittasi ilova qilingan. Men ishlatadigan vbsedit ham bor.

1 -qadam: Mening skriptim …

Bu erda skriptning ikkita versiyasi ….

Operatsion tizimingiz uchun to'g'ri birini tanlang.

Zip faylini yuklab oling va chiqarib oling, so'ngra Screen Lock.vbs-ni o'ng tugmasini bosing va har qanday matn muharriri bilan tahrir qiling, Oynani maksimal darajada oshirishga ishonch hosil qiling.

2 -qadam: Parolingiz

Parolingiz
Parolingiz

Parolni o'rnatish uchun, parolni fayldagi tirnoq orasiga kiriting. Parollar katta -kichiklarga sezgir.

Bu skriptning ishlash usuli shundaki, u kompyuter qulflangan paytda ruxsatsiz o'zgarishlarning oldini olish uchun bir nechta ctrl-alt-delete variantlarini o'chirib qo'yadi. To'g'ri parolni kiritganingizda, ularni qayta yoqing.

ESLATMA: Vbs -da parolni kiritishni niqoblashning iloji bo'lmagani uchun, men dasturni ekranning pastki qismiga sudrab olib borishni maslahat beraman, shunda kirish bo'limi yashiriladi va keyin parolni kiritiladi

3 -qadam: Maxsus xabar …

Maxsus xabar…
Maxsus xabar…
Maxsus xabar…
Maxsus xabar…
Maxsus xabar…
Maxsus xabar…

Agar foydalanuvchi blokirovkani bekor qilmoqchi bo'lsa, kirish ekranida paydo bo'ladigan xabarni tahrirlashingiz mumkin. Matnni sozlash uchun, rasmdagi kabi skriptdagi tirnoq orasiga o'z xabaringizni kiriting.

4 -qadam: Disk qulfini qo'shish …

Drayv shkafi qo'shilmoqda…
Drayv shkafi qo'shilmoqda…
Drayv shkafi qo'shilmoqda…
Drayv shkafi qo'shilmoqda…
Drayv shkafi qo'shilmoqda…
Drayv shkafi qo'shilmoqda…

Agar siz mening VBScript Drive Lock -ni ko'rgan bo'lsangiz, vbs yordamida drayverlarni qulflash mumkinligini bilasiz. Shunday qilib, men sizga ekran qulfiga qanday kirishni o'rgataman. ESLATMA: Bu ixtiyoriy xususiyat, u odatiy skriptda yoki 6-qadamda oldindan tayyorlanmagan.

Shunday qilib, avval bloknotni oching va quyidagi ma'lumotlarni joylashtiring:

Objshell. RegWrite "HKCU / Software / Microsoft / Windows / CurrentVersion / Policies / Explorer / NoViewOnDrive", 67108863, "REG_DWORD"

Avval siz "67108863" raqamini ko'rasiz. Bu raqam qaysi drayverni qulflash kerakligini ko'rsatadi. Odatiy bo'lib, dastur barcha drayverlarni qulflaydi, lekin agar siz faqat bitta diskni qulflashni xohlasangiz, qaysi raqamni bilish uchun ushbu jadvalga qarashingiz kerak bo'ladi:

A - 1, B - 2, C - 4, D - 8, E - 16, F - 32, G - 64, H - 128, I - 256, J - 512, K - 1024, L - 2048, M - 4096, N - 8192, O - 16384, P - 32768, Q - 65536, R - 131072, S - 262144, T - 524288, U - 1048576, V - 2097152, V - 4194304, X - 8388608, Y - 16777216, Z - 33554432, ALL - 67108863

Masalan, agar men C diskini qulflashni xohlasam, 67108863 ni 4 ga almashtirardim.

Endi ushbu kodni vbscript -ga 1 -rasmdagi joy sifatida joylashtiring.

Endi foydalanuvchi to'g'ri parolni kiritgandan so'ng, drayverlarni qulfini ochish funktsiyasini qo'shish uchun, bu kodni 2 -rasmdagi kabi vbscriptga joylashtiring.

Objshell. RegDelete "HKCU / Software / Microsoft / Windows / CurrentVersion / Policies / Explorer / NoViewOnDrive"

Shunday qilib, endi siz drayverni qulflash xususiyatini o'rnatdingiz va keyingi bosqichga o'tishingiz mumkin!

QAYD: Agar siz parolni unutgan bo'lsangiz, drayverlarni qulfdan chiqarish uchun regedit -ni oching va unga o'ting (3 -rasm).

HKEY_CURRENT_USER / Software / Microsoft / Windows / CurrentVersion / Policies / Explorer

NoViewOnDrive -ni o'ng tugmasini bosing va O'chirish -ni bosing. O'zgarishlarni ko'rish uchun hisobingizga kiring va kiring.

5 -qadam: Faylni ishga tushirishga qo'shish …

Fayl ishga tushirilishga qo'shilmoqda…
Fayl ishga tushirilishga qo'shilmoqda…

Agar siz Windows xp -dan foydalanmasangiz, bu faylni ishga tushirishga qo'shish uchun, avval siz hech qachon xabar bermaslik uchun administrator ko'rsatmalarni o'zgartirishingiz kerak, shunda u kompyuteringizni avtomatik ravishda qulflaydi.

Keyin.vbs faylining yorlig'ini yarating, faylni ishga tushirish papkasiga suring. Mana buni qanday qilish haqida batafsil ma'lumotga ega havola: LINK

QAYD: Bu dasturni barcha dasturlarning sozlamalarini o'zgartirmasdan, administrator sifatida avtomatik ravishda ishga tushirishning yana bir usuli bor, agar qiziqsangiz, bu erni bosing.

6 -qadam: Umid qilamanki, bu foydali bo'ldi

Umid qilamanki, bu foydali bo'ldi!
Umid qilamanki, bu foydali bo'ldi!
Umid qilamanki, bu foydali bo'ldi!
Umid qilamanki, bu foydali bo'ldi!

Umid qilamanki, bu foydali bo'ldi va agar sizga yordam kerak bo'lsa yoki savollaringiz/xavotirlaringiz bo'lsa, iltimos, menga yozing yoki izoh qoldiring.

Agar siz ushbu skript qanday ishlashi haqida ko'proq bilmoqchi bo'lsangiz, iltimos, menga yozing va men buni iloji boricha tushuntirib beraman.

Bundan tashqari, agar siz faylni o'zingiz yaratishni xohlamasangiz, men har safar.vbs -ni ishga tushirganingizda o'z parolingizni o'rnatgan bo'lardim, masalan, yuqoridagi rasmda.

Tavsiya: