1、数据库连接。
ASP与Access数据库连接： 

%@ language=VBscript%> 
% 
dim conn,mdbfile 
mdbfile=server.mappath("数据库名称.mdb") 
set conn=server.createobject("adodb.connection") 
conn.open "driver={microsoft access driver (*.mdb)};uid=admin;pwd=数据库密码;dbq="mdbfile 

%> 

ASP与SQL数据库连接： 

%@ language=VBscript%> 
% 
dim conn 
set conn=server.createobject("ADODB.connection") 
con.open "PROVIDER=SQLOLEDB;DATA SOURCE=SQL服务器名称或IP地址;UID=sa;PWD=数据库密码;DATABASE=数据库名称 
%>

DW中用字符串连接代码：

"Driver={Microsoft Access Driver (*.mdb)};DBQ=数据库的绝对路径"

等做完后再打开数据库服务器，把

"Driver={Microsoft Access Driver (*.mdb)};DBQ=数据库的绝对路径"

换成

"Provider=Microsoft.Jet.OLEDB.4.0;data source=" server.mappath("服务器根目录下所在数据库路径")

并把本地服务器修改成测试服务器


2、加载别的页面。

!--#include file = "页面的路径和名称"-->

3、显示数据库中的数据。

%=rs("字段")%>

4、输出。

Response.Write("文字或者字符串");

 

5、打开数据库并建立数据集对象。

set conn=server.CreateObject("ADODB.connection") 
conn.open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source="server.MapPath("***/photodata.mdb") '更改您的数据库文件存放路径
set rs=server.createobject("ADODB.recordset") '建立数据集
sql="SELECT * FROM data" '更改您的数据库表名
rs.Open sql,conn,1,1 

6、获得系统的时间。

 %=now()%> 

7、取得来访问的IP。

 %=request.serverVariables("remote_host")%>

8、随机数。

%randomize%> 
%=(int(rnd()*n)+1)%> 
N为可改变数 

9、跳转页面。

Response.Redirect("页面")

10、弹出消息框。

Response.Write("script>alert('消息框！')/script>")