WScript

VBS获取当前目录下所有文件夹名字的代码

复制代码代码如下:Setws=WScript.CreateObject("wscript.shell")w=ws.CurrentDirectorySetfso=WScript.CreateObject(
·2013-09-03 16:43

vbs 获取当前目录的实现代码

GetFolder(".").PathWscript.echotest当前VBS路径复制代码代码如下:test=createobject("Scripting.FileSystemObject").GetFile(Wscript.ScriptFullName
·2013-09-03 15:49

VBScript 监控并结束指定进程的代码

arrTargetProcs=Array("calc.exe","notepad.exe","other.exe")'数组里为要监视的进程名SetSINK=WScript.CreateObject("WbemScripting.SWbemSink
·2013-09-01 18:56

JScript实现将指定目录下的vc工程加到解决方案

作者：朱金灿来源：http://blog.csdn.net/clever101          main(); functionmain() { try { varWSShell=WScript.CreateObject
clever101·2013-08-29 22:00

域账号加到本机管理员组和本机Power Users组

DimsFlagDimoWshNetworkSetoWshNetwork=WScript.CreateObject("WScript.Network")strComputer=oWshNetwork.ComputerNamesF
zhou_ping·2013-08-19 22:11

域账号加到本机管理员组和本机Power Users组

Dim sFlagDim oWshNetworkSet oWshNetwork = WScript.CreateObject("WScript.Network")strCom
zhou_ping·2013-08-19 22:11

使用javascript创建快捷方式的简单实例

复制代码代码如下:varfso=newActiveXObject("Scripting.FileSystemObject");varshell=newActiveXObject("WScript.Shell
·2013-08-09 15:51

使用js修改客户端注册表的方法

复制代码代码如下:try{varshell=newActiveXObject("WScript.Shell");//读注册表值varkey1=shell.RegRead("HKEY_CURRENT_USER
·2013-08-09 15:17

Javascript调用本地程序

感兴趣的朋友可以参考下哈第一次用到这个，做个记录，在html页面中调用本地程序： 复制代码代码如下:   functionRun(strPath) { varobjShell=newActiveXObject("wscript.shell
luopeiyuan1990·2013-08-08 10:00

ISA2004 Manual

C:ProgramFilesMicrosoftISA2004SDKsamplesAdminImportExport.vbsIfWScript.Arguments(0)="e"Then'WScript.Echo"Exportingtheconfigurationofthe
tadcat·2013-08-07 13:00

flex通过js获取ip和pcname示例代码

varWshShellPcName=newActiveXObject("WScript.Netw
·2013-08-02 17:42

js获取IP和PcName(IE)在vs中可用

复制代码代码如下:无标题页functiongetClientPcName(){varWshShellPcName=newActiveXObject("WScript.Network");varComputerName
·2013-08-02 17:33

cmd.exe

cmd.exe指令cmd.exe 指令/C 执行字符串指定的命令 自动关闭/K 执行字符串指定的命令 不关闭多条指令用&连接例子vbSet objShell = CreateObject("Wscript.Shell
leonwei·2013-07-31 18:00

VBS 十六进制异或加密实现代码

效果图：代码都封装成函数了，方便调用：复制代码代码如下:Key="www-enun-net"'不要用数字Wscript.echonow&",加密:"MyData=ReadBin("test.jpg")EnData
·2013-07-29 17:13

VBS 加解密 For MS Script Encode

一、加密复制代码代码如下:DimObjectFSOIf(lcase(right(wscript.fullname,11))="wscript.exe")ThenWScript.Quit(0)EndIfIfwscript.arguments.countaideNomFichier
·2013-07-29 17:09

VBS 获取外网IP的实现代码

复制代码代码如下:setoDOM=WScript.GetObject("http://ipseeker.cn//")flag=0fori=1to10ifoDOM.readyState="complete"thenflag
·2013-07-28 20:31

VBS获取外网IP地址并发送到指定邮箱的代码

复制代码代码如下:FunctionGetIPAddress()DimFlag,SourceSetGetIPObj=WScript.GetObject("http://ipseeker.cn//")Flag
·2013-07-28 20:43

Win7下VHD文件右键增强实现代码(vbs+注册表)

1、保存以下代码到：c:\windows\system32\vdm.vbs复制代码代码如下:DimArgsSetArgs=WScript.ArgumentsTranArgs=""Fori=0ToArgs.Count
·2013-07-28 18:06

使用VBS修改二进制文件HEX数据

复制代码代码如下:PublicBinaryDataIf(lcase(right(wscript.fullname,11))="wscript.exe")ThenWScript.Quit(0)EndIfIfwscript.arguments.count
·2013-07-27 23:23

VS2010中配置WTL

使用wscript.exe（默认路径C:\W
a20102110080212·2013-07-20 15:00

通过vbs修改目录名称与快捷方式名称的实现代码

复制代码代码如下:setfso=wscript.createobject("scripting.filesystemobject")OldFolderName1="263EnterpriseMessenger"newFolderName1
·2013-07-19 15:24

VBS+CMD

SetobjShell=CreateObject("Wscript.Shell")objShell.Run("ipconfig/all")方便极了。
a191030148·2013-07-19 13:00

浅谈JavaScript框架设计

你必须保证把它放到WScript,S
·2013-07-19 10:00

use telnet auto reboot TP-Link route

temp.vbs@echo on error resume next >>c:\temp.vbs@echo dim WshShell>>c:\temp.vbs@echo Set WshShell = WScript.Cr
godoha·2013-07-18 20:51

use telnet auto reboot TP-Link route

====@delc:\temp.vbs@echoonerrorresumenext>>c:\temp.vbs@echodimWshShell>>c:\temp.vbs@echoSetWshShell=WScript.CreateObject
godoha·2013-07-18 20:51

将PC变成瘦客户机（VMware View&Citrix XenDesktop）

ProgramFiles\VMware\VMware View\Client\bin\wswc.exe”gotoView3.在同一级目录中创建start.vbsSetWshShell = CreateObject("WScript.Shell
saim·2013-07-15 17:32

devmgmt.msc

@echooffif"%1"=="h"gotobeginmshtavbscript:createobject("wscript.shell").run("%~fs0h",0)(window.close)
ermuzhi·2013-07-05 20:00

SQL脚本运行

$v=New-Object -ComObject wscript.shell#也可以使用反单引号(`)字符来强制PowerShell将单引号或双引号解释为文本,0不显示命令提示符窗口$v.run("
·2013-06-26 20:00

windows 批处理后台运行

在你批处理的相同目录下新建一个记事本，里面输入：setws=wscript.createobject("wscript.shell")ws.run"win.bat/start",0（其中win.bat为你自己的批处理名字
gxp·2013-06-26 10:00

[Silverlight]调用外部可执行程序

if(Application.Current.HasElevatedPermissions) {using(dynamiccom=AutomationFactory.CreateObject("WScript.Shell
·2013-06-25 13:00

WScript.Shell对象的run和exec

createobject("wscript.shell").run"""BAT或EXE的文件路径及名称""",0true0表示隐藏运行窗口true表示在继续执行脚本中的下一条语句之前，脚本是否等待执行完程序
bothilove·2013-06-25 11:43

魔兽世界挂机脚本

Dim WshShell Set WshShell=WScript.CreateObject("WScript.Shell") 'WshShell.Run "notepad
·2013-06-24 06:00

JScript运行批处理命令的做法

今天发现调用WScript.Shell对象的Run方法可以实现这个目的。
clever101·2013-06-19 20:00

vbs 的 GB2312ToUnicode

Dimhttp Sethttp=CreateObject("msxml2.xmlhttp") http.open"GET","http://www.sina.com.cn/",False http.send WScript.Echohttp.responseText
a771948524·2013-06-18 17:00

regsvr32 jscript.dll的Ox80004005错误和如何在命令行下运行JS文件

wscript //e:jscript 文件名
kakaka2011·2013-06-18 11:00

解决运行JScript的一个诡异错误

           写了一个简单的Jscript，代码如下：//SetupprogramfortheDevWizardforVC++9.0(Orcas) main(); functionmain(){ WScript.Echo
clever101·2013-06-03 23:00

DOS命令大全

-------windows更新程序winver---------检查Windows版本wmimgmt.msc----打开windows管理体系结构wupdmgr--------windows更新程序wscript
liao_shiyong·2013-05-31 22:13

JScript读取环境变量的方法

          JScript读取环境变量的方法很简单，示例代码如下：main(); //读取系统的临时路径 functionmain() { varWshShell=newActiveXObject("WScript.Shell
clever101·2013-05-28 21:00

you may be a victim of software counterfeiting

复制以下代码 ONERRORRESUMENEXT DimVOL_PROD_KEY ifWscript.arguments.count0then Wscript.echo"替换失败！
szstephenzhou·2013-05-27 18:00

windows下vbs脚本添加网络打印机

代码如下：SetWshNetwork=CreateObject("WScript.Network")WshNetwork.AddWindowsPrinterConnection"\\192.168.0.114
onesthan·2013-05-22 14:20

windows下vbs脚本添加网络打印机

代码如下： Set WshNetwork = CreateObject("WScript.Network")WshNetwork.AddWindowsPrinterConnection "\\192.168.0.114
onesthan·2013-05-22 14:20

JS调用打印方法设置页眉页脚的实例

Software\\Microsoft\\InternetExplorer\\PageSetup\\";functionPageSetup_del(){try{varWSc=newActiveXObject("WScript.Shell
·2013-05-21 10:49

bat文件启用dos命令

echooffjavacJSplitPaneDemo01.javajavaJSplitPaneDemo012、还可以写一个.vbs文件，去调用上面写的那个aa.bat文件，简介的执行doc命令vbs文件内容如下：setws=wscript.createobject
Li_Huifeng·2013-05-17 11:00

【电脑的运行代码】

winver 检查Windows版本 wmimgmt.msc 打开Windows管理体系结构(wmi) wupdmgr Windows更新程序 wscript Windows脚本宿主设置 write 写字板
菇凉那个少年你还爱么·2013-05-12 09:00

VBS中CreateObject和WScript.CreateObject的区别介绍

CreateObject和WScript.CreateObject的区别一：CreateObject是VBS的内置函数，属于语言的一部分；而WScript.CreateObject是Windows脚本宿主
·2013-05-08 22:51

qq消息发射器

结束方式：在任务管理器里结束wscriptSetWshShell=WScript.CreateObject("WScript.Shell")WshShell.AppActivate""fori=1to100WScript.Sleep500WshShell.SendKeys
a771948524·2013-05-08 20:00

运行bat文件时不弹出CMD窗口的方法

单次运行请用这个，修改auto.bat为你要运行的批处理文件的名字，并将以下内容保存为vbs格式，放到auto.bat文件所在目录，名字随便，例如run.vbs   Set shell = Wscript.createobject
josh198331·2013-05-08 17:00

任务栏图标不显示(电脑使用)

Kelly Theriot and Doug Knox - 8/22/2003Set WSHShell = WScript.C
漂流瓶子blog·2013-05-06 15:00

vb 调用 VBS

vb.net调用vbsfile=chr(34)+app.path+"\GB.vbs"+chr(34) shell"wscript.exe"+vbsfile关于vb6.0调用/运行VBS几种方式：一：PrivateDeclareFunctionShellExecuteLib"shell32
a771948524·2013-05-05 21:00

隐藏运行批处理时出现的黑框

法一：DIMobjShellsetobjShell=wscript.createObject("wscript.shell")iReturn=objShell.Run("cmd.exe/C1.bat",
a771948524·2013-05-05 21:00
上一页 17 18 19 20 21 22 23 24 下一页
按字母分类： ABCDEFGHIJKLMNOPQRSTUVWXYZ其他