腳本編程教學(xué)（1）

 
論壇上好多朋友都問(wèn)關(guān)于腳本的問(wèn)題，正好最近對(duì)腳本比較有興趣，就寫(xiě)點(diǎn)東西吧。首先說(shuō)明一下，我的所有代碼都是
vbscript，jscript我沒(méi)有研究過(guò)，不過(guò)我想也差不多。

關(guān)于最基礎(chǔ)的語(yǔ)法比如變量的申明，分支，循環(huán)，函數(shù)的調(diào)用，等等這些我就不講了，不懂得自己看一下。

1、我們的第一個(gè)vbs程序：還是那個(gè)老得掉牙的冬冬。

************************hello.vbs**************************

dim hello

hello=”hello world!”

wscript.echo hello

wscript echo “ this is my first vbs”

可以看出wscript.echo有兩種用法，這個(gè)不難。

可以直接雙擊運(yùn)行，可以在當(dāng)前目錄的命令行輸入：

cscript hello.vbs

 

2、在腳本中調(diào)用其他的程序：

使用run()方法，在使用前必須先建立shell的實(shí)例

********************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 有三個(gè)參數(shù)，第一個(gè)參數(shù)是你要執(zhí)行的程序的路徑

第二個(gè)程序是窗口的形式，0是在后臺(tái)運(yùn)行；

1表示正常運(yùn)行

2表示激活程序并且顯示為最小化

3表示激活程序并且顯示為最大化

   一共有10個(gè)這樣的參數(shù)我只列出了4個(gè)最常用的。

  第三個(gè)參數(shù)是表示這個(gè)腳本是等待還是繼續(xù)執(zhí)行，如果設(shè)為了true,腳本就會(huì)等待調(diào)用的程序退出后再向后執(zhí)行。

  注意到?jīng)]有，我在run的前面還有一個(gè)接受返回值的變量，一般來(lái)說(shuō)如果返回為0，表示成功執(zhí)行，如果不為0，則這個(gè)
返回值就是錯(cuò)誤代碼，可以通過(guò)這個(gè)代碼找出相應(yīng)的錯(cuò)誤。

 

3、inputbox 和msgbox

會(huì)vb的人對(duì)著兩個(gè)東西應(yīng)該很熟悉，用法也沒(méi)什么差別

input=inputbox(“please enter you password”,”passwd”)

if input<>”1234”

then

msgbox  “you enter a wrong passwd”

end if 

當(dāng)然你也可以給msgbox添加按鈕,用一個(gè)變量接受用戶的選擇

例如：ret=msgbox “continue?”,vbyesnocancel 

返回值和常量對(duì)照如下：

vbok       1

vbcancel    2

vbabort     3

vbretry      4

vbignore    5

vbyes       6

vbno        7

 

4、錯(cuò)誤處理

何vb一樣用on error resume next

這個(gè)沒(méi)什么好說(shuō)的，如果遇到了錯(cuò)誤就跳過(guò)繼續(xù)執(zhí)行下一句

當(dāng)然這個(gè)方法很弱智，還需要有一個(gè)方法，vbscript提供了一個(gè)對(duì)象err對(duì)象

他有兩個(gè)方法clear,raise

5個(gè)屬性：description,helpcontext ,helpfile,number,source

我們可以利用err.number獲得錯(cuò)誤號(hào)例如

***********************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來(lái)手工拋出錯(cuò)誤

比如我們要產(chǎn)生一個(gè)path not found的錯(cuò)誤 告訴用戶，他填寫(xiě)的路徑不對(duì)

on error resume next

err.raise 76

msgbox  "error :" & err.description

err.clear

 

 

以上都是基礎(chǔ)，今天就寫(xiě)到這里吧，好累哦，呵呵呵 如有轉(zhuǎn)載注明出處。明天給大家講文件系統(tǒng)吧。