目录
1. ASP 代码结构
ASP（Active Server Pages）使用 VBScript 作为默认脚本语言，也支持 JScript（服务器端 JavaScript）。ASP 代码需要包含在 <% ... %> 代码块中，才能在服务器端执行。
示例：
<%
Response.Write "Hello, ASP!"
%>
该代码会在页面上输出 Hello, ASP!。
2. ASP 代码的编写方式
ASP 代码可以嵌入 HTML 页面，分为以下三种方式：
- 直接写在 HTML 页面中：
<html> <body> <h1>欢迎来到 ASP</h1> <% Response.Write "当前服务器时间：" & Now() %> </body> </html> - 独立 ASP 文件（如
index.asp）：<% Response.Write "这是一个 ASP 页面" %> - 使用 ASP 代码块：
<% Dim name name = "Tom" Response.Write "欢迎, " & name %>
3. ASP 变量
3.1 变量声明
在 VBScript 中，所有变量都是动态类型，无需指定数据类型。使用 Dim 关键字声明变量：
<%
Dim username
username = "Alice"
Response.Write "用户名：" & username
%>
3.2 变量作用域
- 局部变量：在 ASP 代码块内定义，仅在该块内有效。
- 全局变量：使用
Session或Application变量存储。
示例：
<%
Session("User") = "Tom"
Response.Write "当前登录用户：" & Session("User")
%>
4. ASP 数据类型
ASP 只有一种数据类型：Variant，可存储字符串、数字、布尔值、日期等。
- 字符串:
"Hello" - 整数:
100 - 浮点数:
3.14 - 布尔值:
True / False - 日期时间:
#2025-04-01#
示例：
<%
Dim x
x = "ASP 数据类型"
Response.Write "变量值：" & x
%>
5. ASP 运算符
| 运算符 | 描述 | 示例 |
|---|---|---|
+ | 加法或字符串连接 | x = 5 + 3 |
- | 减法 | x = 10 - 2 |
* | 乘法 | x = 4 * 2 |
/ | 除法 | x = 20 / 4 |
& | 连接字符串 | "Hello" & "World" |
= | 赋值 | x = 10 |
<> | 不等于 | If x <> 5 Then ... |
And | 逻辑与 | If a = 1 And b = 2 Then ... |
Or | 逻辑或 | If x = 1 Or y = 2 Then ... |
6. ASP 条件语句
6.1 If…Then…Else 语句
<%
Dim age
age = 20
If age >= 18 Then
Response.Write "允许访问"
Else
Response.Write "未成年，不允许访问"
End If
%>
6.2 Select Case 语句
<%
Dim day
day = "Monday"
Select Case day
Case "Monday"
Response.Write "今天是星期一"
Case "Tuesday"
Response.Write "今天是星期二"
Case Else
Response.Write "未知日期"
End Select
%>
7. ASP 循环语句
7.1 For…Next 循环
<%
Dim i
For i = 1 To 5
Response.Write "计数：" & i & "<br>"
Next
%>
7.2 While…Wend 循环
<%
Dim count
count = 1
While count <= 5
Response.Write "循环：" & count & "<br>"
count = count + 1
Wend
%>
7.3 Do…Loop 循环
<%
Dim num
num = 1
Do While num <= 3
Response.Write "数值：" & num & "<br>"
num = num + 1
Loop
%>
8. ASP 函数与子过程
8.1 过程（Sub）
<%
Sub GreetUser(name)
Response.Write "你好, " & name & "<br>"
End Sub
GreetUser "Tom"
GreetUser "Alice"
%>
8.2 函数（Function）
<%
Function Square(x)
Square = x * x
End Function
Response.Write "5 的平方是：" & Square(5)
%>
9. ASP 语法注意事项
9.1 大小写不敏感
VBScript 不区分大小写：
<%
Dim UserName, username
UserName = "Tom"
username = "Alice"
Response.Write UserName ' 输出 Alice
%>
9.2 代码换行
使用 _ 续行：
<%
Response.Write "这是一行很长的代码" & _
" 可以使用 _ 续行"
%>
9.3 代码注释
单行注释：
' 这是一个单行注释
多行注释：
<%
' 这是第一行注释
' 这是第二行注释
%>
发表回复