很有用的學習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>")