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

答案：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>") 

上一个：Ajax+ASP和Flash+ASP数据读取取方法有些相似的实现方法
下一个：用VB生成DLL封装ASP连接数据库的代码