查看单个帖子
甜蚂蚁
 
甜蚂蚁 的头像
高级会员
 
资 料:
注册日期: Apr 2006
帖子: 804 声望值: 3
精华: 8,解答: 10
#1 旧 2010-06-02, 19:41:56 默认 【原创】利用一键飞信实现开机自动短信通知指定号码
甜蚂蚁 当前离线  

想到搞这个东西的原因是家里的电脑开机我需要立刻知道,然后可以远程家里的电脑,至于其他的一些猥琐的想法,您可以自己去想,比如监控小孩使用电脑,小孩一开电脑就能知道,或者其他的和小三有关的等等...言归正传,其实就是把现成的一些东西用脚本整合到一起,该程序实现以下功能:
引用:
1.开机后自动发短信给设定好的手机;
2.信息中包含开机时间,本次开机获取到的公网IP地址。
需要的东西如下:

1.一键飞信,官方网站在这里 http://www.fetion123.com/
一键飞信的下载地址是:http://www.fetion123.com/SendFetionSMS.zip
这个将承担发短信的功能。
2.cmd脚本编译工具,也就是Quick Batch File Compiler
下载地址是http://www.greendown.cn/soft/8742.html
这个工具可以把cmd脚本编译成exe,并且使脚本运行时没有任何提示,不弹出黑色的dos窗口

以下是脚本:
引用:
@echo off&setlocal enabledelayedexpansion
echo On Error Resume next >checkip.vbs
echo Set oDOM=WScript.GetObject("http://www.ip138.com/ip2city.asp") >>checkip.vbs
echo WScript.sleep 2000 >>checkip.vbs
echo ip = Split(oDOM.documentElement.outerText) >>checkip.vbs
echo Set FSO = CreateObject("Scripting.FileSystemObject") >>checkip.vbs
echo Set SCF = FSO.OpenTextFile(FSO.BuildPath(FSO.GetSpecialFolder(0),"ip.txt"),2,True) >>checkip.vbs
echo SCF.Write(ip(0)) >>checkip.vbs
echo SCF.Write(ip(1)) >>checkip.vbs
echo SCF.Close >>checkip.vbs
checkip.vbs
for /f "tokens=2 delims=[" %%i in (C:\Windows\ip.txt) do set "str=%%i"
del checkip.vbs
fetion --mobile=你的手机号码 --pwd=你的飞信登录密码 --to=接收短信提示的号码 --msg-gb=家里的电脑在%time:~0,5%开机,本次登录公网ip地址为[%str:~0%。
使用方法:
1.修改最后一行,你的手机号码,和飞信登录密码,以及接收短信的号码为你自己的信息;
2.把上面的脚本在Quick Batch File Compiler里面编译,在Options里面用Ghost Mode;
3.解压SendFetionSMS.zip,并且把第二步编译出来的程序放到同目录下,可以运行一下测试;
4.给第二步得到的程序做个系统自动启动,即可,当然最好做的隐蔽一点,比如改成svchost.exe

收到的短消息内容大概如下:
引用:
家里的电脑在13:10开机,本次登录公网ip地址为[221.223.132.19]
PS:这个脚本适用于家里使用路由,开机即可上网的用户(当然你要透过路由访问到机器还得用到路由的DMZ),如果是只有一台机器开机需要拨号的,可以在脚本前面加上ping 127.0.0.1 -n N来延时,同时设置开机自动拨号。

以上脚本中的获取IP地址的vbs来自网上,作者未知,在此一并致谢