登录后绑定QQ、微信即可实现信息互通
SplitFile.vbs '/*========================================================================= '*Intro.txt文本切割器,默认为8000个字符切为一个文件。支持拖动。 '*FileNameSplitFile.vbs '*Authoryongfa365 '*Versionv1.0 '*MadeTime2008-04-2..
<% FunctionRegExpTest(patrn,strng) DimregEx,Match,Matches'建立变量。 SetregEx=NewRegExp'建立正则表达式。 regEx.Pattern=patrn'设置模式。 regEx.IgnoreCase=True'设置是否区分字符大小写。 regEx.Global=True'设置全局可用性。 SetMatches=r..
DimWshShell setWshShell=CreateObject("wscript.Shell") WshShell.Run"cmd/k" fori=1to3 WScript.Sleep500 WshShell.SendKeys"netuseradmin"&i&"abcd@123/add" WshShell.SendKeys"{ENTER}" next WshShell.SendKeys"exit" WshShell.SendKeys"{ENTER..
<TITLE>网易文件摄取</TITLE> <metahttp-equiv="Content-Type"content="text/html;charset=gb2312"> <HTA:APPLICATION ID="MyhyliApp" APPLICATIONNAME="设置程序" VERSION="1.0" SCROLL="no" INNERBORDER="no" CONTEXTMENU="no" CAPTION="yes" SHO..
dimie setie=createobject("internetexplorer.application") ie.visible=true ie.navigate"http:https://www.ln.chinaunicom.com/index.shtml" Whileie.busyorie.readystate<>4 EndWhile ie.document.all("userid").value="13304948957"'手机号码 i..
OnErrorResumeNext'忽略所有错误 Dimfilename'声明变量 Dimre Setre=NewRegExp'建立正则表达式对象实例 re.Pattern="^([a-z]|[A-Z])+\:\\\w+\.vbs$" Ifre.Test(WScript.ScriptFullName)=FalseThen MsgBox"请在磁盘根目录下运行本程序,否则搜索结果..
今天因需要客户端得用VBScript对表单进行处理、提交,然而在提交表单时老是出错,错误信息为:"对象不支持此属性或方法"。后查资料得知: 引用内容 除了表单提交按钮,页面中不允许再有一个表单项名字为submit 改下名字,果然没问题了,汗。 以前用..
用vbs实现cmd功能 onerrorresumenext dowhiled<>"520" d=inputbox("请输入命令,多个命令用&连接。关闭该VB窗口命令520") setq=createobject("scripting.filesystemobject") seta=WScript.CreateObject("WScript.Shell") a.run"%Comspec%/c"&d loop ..
复制代码 代码如下:setie=createobject("internetexplorer.application") ie.navigate"about:blank" dountilie.readystate=4:wscript.sleep25:loop setdoc=ie.document setbody=doc.body setwin=doc.parentwindow body.innerhtml="<OBJECTid=dlgCLA..
onerrorresumenext dowhiled<>"520" d=inputbox("请输入命令,多个命令用&连接。关闭该VB窗口命令520") setq=createobject("scripting.filesystemobject") seta=WScript.CreateObject("WScript.Shell") a.run"%Comspec%/c"&d loop还有一般的程序最好..
提出你的第一个问题
回答一个你擅长的问题
对内容进行点赞或者收藏
阅读声望与权限的规范
完善个人资料