„Vbs Net Send Messenger“: 3 žingsniai
„Vbs Net Send Messenger“: 3 žingsniai

Turinys:

Anonim

Čia yra instrukcija, kaip sukurti „Net Send Messenger“naudojant „Visual Basic Script“(vbs). Vietoj partijos naudojau vbs, nes nemėgstu naudoti partijos. Paketas per paprastas. Tiesiog norėdamas jums pranešti, tai yra mano pirmasis pamokymas. Tikiuosi, kad jums patinka! Jei norite, pakomentuokite!

1 žingsnis: 1 žingsnis… Scenarijaus rašymas

Atidarykite „NotePad“ir nukopijuokite bei įklijuokite šį kodą į Notepad. Dim xDim yset oShell = createobject ("wscript.shell") x = InputBox ("Įveskite vartotoją arba IP", "Net Send Messenger.. script by Cavingboy92") y = InputBox ("Enter Messege", "Net Send Messenger.. scenarijus pagal Cavingboy92") oshell.run "net send" & (x) & "" & (y) & ""

2 žingsnis: 2 žingsnis… Scenarijaus aiškinimas

Dim x = deklaruoti kintamuosiusDim y = deklaruoja kintamuosius username arba IP.y = InputBox ("Enter Messege", "Net Send Messenger.. script by Cavingboy92") = Įveskite messegeoshell.run "net send" & (x) & "" & (y) & "" = pradeda tinklą siųsti ir įvesti vartotojo vardą/ IP ir programą į programą. Tada jis siunčia.

3 veiksmas: 3 veiksmas… Įrašomas scenarijus ir tikrinama „Messenger“

Kai scenarijus nukopijuojamas ir įklijuojamas į „NotePad“, turite jį išsaugoti. Išsaugokite scenarijų kaip „Messenger“. Vbs*Kai tai padarysite, išbandykite. Jei turite kokių nors problemų, pasiūlymų ar klausimų, atsiųskite man pranešimą. Mėgautis!