Мазмуну:

Vbs Net Send Messenger: 3 кадам
Vbs Net Send Messenger: 3 кадам
Anonim
Vbs Net Send Messenger
Vbs Net Send Messenger

Бул жерде Visual Basic Script (vbs) аркылуу Net Send Messengerди кантип жасоо боюнча көрсөтмө бар. Пакет өтө жөнөкөй. Сизге билдирүү үчүн, бул менин биринчи үйрөткүчүм. Сизге жагат деген үмүттөмүн! Кааласаңыз комментарийге жазыңыз!

1 -кадам: 1 -кадам … Сценарийди жазуу

1 -кадам… Скрипт жазуу
1 -кадам… Скрипт жазуу

NotePadти ачыңыз жана бул кодду Notepadге көчүрүп чаптаңыз. Dim xDim yset oShell = createobject ("wscript.shell") x = InputBox ("Колдонуучуну же IPди киргизиңиз", "Cavingboy92 тарабынан Net Send Messenger.. скрипти") y = InputBox ("Messege'ге кирүү", "Net Send Messenger.. сценарийи Cavingboy92") oshell.run "net send" & (x) & "" & (y) & ""

2 -кадам: 2 -кадам … Сценарийди чечмелөө

Dim x = өзгөрмөлөрдү жарыялоо username же IP.y = InputBox ("Messege'ге кирүү", "Net Send Messenger.. script by Cavingboy92") = Messegeoshell.run "net send" & (x) & "" & (y) & "" = net баштайт жөнөтүү жана колдонуучунун атын/ IP киргизүү жана программасына messege. Андан кийин аны жөнөтөт.

3 -кадам: 3 -кадам… Скриптти сактоо жана Messengerди текшерүү

3 -кадам… Скриптти сактоо жана кабарчыны текшерүү
3 -кадам… Скриптти сактоо жана кабарчыны текшерүү
3 -кадам… Скриптти сактоо жана кабарчыны текшерүү
3 -кадам… Скриптти сактоо жана кабарчыны текшерүү
3 -кадам… Скриптти сактоо жана кабарчыны текшерүү
3 -кадам… Скриптти сактоо жана кабарчыны текшерүү

Сценарийди көчүрүп, NotePadка койгондон кийин, аны сактап калууңуз керек. Сценарийди Messenger.vbs катары сактаңыз*Эгер сиз муну текшерип бүткөндөн кийин. Эгер кандайдыр бир көйгөйлөр, сунуштар же суроолор болсо, мага билдирүү жөнөтүңүз. Ырахат алыңыз!

Сунушталууда: