探测外网 上传ＩＰ 实现花生壳功能 ３０块 请留下微信转账

穆德顺

要求　　每５分钟探测外网ＩＰ地址　后，　修改指定ＩＰ．ＴＸＴ文件里面的ＩＰ地址　　（其中ＩＰ．ＴＸＴ文件中还有其他内容

，内容有５－１０行　，上下排列，　内容有数字符号文字组成　只修改其中的ＩＰ地址　例如　：


电信专区|劲爆传奇一区|劲爆传奇|xxx.xxx.xxx.xxx|7000|123456
　　　　　　　　　　　　　　　↑↑↑↑↑↑↑↑
　　　　　　　　　　　　　　　需要修改的ＩＰ地址位置

电信专区|劲爆传奇二区|劲爆传奇|xxx.xxx.xxx.xxx|700２|123456
　　　　　　　　　　　　　　　↑↑↑↑↑↑↑↑
　　　　　　　　　　　　　　　需要修改的ＩＰ地址位置

电信专区|劲爆传奇三区|劲爆传奇|xxx.xxx.xxx.xxx|700３|123456
　　　　　　　　　　　　　　　↑↑↑↑↑↑↑↑
　　　　　　　　　　　　　　　需要修改的ＩＰ地址位置

电信专区|劲爆传奇四区|劲爆传奇|xxx.xxx.xxx.xxx|700４|123456
　　　　　　　　　　　　　　　↑↑↑↑↑↑↑↑
　　　　　　　　　　　　　　　需要修改的ＩＰ地址位置

↓
↓
↓
↓
↓
↓
十区


运行完后上传至ＦＴＰ替换ＦＴＰ中的ＩＰ．ＴＸＴ文件，实现动态ＩＰ实时更新。


需求说明　把家用的ＡＤＳＬ的动态ＩＰ，外网每５分钟一次扫描　防止停电后　ＩＰ变化后　找不到服务器　相当于是花生壳功能。

xp3000

第三方下载工具curl下载地址，7.59.0就行
http://bcn.bathome.net/s/tool/index.html?key=curl
第三方查找字符串工具grep下载地址，2.22就行
http://bcn.bathome.net/s/tool/index.html?key=grep
第三方字符串替换工具sed下载地址，2.22就行
http://bcn.bathome.net/s/tool/index.html?key=sed
放入C:\Windows\System32文件夹

@echo off&setlocal EnableDelayedExpansion 
CD /D "%~dp0"
:2
if errorlevel 0 goto 0
if errorlevel 1 goto 1
:0
echo 当前时间 %time%
@for /f "tokens=1-7 delims=^|" %%a in ('type ip.txt') do (set N=%%d
    for /f "delims=" %%j in ('curl "http://www.bathome.net/s/ip.php"^|grep -oP "\d+\.\d+\.\d+\.\d+"') do (set M=%%j
if !N! equ !M! (
echo ip相同，不替换
) else (
cls
echo !N!替换!M!
sed -i "s/!N!/!M!/g" ip.txt
    )
  )
)
ftp -s:ftp.txt
ping -n 300 127.1>nul
 
goto :2
:1
echo ……
pauseCOPY

下面内容保存为ftp.txt

open ip 端口
用户名
密码
MDELETE ip.txt
y
put ip.txt ip.txt
byeCOPY

假设ftp://192.168.2.100端口2121
用户名：ftp
密码：123456

open 192.168.2.100 2121
ftp
123456
MDELETE ip.txt
y
put ip.txt ip.txt
byeCOPY

ftp服务器的文件夹必须允许读写删除