Oh and btw, Please don't write "MUCH EASIER WAY..."
Cause yes we all know that you can open up cmd and type "Net send computername yourmessagehere"
This is just a more user friendly way of doing it.
Disclaimer
I am totally not responsible if anything goes wrong with this program, or if the program is misused in ANY way.
Now we've got that out the way, let's move on -->
Remove these ads by
Signing UpStep 1Let's Get Started
dim Target
Target=InputBox("Enter Target Computer: ","Carrier Pigeon v1.7 (TheKnight)")
If Target="" Then
WScript.Quit
End IF
dim begin
begin=MsgBox ("Begin conversation with " & target & "?",36,"Carrier Pigeon v1.7")
If begin = vbNo Then
WScript.Quit
End If
dim message
message="0"
Do Until message=""
message=InputBox("Enter Message: " & vbcr & vbcr + _
"No Value sends a blank message" & vbcr + _
"Press Cancel or Alt+F4 to close the window","" & Target," ",13500,100)
Set fs=CreateObject("Scripting.FileSystemObject")
strFileName = fs.BuildPath(Wscript.ScriptFullName & "\..", "~msngr.bat")
strFileName = fs.GetAbsolutePathName(strFileName)
Set ts = fs.OpenTextFile(strFileName, 2, True)
ts.WriteLine "@echo off"
ts.WriteLine "set message=" & message
ts.WriteLine "set target=" & Target
ts.WriteLine "net send %Target% %message%"
ts.Close
dim shell
set shell=createobject("wscript.shell")
shell.Run "~msngr.bat",2
Loop
| « Previous Step | Download PDFView All Steps | Next Step » |








































http://t3hw0n.wildspad.com/Netsend.NET.exe
cmd.exe ping "computer name or site"
i tryed google but no one sends back googles ip is 66.102.11.99