dim conn，mdbfile mdbfile=servermappathquot數(shù)據(jù)庫名稱mdbquotset conn=servercreateobjectquotadodbconnectionquotconnopen quotdriver=microsoft access driver *mdbuid=adminpwd=數(shù)據(jù)庫密碼dbq=quotmdbfile set。

Set conn = Nothing ResponseWrite quot數(shù)據(jù)庫連接失敗quotResponseEnd End If% lt！DOCTYPE html PUBLIC quotW3CDTD XHTML 10 TransitionalENquot quotDTDxhtml1transitionaldtdquot lt。

1做一個(gè)注冊(cè)頁面，包含一個(gè)表單表單中兩個(gè)文本框用來輸入用戶名密碼 2一個(gè)注冊(cè)驗(yàn)證頁面用來判斷用戶名是否存在，并將注冊(cè)信息寫入表 我的注冊(cè)頁面和asp處理頁面是分開的分兩個(gè)文件regasp 和 zhuceyanzhengasp 以下。

number=sessionquotnumberquotpasswd=sessionquotPasswdquotsql=quotselect * from admin1 where number=#39quotnumberquot#39and passwd=#39quotPasswdquot#39quotrsopen sql，conn，3，3 if rseof then responseredirect quotindexaspquotresponse。

首先連接數(shù)據(jù)庫，然后lt Set Rs = ServerCreateObjectquotADODBRecordSetquot #39創(chuàng)建一個(gè)對(duì)象 SQL = quotSelect 作者字段名 From 表1quot #39查詢表1中的作者字段 RsOpen SQL，Conn，1，1 #39執(zhí)行查詢 Do While Not Rs。

1要查詢的數(shù)據(jù)庫名稱datamdb 數(shù)據(jù)庫中表為data 數(shù)據(jù)庫表data的字段有titleabout 由于無數(shù)據(jù)添加頁面，所以在數(shù)據(jù)庫各字段中應(yīng)添加數(shù)據(jù)，方便查詢演示2數(shù)據(jù)庫打開文件connasplt ServerscriptTimeout=quot10quot。

asp的dim conn，rs，sql，i，connstr connstr=quotdbq=quot serverMapPathquotmdbbookshopmdbquot quotdriver=microsoft access driver *mdbquot#39前兩句為一行代碼 set conn=serverCreateObjectquotadodbconnectionquotconn。

首先建立oledb數(shù)據(jù)庫鏈接，其次創(chuàng)建記錄集對(duì)象，寫好條件查詢sql，打開記錄集，最后使用while wend循環(huán)輸出記錄 大致步驟如下dataaccess = servermappathquotdataxxxmdbquot#39連接OLEDB Set oConn = ServerCreateObjectquot。

第一行程序利用Server對(duì)象的MapPath函數(shù)，取得要打開數(shù)據(jù)庫的完整的文件路徑，并存儲(chǔ)在變量DbPath中這其中，數(shù)據(jù)庫名是我們需要指定的參數(shù)，應(yīng)該用我們要打開的數(shù)據(jù)庫的實(shí)際名稱替代如果數(shù)據(jù)庫名是直接作為常量出現(xiàn)，要用。

然后在你要查找的頁面內(nèi)輸入這段代碼Set rs = ServercreateobjectquotADODBRecordsetquotsql=quotselect * from news order by date descquotrsopen sql，conn，1，1 其中news是你數(shù)據(jù)庫里那張表的名稱。

方法步驟如下1首先打開ACCESS應(yīng)用程序，并選擇一個(gè)數(shù)據(jù)庫打開2雙擊數(shù)據(jù)庫中的一個(gè)表名，打開該數(shù)據(jù)表的數(shù)據(jù)表視圖3在工具欄依次點(diǎn)擊“創(chuàng)建”“查詢?cè)O(shè)計(jì)”，打開查詢?cè)O(shè)計(jì)窗口4在查詢?cè)O(shè)計(jì)中，點(diǎn)擊“關(guān)閉。

然后就可以操作數(shù)據(jù)庫的查詢 修改 添加 更新等 如sql=quotselect * from 表quotset rs=servercreatObjectquotadodbrecordsetquotrsopen sql，conn，1，1 do while not rseof responsewrite rs0quotbrquotrsmovenext lo。

lttd height=quot25quot valign=quotbottomquot bgcolor=quot#FFFFFFquotlta href=quotNewsNewsShowasp？NewsId=lt%=rsquotNewsIdquot%quot target=quot_blankquotlt%=LeftNewsTitle，26%ltalttd lttd height=quot21quot align=quotcenterquot。

方法很多，我給你最簡(jiǎn)單的辦法不用任何代碼建立表表里包括錯(cuò)誤代碼詳細(xì)描述信息兩個(gè)字段再在查詢主菜單按照向?qū)陆ú樵?，查詢里把剛才建立好的表作為來源，向?qū)?huì)教你怎么完成保存好最后新建窗體。

使用語句查詢需要有sql基礎(chǔ)，但有一定水準(zhǔn)以后才能熟練應(yīng)用，這里只說一下使用access中sql視圖的方法1打開access的文件 2點(diǎn)擊上方菜單欄的創(chuàng)建查詢?cè)O(shè)計(jì) 3彈出的小窗口點(diǎn)關(guān)閉 4在上半部空白處點(diǎn)右鍵，選擇sql視圖。

Searchasp lt Dim Def_ResourceDBPath，Connstr，sql，skey，page，counter Dim Conn，Rs Def_ResourceDBPath = quotdb#mydbaspquotConnstr = quotProvider=Data Source=quot ServerMapPathDef_。