|
发表于 2019-7-15 09:44:50
|
显示全部楼层
- @echo off
- start Anydesk.exe
- set nu=-1
- set overnu=60 #获取次数 超过次数退出运行
- set /a num=100000+%random%%%900000
- set file=%temp%\%num%.txt #帐号密码临时存放位置
- :getid
- set /a nu=%nu%+1
- ping -n 10 127.0.0.1 >nul
- for /f "delims=" %%i in ('anydesk --get-id') do set CID=%%i
- if "%nu%" =="%overnu%" goto over
- if "%CID%" == "SERVICE_NOT_RUNNING" goto getid
- :echoid
- set /a pwd=%num:~4,2%%CID:~3,2%%num:~3,2%%CID:~6,2% #设置随机密码 当然也可以设置成固定的
- echo AnyDesk ID : %CID%>%file% #获取id 写入临时文件
- echo AnyDesk PassWord : %pwd%>>%file% #密码 写入临时文件
- echo %pwd%|anydesk.exe --set-password #启用密码
- set from=发送邮箱
- set user=邮箱帐号
- set pass=邮箱密码
- set to=接收邮箱
- set dd=%date:~0,10%
- set "tt=%TIME:~0,2%:%TIME:~3,2%:%TIME:~6,2%"
- set "tt=%tt: =0%"
- set subj=AnyDesk_%dd%_%tt% #邮件主题
- set server=邮箱的smtp服务器
- :mail
- blat.exe %file% -to %to% -charset Gb2312 -subject %subj% -server %server% -f %from% -u %user% -pw %pass%
- del /f /q %file%
- :over
- exit
复制代码
使用:
#后的注释删除
替换自己的邮箱设置
附件 blat 用来发送邮件
blat.rar
(86.35 KB, 下载次数: 140)
|
|