日本黄色一级经典视频|伊人久久精品视频|亚洲黄色色周成人视频九九九|av免费网址黄色小短片|黄色Av无码亚洲成年人|亚洲1区2区3区无码|真人黄片免费观看|无码一级小说欧美日免费三级|日韩中文字幕91在线看|精品久久久无码中文字幕边打电话

當前位置:首頁 > 芯聞號 > 充電吧
[導(dǎo)讀]首先要保證已經(jīng)安裝了IIS,有問題再說。讀寫數(shù)據(jù)庫代碼:<%'建立Connection和RecordSet對象Set Cnn = Server.CreateObject("Adodb.Conne

首先要保證已經(jīng)安裝了IIS,有問題再說。
讀寫數(shù)據(jù)庫代碼:
<%
'建立Connection和RecordSet對象
Set Cnn = Server.CreateObject("Adodb.Connection")
Set Rs = Server.CreateObject("Adodb.Recordset")
'打開數(shù)據(jù)庫
Cnn.Open "Driver={Microsoft Access Driver (*.mdb)};dbq="&Server.MapPath("與當前頁面相對地址下的Access文件名")
'注釋:
'連接sql server數(shù)據(jù)庫為
'Cnn.Open "Driver={Sql Server};server=數(shù)據(jù)庫服務(wù)器地址;uid=用戶名;pwd=密碼;datebase=缺省的數(shù)據(jù)庫"
'連接ODBC為,如果用戶名或者密碼為空,直接用兩個連續(xù)的雙引號""表示為空
'Cnn.Open "ODBC DSN名稱","用戶名","密碼"
'打開數(shù)據(jù)表
sql="Select * from 表名"
'1和3的意思你應(yīng)該知道,如果不清楚所有的情況就用這兩個參數(shù)就行了。
Rs.Open sql,Cnn,1,3
'判斷數(shù)據(jù)庫是否為空
If Rs.eof Then
Response.Write "數(shù)據(jù)庫為空。"
End if
'在數(shù)據(jù)表里添加空行
Rs.AddNew
'給空行寫入數(shù)據(jù)
Rs("Name")="YangYang"
Rs("Pass")="yangyang"
'別忘了更新一下
Rs.Update
'修改記錄,和添加記錄類似,只是沒有了Rs.AddNew
'刪除數(shù)據(jù)表中的當前行
Rs.Delete
'也可以用Sql語句操作數(shù)據(jù)庫,假設(shè)數(shù)據(jù)表叫Users,里面有User,Pass,Time三個字段
'用Sql插入記錄
strUser="Yang"
strPass="Zhao"
strTime=now()? '注釋:當前時間
sql="Insert Into Users (User,Name,Time) Values ('"&strUser&"','"&strPass&"','"&strTime&"')"
Cnn.Execute(Sql)
'用Sql刪除記錄
Sql="Delete Users Where User='"&strUser&"'"
Cnn.Execute(sql)
'用Sql修改記錄
Sql="Update Users Set Pass='abcd' Where User='Yang'"
Cnn.Execute(sql)
'循環(huán)在網(wǎng)頁上打印所有數(shù)據(jù)
Do Until(rs.eof)
'key可以是字段的順序號(從1開始),也可以是字段名稱,字段名稱要用雙引號引起來。
Response.write Rs(key1)&RS(key2)
Rs.Next
Loop
'關(guān)閉表對象和連接對象
Rs.Close
Set Rs = Nothing
Cnn.close
Set Cnn = Nothing
%>

本站聲明: 本文章由作者或相關(guān)機構(gòu)授權(quán)發(fā)布,目的在于傳遞更多信息,并不代表本站贊同其觀點,本站亦不保證或承諾內(nèi)容真實性等。需要轉(zhuǎn)載請聯(lián)系該專欄作者,如若文章內(nèi)容侵犯您的權(quán)益,請及時聯(lián)系本站刪除( 郵箱:macysun@21ic.com )。
換一批
延伸閱讀
關(guān)閉