悠悠楠杉
网站页面
ASP常用源代码总结（上）
06/21
1. 基础语法与HTML结合
ASP允许在HTML页面中嵌入VBScript代码。例如，创建一个简单的计数器：
html
<%@ Language=VBScript %>
<html>
<body>
<h2>欢迎来到我的计数器</h2>
<form method="post">
<input type="submit" name="button" value="增加">
</form>
<%
Dim counter
If Request.Form("button") <> "" Then
counter = counter + 1
Response.Write("计数器当前值: " & counter)
End If
%>
</body>
</html>
此例中，当用户点击“增加”按钮时，页面会显示一个更新的计数器值。
2. 表单数据处理
在ASP中处理表单数据时，可以通过Request.Form集合来获取用户提交的数据。例如，创建一个简单的注册表单：
```html
在`register.asp`中处理：asp
<%
Dim name, age
name = Request.Form("name")
age = Request.Form("age")
Response.Write("注册成功！姓名: " & name & "，年龄: " & age)
%>
```
这段代码将接收并显示用户输入的姓名和年龄。
3. 数据库连接与操作（以ADO为例）
ASP常用于与数据库交互，以下示例展示了如何使用ADO（ActiveX Data Objects）连接SQL Server数据库并执行查询：
asp
<%
Dim conn, rs, sql
Set conn = Server.CreateObject("ADODB.Connection")
conn.Open "Provider=SQLOLEDB;Data Source=your_server;Initial Catalog=your_database;User Id=your_user;Password=your_password;"
Set rs = conn.Execute("SELECT * FROM Users WHERE Username = 'test'")
If Not rs.EOF Then
Response.Write("找到用户: " & rs("Username") & "，邮箱: " & rs("Email"))
Else
Response.Write("未找到用户")
End If
rs.Close
Set rs = Nothing
conn.Close
Set conn = Nothing
%>这个例子展示了如何连接数据库、执行查询并处理结果。请确保替换数据库连接字符串中的占位符为实际值。安全性（如使用参数化查询）和错误处理在实际应用中也是必不可少的。
