代码比较长,对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> </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脚本代码”评论...
P70系列延期,华为新旗舰将在下月发布
3月20日消息,近期博主@数码闲聊站 透露,原定三月份发布的华为新旗舰P70系列延期发布,预计4月份上市。
而博主@定焦数码 爆料,华为的P70系列在定位上已经超过了Mate60,成为了重要的旗舰系列之一。它肩负着重返影像领域顶尖的使命。那么这次P70会带来哪些令人惊艳的创新呢?
根据目前爆料的消息来看,华为P70系列将推出三个版本,其中P70和P70 Pro采用了三角形的摄像头模组设计,而P70 Art则采用了与上一代P60 Art相似的不规则形状设计。这样的外观是否好看见仁见智,但辨识度绝对拉满。