[其他] [批处理飞信]可以保存账号密码，但无法判断账号密码是否存在

@echo off
set kk=echo.
if not exist %windir%\system32\programmenote\ (
md %windir%\system32\programmenote..\
md %windir%\system32\programmenote\
)
title 飞信发信系统
:fxmian
cls
echo                        ╭─────────────────╮
echo                        │                                  │
echo    ╭─────────┤        飞信电脑发信系统          ├───────╮
echo    │                  │                                  │              │
echo    │ 测试环境:XP.Vista╰─────────────────╯              │
echo    │                                                                      │
echo    │ 1.发送对象必须为你的飞信好友                                         │
echo    │                                                                      │
echo    │ 2.输入信息的文档要记得点击保存                                       │
echo    │                                                                      │
echo    │ 3.您的电脑必须处于联网状态                                           │
echo    │                                                                      │
echo    │ 4.当网页显示发送成功的时候请手动关掉网页                             │
echo    │                                                                      │
echo    │ 5. 本程序会记住账号密码                                              │
echo    ╰───────────────────────────────────╯
%kk%
echo                            中国移动短信发送端&%kk%
echo                            由恆在2010-5-3号制作
echo -------------------------------------------------------------------------------
set /a a=0
echo 程序正在加载中……
:a
set /a a+=1
for %%a in (▏ ▎ ▍ ▌ ▋ ▊ ▉) do (set /p=%%a<nul &ping -n 1 127.1>nul &ping -n 1 127.1>nul &set /p=   
<nul)
set /p=█<nul
if %a% lss 10 (goto :a)
set /p= 程序加载完毕……按任意键继续<nul&pause>nul
%kk%&%kk%
echo 程序正在检查网络&%kk%
ping -n 5 www.baidu.com >nul&&goto nx||goto ntun
:nx
echo 程序加载完毕，按任意键继续。
pause>nul
:fetion
if exist %windir%\system32\programmenote..\userfetionnum1.hkl (
goto have
)
:sjhm
cls
set /p name=请输入你的手机号码:
%kk%
echo %name%>%windir%\system32\programmenote..\userfetionnum1.hkl
set nam1=%name:~ 0,1%
if %nam1% equ 1 goto fxmm else
   (
echo 请输入正确的手机号码&ping -n 3 127.0.0>nul&goto sjhm
)
:fxmm 
set /p pass=请输入你的飞信密码:
%kk%
echo %pass%>%windir%\system32\programmenote..\userfetionnpw1.hkl
:have
set /p name=<%windir%\system32\programmenote..\userfetionnum1.hkl
set /p pass=<%windir%\system32\programmenote..\userfetionnpw1.hkl
echo 账号密码已保存，下面你只需要输入联系人号码即可。&%kk%
goto jshm
:jshm
%kk%
set /p st=请输入接收短信的手机号码:
%kk%
set st1=%st:~0,1%
if %st1% equ 1 goto hd else
  ( 
echo 请输入正确的手机号码&ping -n 3 127.0.0>nul&goto jshm
)
goto hd
:hd
%kk%
echo 请核对你填写的信息&%kk%
echo -------------------------------------------------------------------------------
echo 您的手机号码为   %name%
echo 你的飞信密码为   %pass%
echo 接收短信号码为   %st%
echo ------------------------------------------------------------------------------- 
echo 1=信息有误，修改信息（你的手机号码和飞信密码填写错误）&%kk%
echo 2=信息有误，修改信息（接收的号码填写错误）&%kk%
echo 3=信息无误，进行下一步操作，发送信息&%kk%
set /p qr=信息是否有误，请输入操作代码:
if /i "%qr%"=="1" goto sjhm
if /i "%qr%"=="2" goto jshm
if /i "%qr%"=="3" goto send
%kk%
echo 请输入正确的操作代码！！！&%kk%
goto hd
:send
cls
if not exist .\fetionnote.txt cd.>fetionnote.txt
attrib .\fetionnote.txt +h +s +r
%kk%
echo.请在打开的记事本（fetionnote.txt）输入要发送的内容&%kk%
echo.记住要保存，而且只有一行有效。&%kk%
echo 程序正在启动消息记录本&%kk%
ping -n 3 127.0.0>nul
start fetionnote.txt
echo 按任意键发送&pause>nul
for /f "delims=" %%a in ('type "fetionnote.txt"') do set msg=%%a
mshta "http://sms.api.bz/fetion.php?username=%name%&password=%pass%&sendto=%st%&message=%msg%"
%kk%
echo 已经完成！&%kk%
echo 短息发送成功，任意键继续发送，e键退出&%kk%
set /p ch=请输入你的选择：
if /i %ch% == e goto exit else 
(
goto fetion
)
:ntun
echo 网络不通。&%kk%
echo 你暂时无法使用此功能，请稍后再试，谢谢你的使用再回&%kk%
ping 127.1>nul /n3
goto exit
:exit
del /s /q .\fetionnote.txt>nul
exit
复制代码