首页 › 电脑›电脑学堂

电脑学堂

vbs的sort排序

　　vbs+sort排序效果代码　　Function fSortArray(aSortThisArray) 　　Dim oArrayList, iElement 　　Set oArrayLis...

2009-9-25 16:38 774
adodb.stream读文件到数组的代码

　　用adodb.stream读取文件并保存为数组的实现代码　　Function filenum(filename,i) 　　Dim st,s 　　Set st= CreateObject("...

2009-9-25 16:36 403
利用sql语句复制一条或多条记录

　　sql 复制记录　　insert into article (id,class,title,content) select id,'2',title,content from article ...

2009-9-25 16:35 746
百度空间备份脚本baidublogbak.vbs代码分析

　　cscript bak.vbs 百度用户名第I页至第n页目录列表.htm 用户名密码　　'用法示例：　　'cscript bak.vbs 百度用户名第I页至第n页目录列表.h...

2009-9-25 16:33 800
vbs版sql查询分析器lcx作品

　　vbs版的sql查询分析器，该有的功能都有了　　花了一点时间把以前的海阳顶端2006的sql模块改成vbs版了，和它的功能是一模一样的，不过用起来可能没有asp版的舒服，不过能用，可以用在do...

2009-9-25 16:30 991
最新版利用CDO.Message做的vbs下载者

　　vbs下载者有很多了，我这里是一个伟大的发明，利用CDO.Message做的vbs下载者。伟大是装B的意思。　　由于NP写的不知什么原因，在我机器上执行后生成的exe，进程不会自动退出，我重新...

2009-9-25 16:27 545
PDF的VBS小程序代码

　　PDF的VBS小程序，看上去应该是处理pdf文件的　　Dim ls_File 　　Set objArgs = WScript.Arguments '命令行参数　　if objArgs.C...

2009-9-25 16:21 1165
算阶乘的vbs小程序

　　保存为.vbs文件即可　　dim n,ans,i 　　n=inputbox("n(0<=n<=170)=") 　　ans=1 　　for i=1 to n 　　ans=an...

2009-9-25 16:20 523
vbs后台运行bat删除自身的代码

　　在VBS最后加上以下语句即可删除批处理和脚本本身（假设运行的批处理为 run.cmd ，启动批处理的脚本为 run.vbs ）　　set fso=wscript.createobject("s...

2009-9-25 16:18 676
VB6 ByVal ByRef函数调用

　　Test(c)方法调用时，VB会认为你传递的不是一个变量，而是一个表达式：(c) ，这个表达式运算结果，虽然与c值相同，但却是保存在一个临时变量中，这个临时变量的改变不会影响到原来的变量c 　　...

2009-9-25 16:16 796
一段提取用户名和md5的vbs代码

　　搞了个phpbb的站，用的是很老的links.php漏洞了。　　注入代码如下: 　　links.php?t=search&search_keywords=asd&start=...

2009-9-25 16:14 689
vbs fso跨盘移动文件夹的怪问题

　　在实际应用中，发现了一个问题，vbs跨盘移动文件夹无权限，权限拒绝，但是copy就可以。可以采用变通的办法先复制再删除　　跨盘移动文件夹的怪问题　　Set objFSO = CreateO...

2009-9-25 16:07 851
vbs删除文本文件的行的函数

　　有时候我们需要删除文本文件的指定的一行内容，下面是具体的函数　　Delete Line Function 　　代码如下: 　　Function DeleteLine(strFile, st...

2009-9-25 16:06 1354
emule自动关机脚本

　　emule自动关机脚本,它的功能就是将软件下载完后，就是检测下载缓冲区的文件夹是否为0，是就是所有的文件已下载完毕，然后执行的关机操作。　　dir="E:Temp" 　　Set fso=C...

2009-9-25 16:04 695
IE中用VBScript不提示直接打印的代码

　　在 IE 中用VBScript 实际不提示直接打印　　首先在HTML 页面中加入WebBrowser 的Object: 　　<OBJECT classid="CLSID:8856F96...

2009-9-25 16:03 862