很有用的学习ASP常用到的代码第1/2页

1、数据库连接。
ASP与Aess数据库连接 

<%@ language=VBscript%> 
<% 
dim conn,mdbfile 
mdbfile=server.mappath("数据库名称.mdb") 
set conn=server.createobject("adodb.connection") 
conn.open "driver={microsoft aess 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 Aess Driver (.mdb)};DBQ=数据库的绝对路径"

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

"Driver={Microsoft Aess 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>")