使用腳本語言

- 中國WEB開發者網絡 (http://www.webasp.net)
-- 技術教程 (http://www.webasp.net/article/)
--- 使用腳本語言 (http://www.webasp.net/article/16/15419.htm)

-- 作者：未知
-- 發佈日期： 2004-12-09

在ASP程序中，常用兩種腳本語言，即VBScript和JavaScript語言。本章將介紹這兩種腳本語言的基本使用方法。

VBScript語言
Microsoft Visual Basic Scripting Edition是程序開發語言Visual Basic家族的一員，它將靈活的Script應用於廣泛的領域，包括Microsoft Internet Explorer中Web客戶機Script和Microsoft Internet Information Server中的WEB服務器Script。VBScript是Active Server Pages的默認腳本語言。
VBScript即可作為客戶端編程語言，也可以作為服務器編程語言。客房端編程語言是可以由瀏覽器解釋執行的語言。Java和JScript/JavaScript也可以作為客戶端編程語言。當一以這些語言中的任意一種編制的程序被下載到一兼容的瀏覽器中時，瀏覽器將自動執行該程序。

變量、運算符和表達式
變量是擁有特定名稱的內存空間，聲明變量後，就可以在腳本中引用該變量。在VBScript中只有一個基本數據類型,即Variant，而且VBScript是不區分大小寫的。聲明一個變量必須遵循VBScript的標準命名規則：
1.第一個字符必須是字母。
2.不能句含嵌入的句點。
3.才度不能超過255個字符。
4.在被聲明的作用域內必須唯一。
聲明變量的方式分為顯示聲明和隱式聲明。顯式專聲明的一種方式是使用Dim語句、Public語句和Private語句聲明變量。例如：
Dim VarName
public語句用於聲明公用變量和分配存儲空間，而且聲明後的變量可用於所有項目全部腳本的所有過程。語法如下：
Public VarName
private語句用於聲明私有變量和分配存儲空間，而且只能在聲明該變量的腳本中使用。語法如下：
Public VarName
聲明多個變量時，使用逗號分隔變量。例如：
Dim Name,Age,Sex ,Title
隱式聲明通過直接Script中使用變量名的方式聲明變量。例如：
VarName=value
如果在使用變量之前聲明它，那麼程序容易維護了，可以使用強制聲明方式處理這種情況，就是在腳本的最上端包含語句Option Explict。下面的例子演示了如何強制變量必須先聲明後使用：
<%PTION EXPICLT%>
<html>
<head>
<title>Simple VBScript</title>
</head>
<body>
<%
Dim Myvar
Myvar=「Hello World!「
%>
<%=Myvar%>
</body>
</html>
在這個例子中，OPTION EXPLICIT語句強制所有的變量必須專門聲明。DIM語句聲明了變量Myvar。如果在使用變量前沒有聲明變量，VBScript就會給出運行時錯誤信息」Variable is undefined:'Myvar'.」
在VBScript中，嚴格地講變量是不用聲明的，如：
<%Mystring=「This is String「%>
注意，OPTION EXPLICIT語句的位置很特殊。必須把OPTION EXPLICIT語句作為一個ASP網頁的起始語句之一。它必須出現在任何HTML標識或其他VBScript命令之前。如果不這樣做，該語句將被視為非法語句。
變量的作用域也可稱作為變量的生命週期，它決定了哪些腳本可以訪問變量。在過程內部聲明的變量具有局部作用域。每執行一次過程，變量就創建然後釋放。而過程外部的任何命令不能訪問它。在過程外部聲明的變量具有全局作用域，其值能被ASP頁中的任何腳本訪問和修改。聲明變量時，局部變量和全局變量可以有相同的名稱，而且改變其中一個變量的值並不會改變另一個的值。如果沒有聲明變量，則可能會不小心改變一個全局變量的值。
例如，以下腳本命令返回值為1。雖然兩名為Y的變量，但是在過程SetLocalVarIable中定義的變量Y主局部變量，在此過程外無效。
<%
Dim Y=1
Call SetLocalVariable
Response.Write Y
Sub SetLocalVariable
Dim Y
Y=2
End Sub
%>
由於變量沒有顯式聲明，以下的腳本命令將返回2。當過程調用將Y設置為2時。腳本引擎認為該過程是要修改全局變量。
<%
Y=1
Call SetLocalVariable
Response.write Y
Sub SetLocalVariable
Y=2
End Sub
%>

webasp.net