天下高月小说,欢乐颂

主頁(yè) > 知識(shí)庫(kù) > 簡(jiǎn)單的ASP中經(jīng)常用到的代碼[推薦]第1/4頁(yè)

簡(jiǎn)單的ASP中經(jīng)常用到的代碼[推薦]第1/4頁(yè)

用數(shù)據(jù)庫(kù)語(yǔ)句

　　1.select 語(yǔ)句：命令數(shù)據(jù)庫(kù)引擎從數(shù)據(jù)庫(kù)里返回信息，作為一組記錄。
　　2.insert into 語(yǔ)句：添加一個(gè)或多個(gè)記錄至一個(gè)表。
　　3.update 語(yǔ)句：創(chuàng)建更新查詢(xún)來(lái)改變基于特定準(zhǔn)則的指定表中的字段值。
　　4.delete 語(yǔ)句：創(chuàng)建一個(gè)刪除查詢(xún)把記錄從 from 子句列出并符合 where 子句的一個(gè)或更多的表中清除。
　　5.execute 語(yǔ)句：用于激活 procedure（過(guò)程）

用 asp 來(lái)做一個(gè)自己的通訊錄練練手吧……

一、建立數(shù)據(jù)庫(kù)：

　　用 microsoft access 建立一個(gè)名為 data.mdb 的空數(shù)據(jù)庫(kù)，使用設(shè)計(jì)器創(chuàng)建一個(gè)新表。輸入以下幾個(gè)字段：

　　字段名稱(chēng)　　數(shù)據(jù)類(lèi)型　　說(shuō)明　　　　　　其它
　　id　　　　　自動(dòng)編號(hào)　　數(shù)據(jù)標(biāo)識(shí)　　　　字段大?。洪L(zhǎng)整型　新值：遞增　索引：有（無(wú)重復(fù)）
　　username　　文本　　　　姓名　　　　　　缺省值
　　usermail　　文本　　　　e-mail　　　　　缺省值
　　view　　　　數(shù)字　　　　查看次數(shù)　　　　字段大?。洪L(zhǎng)整型　默認(rèn)值：0　索引：無(wú)
　　indate　　　時(shí)間日期　　加入時(shí)間　　　　缺省值

　　保存為 data.mdb 文件，為了便于說(shuō)明，只是做了一個(gè)比較簡(jiǎn)單的庫(kù)。

二、連接數(shù)據(jù)庫(kù)

　　方*1：
　　set conn = server.createobject("adodb.connection"
　　conn.open "driver={microsoft access driver (*.mdb)};dbq="server.mappath("data.mdb"

　　方*2：
　　set conn = server.createobject("adodb.connection"
　　conn.open "provider=microsoft.jet.oledb.4.0;data source="server.mappath("data.mdb":'(

　　注意：一個(gè)頁(yè)面中，只要連接一次就可以了，數(shù)據(jù)庫(kù)使用完后要及時(shí)關(guān)閉連接。
　　conn.close
　　set conn = nothing

三、添加新記錄到數(shù)據(jù)庫(kù)

　　set conn = server.createobject("adodb.connection":'(
　　conn.open "driver={microsoft access driver (*.mdb)};dbq="server.mappath("data.mdb":'(

　　username = "風(fēng)云突變"
　　usermail = "fytb@163.com"
　　indate = now()

　　sql = "insert into data (username,usermail,indata) values('"username"','"usermail"','"indate"')"
　　conn.execute(sql)

　　conn.close
　　set conn = nothing

　　說(shuō)明：建立數(shù)據(jù)庫(kù)連接；通過(guò)表單獲取姓名、e-mail 字符串，now()獲取當(dāng)前時(shí)間日期；使用 insert into 語(yǔ)句添加新記錄；conn.execute 來(lái)執(zhí)行；最后關(guān)閉。

四、選擇數(shù)據(jù)庫(kù)里的記錄

　　1.選擇所有記錄的字段（按記錄倒序排序）：sql = "select * from data order by id desc"
　　2.選擇所有記錄的姓名和e-mail字段（不排序）：sql = "select username,usermail from data"
　　3.選擇姓名為“風(fēng)云突變”的所有記錄：sql = "select * from data where username='"風(fēng)云突變"'"
　　4.選擇使用 163 信箱的所有記錄（按查看次數(shù)排序）：sql = "select * from data where usermail like '%"@163.com"%' order by view desc"
　　5.選擇最新的10個(gè)記錄：sql = "select top 10 * from data order by id desc"

　　sql 語(yǔ)句已經(jīng)知道了，不過(guò)在web應(yīng)用時(shí)，還得創(chuàng)建一個(gè) recordset 對(duì)象得到記錄集，才能把從數(shù)據(jù)庫(kù)里取出的值應(yīng)用在網(wǎng)頁(yè)上，如果現(xiàn)在將所有的記錄顯示在網(wǎng)頁(yè)上就這樣：

　　set conn = server.createobject("adodb.connection":'(
　　conn.open "driver={microsoft access driver (*.mdb)};dbq="server.mappath("data.mdb":'(

　　sql = "select * from data"
　　set rs = server.createobject("adodb.recordset":'(
　　rs.open sql,conn,1,1

　　do while not rs.eof
　　　　response.write "p>姓名：" rs("username":'( "　e-mail：" rs("usermail") "　查看：" rs("view") "次　" rs("indate") "加入/p>"
　　　　rs.movenext
　　loop

　　rs.close
　　set rs = nothing
　　conn.close
　　set conn = nothing

　　說(shuō)明：建立數(shù)據(jù)庫(kù)連接；創(chuàng)建 rs 得到記錄集；循環(huán)顯示記錄，rs.eof 表示記錄末，rs.movenext 表示移到下一個(gè)記錄；最后關(guān)閉。

五、修改（更新）數(shù)據(jù)庫(kù)記錄

　　修改記錄的e-mail：

　　set conn = server.createobject("adodb.connection")
　　conn.open "driver={microsoft access driver (*.mdb)};dbq="server.mappath("data.mdb")

　　id = 1
　　usermail = "fytb@163.com"

　　sql = "update data set usermail='"usermail"' where id="cint(id)
　　conn.execute(sql)

　　conn.close
　　set conn = nothing

　　說(shuō)明：建立數(shù)據(jù)庫(kù)連接；獲取記錄id、新 e-mail 字符串；使用 update 語(yǔ)句修改記錄；conn.execute 來(lái)執(zhí)行；最后關(guān)閉。
　　如果使記錄的查看值加1，則：sql = "update data set view=view+1 where id="cint(id)

六、刪除數(shù)據(jù)庫(kù)記錄

　　刪除某一條記錄：

　　set conn = server.createobject("adodb.connection")
　　conn.open "driver={microsoft access driver (*.mdb)};dbq="server.mappath("data.mdb")

　　id = 1

　　sql = "delete from data where id="cint(id)
　　conn.execute(sql)

　　conn.close
　　set conn = nothing

　　說(shuō)明：建立數(shù)據(jù)庫(kù)連接；獲取記錄id；使用 delete 語(yǔ)句刪除記錄；conn.execute 來(lái)執(zhí)行；最后關(guān)閉。
　　刪除多條記錄為：sql = "delete from data where id in (id1,id2,id3)"
　　刪除所有記錄為：sql = "delete from data"

1234下一頁(yè)閱讀全文

標(biāo)簽：咸陽(yáng) 麗江鐵嶺昆明昌都家電維修溫州泰州

巨人網(wǎng)絡(luò)通訊聲明：本文標(biāo)題《簡(jiǎn)單的ASP中經(jīng)常用到的代碼[推薦]第1/4頁(yè)》，本文關(guān)鍵詞簡(jiǎn)單,的,ASP,中,經(jīng)常,用到,；如發(fā)現(xiàn)本文內(nèi)容存在版權(quán)問(wèn)題，煩請(qǐng)?zhí)峁┫嚓P(guān)信息告之我們，我們將及時(shí)溝通與處理。本站內(nèi)容系統(tǒng)采集于網(wǎng)絡(luò)，涉及言論、版權(quán)與本站無(wú)關(guān)。