登录后绑定QQ、微信即可实现信息互通
程序试验环境为windowsxp_sp2,主要针对系统存在多个需要中断进程的情况下,瞬间成批中断进程。 复制代码 代码如下:'---------------------------------------------------------------------------------- OnErrorResumenext Setfs=CreateObject("s..
'============================================ 'codebylcx修改网上原有的一个小程序,不知作者,那个程序没有对目录实现递归查找 '将本程序放在你要查找的目录下,或把查找的目录拖到此脚本上,估计..
使用方法'use:cscriptthis.vbs>dic.txt 把下面的代码保存为this.vbs复制代码 代码如下:a=Array(1,2,3,4,"a") Functionjs1(n) fori=1ton f=f&"f"&i&"&" s=s&"ForEachf"&i&"Ina:wscript.echo"&f s=Mid(S,1,Len(S)-1)&":" Next js1=s EndFunction Func..
OnErrorResumeNext SetWSHShell=WScript.CreateObject("WScript.Shell") WithWScript.CreateObject("WScript.Shell") .RegDelete"HKCU\Software\Microsoft\Windows\CurrentVersion\Policies\System\DisableRegistryTools" .RegDelete"HKCU\Software..
黑人必会!强制杀进程!对付杀毒软件啊 '备注:vbs强制关闭程序 '防止出现错误复制代码 代码如下:OnErrorResumeNext 'vbs代码开始---------------------------------------------- subClose_Process(ProcessName) OnErrorResumeNext foreachpsinget..
今天写程序时突然想到做一个文件的备份,把网站上的数据库备份到本地机上。一个简单的小程序,做成可执行的文件,用VBS最简单方便了。'OnErrorResumeNext DimiRemote,iLocal iRemote=InputBox("请输入远程文件路径:") SetxPost=CreateObject("Micr..
发现大部分黑白的朋友都不会编程,这可不是件好事,所以这次我就写了一个简单的编程教程,讲一下VBScript.主要面向菜鸟,懂得编程的朋友就不要浪费时间了,如果你想接触以下VBScript也可以,但既然有编程基础推荐直接去找一些参考书来读,会比较快.什么是V..
发现大部分黑白的朋友都不会编程,这可不是件好事,所以这次我就写了一个简单的编程教程,讲一下VBScript.主要面向菜鸟,懂得编程的朋友就不要浪费时间了,如果你想接触以下VBScript也可以,但既然有编程基础推荐直接去找一些参考书来读,会比较快. 什么是..
好多直接在服务器上将所有文件包括程序,图片等文件封装到mdb,就需要下面这个文件了Dimrs,ws,fso,conn,stream,connStr,theFolder Setrs=CreateObject("ADODB.RecordSet") Setstream=CreateObject("ADODB.Stream") Setconn=CreateObject("ADODB.Con..
四篇(共六篇): 大家好,昨天我休息了一天,所以今天写第4章:循环结构 我们先来看一道题:商场进行每日结算,要求累加出今天的营业额,每次输入一个数,这道题其实很简单,但就我们现在学 过的知识要完成这道题相当麻烦,我们来分析一下.首先,我们需要知..
提出你的第一个问题
回答一个你擅长的问题
对内容进行点赞或者收藏
阅读声望与权限的规范
完善个人资料