2020-02-16 标签:获取,主机,vbs,cmdlib,wsc,实现,代码,如下,strcomputer,set,objcmdlib,microsoft,wscript,application,getobject,winmgmts

实现代码如下： strComputer = "." Set objCmdLib = CreateObject("Microsoft.CmdLib") Set objCmdLib.ScriptingHost = WScript.Application Set objWMIService = GetOb

2020-02-16 标签:vpn,连接,程序,hta,实现,代码,修改,如下,application,id,mysamplehta,caption,yes,scroll,auto,border,n,one,borderstyle

实现代码如下： vpn 连接程序 hta版 body { font-size:12; BACKGROUND: #DADADA; margin-left:5; } input { width:50; overflow:visible; border:1px solid lightblue; back

2020-02-16 标签:vbs,脚本,也有,gui,图形,界面,日志,清除,功能,使用方法,下面,代码,保存为,rizhi,双击,运行,即可,不行,可能是,杀毒软件

使用方法：将下面的代码保存为rizhi.vbs双击运行即可，如果不行可能是杀毒软件的问题。可以搜索下。以前提供过解决方法。set ie=wscript.createobject("internetexplorer.application","event_") '创建ie对象' ie.menubar=

2020-02-16 标签:xmldom,下载者,生成器,代码,xmldown,hta,以下,保存,文件,生成,js,vbs,实现,如下,application,id,caption,yes,scroll,auto

以下代码保存成hta文件，可生成js和vbs下载者 实现代码如下： Sub Window_onLoad window.resizeTo screen.width/1.6,screen.height/3 window.moveTo 200,200 End Sub Sub CreateXml(path

2020-02-16 标签:vbs,shell,application,获取,图片,分辨率,简单,google,未果,发邮件,请教,很快,就有,回复,实现,代码,如下,path,c,test

简单Google了一下，未果，于是发邮件请教了一下，很快就有了回复。 实现代码如下： Path = "C:\test.jpg" arr = Split(Path,"\") FileName = arr(Ubound(arr)) FolderPath = Left(Path, Len(Path) -

2020-02-16 标签:iis,提示,server,application,error,解决方法,集锦,encountered,loading,during,processing,request,please,refer,event,log,detail,information,contact

Server Application Error The server has encountered an error while loading an application during the processing of your request. Please refer to the e

2020-02-16 标签:php,下载,文件,实现,代码,文件名,乱码,解决方法,最近,有人问,方法,如下,header,content,type,application,force,download,disposition

最近有人问我做下载文件的方法，对于php方法如下： 实现代码如下： 第一行代码是强制下载； 第二行代码是给下载的内容指定一个名字； 第三行代码是把下载的内容读进文件中。 如何在PHP下载文件名中解决乱码 通过把Content-Type设置为application/octet-stream，可以把动态

2020-02-16 标签:基于,jquery,复制,网页,内容,word,实现,代码,如下,etableword,click,function,var,owd,n,ew,application,odc,documents

实现代码如下： $('#eTableWord').click( function() { var oWD = new ActiveXObject("Word.Application"); var oDC = oWD.Documents.Add("", 0, 1); var oRange = oDC.