代码比较长,对vbs感兴趣的朋友可以参考一下

Dim"InternetExplorer.Application")
Set"WSCript.shell")
Set"scripting.filesystemobject")

Const"/content.cgi"

IE.menubar=0"192.168.46.3"


'==============读Config配置文件=========
"Scripting.FileSystemObject").GetFile(Wscript.ScriptFullName).ParentFolder.Path
file_config=filepath&"\config.ini"
Set"=")
OneLineCount=UBound(split(OneLine,"="))
'MsgBox"=")
TwoLineCount=UBound(split(TwoLine,"="))
'MsgBox"=")
ThreeLineCount=UBound(split(ThreeLine,"="))
'MsgBox"=")
FourLineCount=UBound(split(FourLine,"="))
'MsgBox"=")
FiveLineCount=UBound(split(FiveLine,"="))
'MsgBox"^a"
"admin"
"{TAB}"
"^a"
"admin"
"{TAB}"
"{ENTER}"

End"{TAB"
"{ENTER}"
"{TAB}"
"{ENTER}"
"进入配置界面失败!"
"{TAB}"
"{TAB}"
"{TAB}"
"{TAB}"
"{TAB}"
"{TAB}"
"{TAB}"
"{TAB}"
"{TAB}"
"{TAB}"
"{TAB}"
"{TAB}"
"{DOWN}""{TAB}"
"^a"
"{TAB}"
"^a"
"{TAB}"
"^a"
"{TAB}""^a"
"{TAB}"
"^a"
"{TAB}""^a"
"{TAB"
"{TAB}"
"{ENTER}"
"{F4}"
"^a"
"Button")
"{ENTER}"
"input")"Reboot""top.location='content.cgi")"配置已完成,设备正在重启,请耐心等待...",,"提示"

"来自网页的消息")"{ENTER}"
"配置已完成,设备正在重启,请耐心等待...",,"提示"
"配置未成功,请重新检查配置!",,"提示"
"{F4}"
'"^a"
'"{ENTER}"
"^a"
"admin"
"{TAB}"
"^a"
"admin"
"{ENTER}"
"{TAB"
"{ENTER}"
"{TAB}"
"{ENTER}"
"{TAB}"
"{TAB}"
"{TAB}"
"{TAB}"
"{TAB}"
"{TAB}"
"{TAB}"
"{TAB}"
"{TAB}"
"{TAB}"
"{TAB}"
"{TAB}"
"{DOWN}""{TAB}"
"^a"
"{TAB}"
"^a"
"{TAB}"
"^a"
"{TAB}""^a"
"{TAB}"
"^a"
"{TAB}""^a"
"{TAB"
"{TAB}"
"{ENTER}"
"{TAB"
"{ENTER}"
"{TAB"
"{ENTER}"
"来自网页的消息")"{ENTER}"
"配置已完成,设备正在重启,请耐心等待...",,"提示"
"配置未成功,请重新检查配置!",,"提示"
"content" width="650">
<form name="M_SAV" method="GET" enctype="multipart/form-data" onReset="" action="content.cgi">
<input type=HIDDEN name="_method_" value="apply">
<input type=HIDDEN name="form" value="M_SAV">
<input type=HIDDEN name="commit" value="0">
<table id="cFORM" width="650" border="0" cellspacing="0" cellpadding="0" >
<tr><td>&nbsp</td></tr>
</table><table width="500"><td align="center">
<input type=BUTTON onclick="javascript:if ( confirm('Reboot') ) top.location='content.cgi" target="_top" value="Reboot"></a>
</td></table></form>

这篇文章就介绍到这了,希望大家以后多多支持。

标签:
VBS一键配置,VOIP

免责声明:本站文章均来自网站采集或用户投稿,网站不提供任何软件下载或自行开发的软件! 如有用户或公司发现本站内容信息存在侵权行为,请邮件告知! 858582#qq.com
内蒙古资源网 Copyright www.nmgbbs.com

评论“VBS一键配置VOIP脚本代码”

暂无“VBS一键配置VOIP脚本代码”评论...

P70系列延期,华为新旗舰将在下月发布

3月20日消息,近期博主@数码闲聊站 透露,原定三月份发布的华为新旗舰P70系列延期发布,预计4月份上市。

而博主@定焦数码 爆料,华为的P70系列在定位上已经超过了Mate60,成为了重要的旗舰系列之一。它肩负着重返影像领域顶尖的使命。那么这次P70会带来哪些令人惊艳的创新呢?

根据目前爆料的消息来看,华为P70系列将推出三个版本,其中P70和P70 Pro采用了三角形的摄像头模组设计,而P70 Art则采用了与上一代P60 Art相似的不规则形状设计。这样的外观是否好看见仁见智,但辨识度绝对拉满。