Բովանդակություն:

Vbs Net Send Messenger: 3 քայլ
Vbs Net Send Messenger: 3 քայլ

Video: Vbs Net Send Messenger: 3 քայլ

Video: Vbs Net Send Messenger: 3 քայլ
Video: VBScript Basics, Part 3 | If - ElseIf - Else - Then Statements 2024, Նոյեմբեր
Anonim
Vbs Net Send Messenger
Vbs Net Send Messenger

Ահա այն խրատը, թե ինչպես կարելի է կատարել Net Send Messenger ՝ օգտագործելով Visual Basic Script (vbs): Ես խմբաքանակի փոխարեն օգտագործել եմ vbs, քանի որ չեմ սիրում խմբաքանակ օգտագործել: Խմբաքանակը չափազանց պարզ է: Տեղեկացնելու համար, որ սա իմ առաջին հրահանգն է: Հուսով եմ ձեզ դուր կգա: Եթե ցանկանում եք, մեկնաբանեք:

Քայլ 1: Քայլ 1… Սցենարի գրառում

Քայլ 1… Սցենարը գրել
Քայլ 1… Սցենարը գրել

Բացեք NotePad- ը և պատճենեք և տեղադրեք այս ծածկագիրը Notepad. Dim xDim yset oShell = createobject ("wscript.shell") x = InputBox ("Մուտքագրեք օգտվող կամ IP", "Net Send Messenger.. script by Cavingboy92") y = InputBox ("Enter Messege", "Net Send Messenger.. script by Cavingboy92") oshell.run "net send" & (x) & "" & (y) & ""

Քայլ 2: Քայլ 2 … Սցենարի մեկնաբանում

Dim x = փոփոխականների հայտարարումԴիմ y = փոփոխականների հայտարարում oShell = createobject ("wscript.shell") = կանչում և դարձնում է objectx = InputBox ("Մուտքագրեք օգտվողին կամ IP- ին", "Net Send Messenger.. script by Cavingboy92") = Ձեզանից հարցնում է username or IP.y = InputBox («Մուտքագրեք Messege», «Net Send Messenger.. script by Cavingboy92») = Մուտքագրեք messegeoshell.run «net send» & (x) & "" & (y) & "" = ցանցը սկսում է ուղարկել և մուտքագրել օգտվողի անունը/ IP- ն և ուղարկել ծրագիրը: Հետո այն ուղարկում է:

Քայլ 3: Քայլ 3… Պահեք Script- ը և փորձարկեք Messenger- ը

Քայլ 3… Script- ի պահում և փորձարկում Messenger- ը
Քայլ 3… Script- ի պահում և փորձարկում Messenger- ը
Քայլ 3… Script- ի պահում և փորձարկում Messenger- ը
Քայլ 3… Script- ի պահում և փորձարկում Messenger- ը
Քայլ 3 … Պահեք Script- ը և փորձարկեք Messenger- ը
Քայլ 3 … Պահեք Script- ը և փորձարկեք Messenger- ը

Երբ սցենարը պատճենված և տեղադրված լինի NotePad- ում, դուք պետք է այն պահեք: Պահեք սցենարը որպես Messenger.vbs Վայելեք:

Խորհուրդ ենք տալիս: