个人中心
文章发布
退出
作者热门文章
- ubuntu12.04环境下使用kvm ioctl接口实现最简单的虚拟机
- Ubuntu 通过无线网络安装Ubuntu Server启动系统后连接无线网络的方法
- 在Ubuntu上搭建网桥的方法
- ubuntu 虚拟机上网方式及相关配置详解
24
4
CFSDN坚持开源创造价值，我们致力于搭建一个资源共享平台，让每一个IT人在这里找到属于你的精彩世界.
这篇CFSDN的博客文章vbs/js脚本编程教学（1）由作者收集整理，如果你对这篇文章有兴趣，记得点赞哟.
脚本编程教学（1） 论坛上好多朋友都问关于脚本的问题，正好最近对脚本比较有兴趣，就写点东西吧。首先说明一下，我的所有代码都是vbscript，jscript我没有研究过，不过我想也差不多。 关于最基础的语法比如变量的申明，分支，循环，函数的调用，等等这些我就不讲了，不懂得自己看一下。 1、我们的第一个vbs程序：还是那个老得掉牙的冬冬。 ************************hello.vbs************************** dim hello hello=”hello world!” wscript.echo hello wscript echo “ this is my first vbs” 可以看出wscript.echo有两种用法，这个不难。 可以直接双击运行，可以在当前目录的命令行输入： cscript hello.vbs 2、在脚本中调用其他的程序： 使用run()方法，在使用前必须先建立shell的实例 ********************shell.vbs****************************************** set ws=wscript.createobject("wscript.shell") ret=ws.run ("notepad" ,3,true) if ret=0 then wscript.echo “succeed!” else wscript.echo “there is a error,the error number is:” wscript.echo cstr(ret) end if *************************************************************************** 这里run 有三个参数，第一个参数是你要执行的程序的路径 第二个程序是窗口的形式，0是在后台运行； 1表示正常运行 2表示激活程序并且显示为最小化 3表示激活程序并且显示为最大化 一共有10个这样的参数我只列出了4个最常用的。 第三个参数是表示这个脚本是等待还是继续执行，如果设为了true,脚本就会等待调用的程序退出后再向后执行。 注意到没有，我在run的前面还有一个接受返回值的变量，一般来说如果返回为0，表示成功执行，如果不为0，则这个 返回值就是错误代码，可以通过这个代码找出相应的错误。 3、inputbox 和msgbox 会vb的人对着两个东西应该很熟悉，用法也没什么差别 input=inputbox(“please enter you password”,”passwd”) if input<>”1234” then msgbox “you enter a wrong passwd” end if 当然你也可以给msgbox添加按钮,用一个变量接受用户的选择 例如：ret=msgbox “continue?”,vbyesnocancel 返回值和常量对照如下： vbok 1 vbcancel 2 vbabort 3 vbretry 4 vbignore 5 vbyes 6 vbno 7 4、错误处理 何vb一样用on error resume next 这个没什么好说的，如果遇到了错误就跳过继续执行下一句 当然这个方法很弱智，还需要有一个方法，vbscript提供了一个对象err对象 他有两个方法clear,raise 5个属性：description,helpcontext ,helpfile,number,source 我们可以利用err.number获得错误号例如 ***********************err.vbs***************************** on error resume next a=11 b=0 c=a/b if err.number<>0 then wscript.echo err.number & err.description & err.source end if 我们可以用err.raisel来手工抛出错误 比如我们要产生一个path not found的错误 告诉用户，他填写的路径不对 on error resume next err.raise 76 msgbox "error :" & err.description err.clear 以上都是基础，今天就写到这里吧，好累哦，呵呵呵 如有转载注明出处。明天给大家讲文件系统吧。 。
最后此篇关于vbs/js脚本编程教学（1）的文章就讲到这里了,如果你想了解更多关于vbs/js脚本编程教学（1）的内容请搜索CFSDN的文章或继续浏览相关文章，希望大家以后支持我的博客！ 。
24
4
0
我使用 IBM Personal Communications 12.0.3.0 的宏记录器制作了一个凭据输入宏。它只是在调用时输入我的用户名和密码。 sub Credentials() Dim
该批处理更改了 vbs 代码，使其无法供 vbs 使用。我该如何解决这个问题？ 批号: echo Const HIGH = 128 >> prio.vbs echo strComputer = "."
我有 2 个 vbs 文件。 A.vbs: Class test public a public b End Class B.vbs: Dim objShell Set objShell =
以下是我用来尝试在 IIS 6 中创建虚拟目录的条目: [Run] Filename: {tmp}\cscript.exe mkvirtdir.vbs; Parameters: "-c LocalHo
核心vbs代码 ? 1
对于vbs中ping的实现可以通过两种方式 ： 1、调用系统ping命令； 2、使用wmi查询pingstate类处理。 1、调用系统ping命令
在看vb开发,看到二维数组时突发奇想用二维数组作为游戏关卡; 1. 选择操作: 游戏开始时会提示选择注册, 登录, 退出三种选项, 2.注册: 注册成功会将用户账户与密码存入用户数据txt文档中
复制指定文件到指定目录下 核心代码 ? 1
复制代码 代码如下: On Error Resume Next Dim WshShell, QQPath, QQselect set wshshell=createobject("
运行前请确定你的电脑安装了word。 复制代码 代码如下: i=0 set wshshell=createobject("wscript.shell") Set objWo
参考代码一： 复制代码 代码如下: Function DeleteLog( ) Dim objFSO, objFolder, strPath,
挺实用的一段代码，用来深入学习vbs，确实不错咯。 复制代码 代码如下: On Error Resume Next '忽略所有错误 Dim filename '声明变量 Di
话说还是闲来练手，初步实现了自己认为的“多线程”下载。(至于是不是多线程，可以参考12楼链接) 为避免冗余，省了一些错误检查。我觉得没多大实际用途，有兴趣的兄弟一起学习讨论呗。欢迎大家指正: 复制
复制代码 代码如下: set oDOM = WScript.GetObject("http://ipseeker.cn//") flag=0 for i=1 to 10 &n
复制代码 代码如下: on error resume next url = " http://www.bathome.net/logging.php?action=login"
效果图： 代码都封装成函数了，方便调用： 复制代码 代码如下: Key = "www-enun-net" '不要用数字
打开狗狗影视，搜索自己需要的资源，资源类型选：电驴，如下图： 我找到一个 19.75gb 的： 点开它，出现如下图的界面，可以看到正常下载地址已被屏蔽。我们复制地址栏中的网址，备用。
最近相关的备份比较频繁，为了校验文件的完整性，老是要打开某文件HASH校验工具，比较麻烦，于是乎写了这个东东，文件较大时计算有点慢，文件的MD5值保存在剪贴板！效果如图： 使用方法： 1.先
CMD当前路径 复制代码 代码如下: test = createobject("Scripting.FileSystemObject").GetF
For Next 语句的基本结构为： 复制代码 代码如下: For counter = start To end [Step step] [statements] [Exit For] [st
我是一名优秀的程序员,十分优秀！