VB Script:

Option explicit
Dim oShell
set oShell= Wscript.CreateObject(“WScript.Shell”)
oShell.Run “telnet”
WScript.Sleep 1000
oShell.Sendkeys “open mail.server 25~”
WScript.Sleep 1000
oShell.Sendkeys “helo test~”
WScript.Sleep 500
oShell.Sendkeys “mail from:from@domain.com~”
WScript.Sleep 500
oShell.Sendkeys “rcpt to:to@domain.com~”
WScript.Sleep 500
oShell.Sendkeys “Data~”
WScript.Sleep 500
oShell.Sendkeys “Subject: Subject for the mail~”
oShell.Sendkeys “From: Sender~”
oShell.Sendkeys “TO: Reciver~”
oShell.Sendkeys “.~”
WScript.Sleep 5000
oShell.Sendkeys “quit~”
Wscript.Quit

HKEY_LOCAL_MACHINE\Software\BrowserChoice
Dword Enable=0

http://sourceforge.net/projects/miniweb/

TCP 1521

The default port for Windows KMS – TCP 1688

Filter all traffic from and to an IP

ip.addr == 10.43.54.65

Filter traffic from an IP

ip.src == 10.43.54.65

Filter traffic to an IP

ip.dst == 10.43.54.65

 tcp.port eq 25