關(guān)閉數(shù)據(jù)庫(kù)<%conn.closesetconn=nothing%>修伽i數(shù)據(jù)庫(kù)信息<%'插入sql="INSE" />

亚洲免费在线-亚洲免费在线播放-亚洲免费在线观看-亚洲免费在线观看视频-亚洲免费在线看-亚洲免费在线视频

asp操作access數(shù)據(jù)庫(kù)的讀寫刪

系統(tǒng) 1949 0

打開數(shù)據(jù)庫(kù)

< %
' OnErrorResumeNext
Set conn = Server.CreateObject( " ADODB.Connection " )
connstr
= " Provider=Microsoft.Jet.OLEDB.4.0;DataSource= " & Server.MapPath( " data/db.mdb " )
conn.openconnstr
%
>

關(guān)閉數(shù)據(jù)庫(kù)

< %
conn.close
set conn = nothing
%
>

修伽i數(shù)據(jù)庫(kù)信息

< %
' 插入
sql = " INSERTINTObranchtype(branchname,sj)VALUES(' " & branchname & " ',' " & now () & " ') "
conn.execute(sql)

' 修改
sql = " updatebranchtypesetbranchname=' " & branchname & " 'wherebranchid= " & clng (branchid)
conn.execute(sql)

' 刪除
sql = " delete*fromnewslistwhereid= " & id
conn.execute(sql)

讀取數(shù)據(jù)庫(kù)信息并顯示

' 無分頁(yè)顯示
sql = " selectbranchnamefrombranchtypewherebranchid= " & branchid
set rs = conn.execute(sql)
if not rs.eof then
do while not rs.eof
response.writers(
" branchname " ) & " <br/> "
rs.movenext
loop
else
response.write
" 對(duì)不起,沒有數(shù)據(jù) "
end if
set rs = nothing


' 分頁(yè)顯示
set rs = server.createobject( " adodb.recordset " )
rs.opensql,conn,
1 , 1
if not rs.eof then
rs.PageSize
= 16 ' 每頁(yè)顯示的數(shù)據(jù)條數(shù)
page = request( " page " )
if isnumeric (page) = false then
page
= 1
elseif page = "" then
page
= 1
end if
page
= clng (page)
if page > rs.pagecount then
page
= rs.pagecount
end if
rs.AbsolutePage
= page
for i = 1 to rs.pagesize
if rs.eof or rs.bof then
exit for
end if
response.writers(
" branchname " ) & " <br/> "

rs.movenext
next
if rs.pagecount > 1 then
%
>
< % if page <> 1 then % > < ahref =< % = webpage% > page = 1 title = 首頁(yè) > 首頁(yè) </ a >< % else % >< fontcolor = dcdcdc > 首頁(yè) </ font > < % end if % >
< % if page > 10 then % > < ahref =< % = webpage% > page =< % = page - 10 % > title = 上十頁(yè) > 上十頁(yè) </ a >< % else % >< fontcolor = dcdcdc > 上十頁(yè) </ font > < % end if % >
< % if page > 1 then % > < ahref =< % = webpage% > page =< % = page - 1 % > title = 上一頁(yè) > 上一頁(yè) </ a >< % else % >< fontcolor = dcdcdc > 上一頁(yè) </ font > < % end if % >
< % = rs.recordcount% > 條數(shù)據(jù)共 < % = rs.pagecount% > 頁(yè)當(dāng)前第 < % = page% > 頁(yè)
< % if page < rs.pagecount then % > < ahref =< % = webpage% > page =< % = page + 1 % > title = 下一頁(yè) > 下一頁(yè) </ a >< % else % >< fontcolor = dcdcdc > 下一頁(yè) </ font > < % end if % >
< % if page < rs.pagecount - 10 then % > < ahref =< % = webpage% > page =< % = page + 10 % > title = 下十頁(yè) > 下十頁(yè) </ a >< % else % >< fontcolor = dcdcdc > 下十頁(yè) </ font > < % end if % >
< % if page <> rs.pagecount then % > < ahref =< % = webpage% > page =< % = rs.pagecount% > title = 末頁(yè) > 末頁(yè) </ a >< % else % >< fontcolor = dcdcdc > 末頁(yè) </ font > < % end if % >
< %
end if
else
response.write
" 對(duì)不起,沒有數(shù)據(jù) "
end if
rs.close
set rs = nothing
%
>

asp操作access數(shù)據(jù)庫(kù)的讀寫刪


更多文章、技術(shù)交流、商務(wù)合作、聯(lián)系博主

微信掃碼或搜索:z360901061

微信掃一掃加我為好友

QQ號(hào)聯(lián)系: 360901061

您的支持是博主寫作最大的動(dòng)力,如果您喜歡我的文章,感覺我的文章對(duì)您有幫助,請(qǐng)用微信掃描下面二維碼支持博主2元、5元、10元、20元等您想捐的金額吧,狠狠點(diǎn)擊下面給點(diǎn)支持吧,站長(zhǎng)非常感激您!手機(jī)微信長(zhǎng)按不能支付解決辦法:請(qǐng)將微信支付二維碼保存到相冊(cè),切換到微信,然后點(diǎn)擊微信右上角掃一掃功能,選擇支付二維碼完成支付。

【本文對(duì)您有幫助就好】

您的支持是博主寫作最大的動(dòng)力,如果您喜歡我的文章,感覺我的文章對(duì)您有幫助,請(qǐng)用微信掃描上面二維碼支持博主2元、5元、10元、自定義金額等您想捐的金額吧,站長(zhǎng)會(huì)非常 感謝您的哦!!!

發(fā)表我的評(píng)論
最新評(píng)論 總共0條評(píng)論
主站蜘蛛池模板: 漂亮女大学一级毛片 | 欧美亚洲国产成人精品 | 国产精品1000部在线观看 | 一区二区国产在线播放 | 国产欧美一区二区精品性色99 | 亚洲欧美中文字幕 | 国产一区二区三区免费在线视频 | 91视频观看| 毛片色毛片18毛片美女 | 欧美一级一极性活片免费观看 | 综合免费一区二区三区 | 最猛黑人xxxⅹ黑人猛交 | 亚洲精品美女一区二区三区乱码 | 欧美精品18xxxhd4k | 亚洲精品123区在线观看 | 国产精品久久久影院 | 奇米影视大全 | 国产视频a区 | 一本色道久久综合一区 | 麻豆日韩区久久综合 | 奇米奇米色 | 91正在播放极品白嫩在线观看 | 亚洲第一页色 | 成人毛片免费观看视频在线 | 奇米影视777中文久久爱 | 91中文字幕在线视频 | 天天草夜夜| 日本免费毛片在线高清看 | 一本色道久久爱88a 一本色道久久爱88av俺来也 | 国产精品高清在线观看地址 | 欧美成人免费全部观看天天性色 | 亚洲成a人v在线观看 | 亚洲国产精品成人综合色在线婷婷 | 久久精品国产亚洲a | 99re在线 | 久久精品久久久久久久久人 | 日本黄 色 成 年 人免费观看 | 国产免费一区二区三区免费视频 | 国产在线91精品入口 | 九天玄帝诀王凡小说免费阅读 | 精品综合久久久久久97超人该 |