很有用的学习ASP常用到的代码

---

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>")

---

« 
» 

---