第12章 Web數(shù)據(jù)庫(kù)的操作_第1頁(yè)
第12章 Web數(shù)據(jù)庫(kù)的操作_第2頁(yè)
第12章 Web數(shù)據(jù)庫(kù)的操作_第3頁(yè)
第12章 Web數(shù)據(jù)庫(kù)的操作_第4頁(yè)
第12章 Web數(shù)據(jù)庫(kù)的操作_第5頁(yè)
已閱讀5頁(yè)，還剩51頁(yè)未讀， 繼續(xù)免費(fèi)閱讀

下載本文檔

版權(quán)說(shuō)明：本文檔由用戶提供并上傳，收益歸屬內(nèi)容提供方，若內(nèi)容存在侵權(quán)，請(qǐng)進(jìn)行舉報(bào)或認(rèn)領(lǐng)

文檔簡(jiǎn)介

第12章

Web數(shù)據(jù)庫(kù)的操作12.1數(shù)據(jù)庫(kù)訪問(wèn)流程12.2數(shù)據(jù)庫(kù)的連接12.3數(shù)據(jù)的查詢控制12.4數(shù)據(jù)的添加、刪除和修改本章學(xué)習(xí)目標(biāo)l

ASP訪問(wèn)數(shù)據(jù)庫(kù)的流程l

在ASP中連接數(shù)據(jù)庫(kù)的4種方法l

數(shù)據(jù)庫(kù)的常用查詢方法l

如何確定用戶的操作權(quán)限l

進(jìn)行數(shù)據(jù)添加操作的方法l

進(jìn)行數(shù)據(jù)刪除操作的方法l

進(jìn)行數(shù)據(jù)修改操作的方法12.1數(shù)據(jù)庫(kù)訪問(wèn)流程進(jìn)行數(shù)據(jù)源操作的步驟如下：（1）創(chuàng)建與數(shù)據(jù)庫(kù)的連接，可以使用ADO中的Connection對(duì)象或RecordSet對(duì)象的相關(guān)屬性和方法。（2）設(shè)定要操作數(shù)據(jù)庫(kù)的命令，可以使用ADO中的Connection對(duì)象、Command對(duì)象或RecordSet對(duì)象的相關(guān)方法和屬性來(lái)完成。（3）執(zhí)行命令，可以使用ADO中的Connection對(duì)象、Command對(duì)象或RecordSet對(duì)象的相關(guān)方法。（4）得到數(shù)據(jù)后，就可以執(zhí)行對(duì)數(shù)據(jù)的瀏覽、增加、刪除、修改等操作，這一步通常使用RecordSet對(duì)象的有關(guān)方法和屬性完成。

（5）關(guān)閉數(shù)據(jù)庫(kù)，清除有關(guān)對(duì)象。返回首頁(yè)圖12-1ADO存取數(shù)據(jù)源流程返回本節(jié)12.2數(shù)據(jù)庫(kù)的連接（1）在Connection對(duì)象中設(shè)置ConnectionSTRing參數(shù)時(shí)，可以通過(guò)設(shè)置系統(tǒng)數(shù)據(jù)源（SystemDSN），即通過(guò)設(shè)置ODBC的方法來(lái)連接數(shù)據(jù)庫(kù)。關(guān)于DSN的設(shè)定請(qǐng)參閱前面的章節(jié)。在ASP中利用DSN連接數(shù)據(jù)庫(kù)的代碼如下：Setconn=Server.CreateObject("ADODB.Connection")conn.Open"DSN=txl;UID=sa;PWD=;Database=txl"（2）如果不采用DSN連接數(shù)據(jù)庫(kù)，在設(shè)置ConnectionSTRing參數(shù)時(shí)，可以采用直接指定ODBC驅(qū)動(dòng)程序連接數(shù)據(jù)庫(kù)，連接SQLServer數(shù)據(jù)庫(kù)的代碼如下：Setconn=Server.CreateObject("ADODB.Connection")sTRProvider="Driver={SQLServer};Server=zjf;Database=txl;UID=sa;PWD=;"conn.OpensTRProvider返回首頁(yè)（3）通過(guò)OLEDB連接。代碼如下：Setconn=Server.CreateObject("ADODB.Connection")sTRPro="Provider=sqloledb;DataSource=zjf;InitialCatalog=txl;UserID=sa;Password=;"conn.OpensTRPro（4）在其他對(duì)象中，也可以通過(guò)設(shè)置ActiveConnection參數(shù)，完成對(duì)數(shù)據(jù)源連接的設(shè)置。以常用的RecordSet對(duì)象為例，可以使用該對(duì)象的Open方法，利用設(shè)置好的ActiveConnection參數(shù)完成對(duì)數(shù)據(jù)庫(kù)的連接，程序代碼如下：Setrs=Server.CreateObject("ADODB.RecordSet")rs.Open"t_student","Provider=sqloledb;DataSource=zjf;InitialCatalog"&_"=txl;UserID=sa;Password=;",adOpenStatic,adLockreadOnly,adCmdTable返回本節(jié)12.3數(shù)據(jù)的查詢控制數(shù)據(jù)庫(kù)在網(wǎng)絡(luò)中的應(yīng)用大部分集中在數(shù)據(jù)的查詢操作上。數(shù)據(jù)查詢需要使用ADO對(duì)象中的Connection對(duì)象和RecordSet對(duì)象。進(jìn)行數(shù)據(jù)查詢時(shí)，主要使用SQL語(yǔ)句中的Select語(yǔ)句，通過(guò)該語(yǔ)句就可以得到所要查詢的數(shù)據(jù)記錄。下面的例子將介紹如何利用Session對(duì)象和RecordSet對(duì)象的AbsolutePosition屬性以一頁(yè)或一條為單位來(lái)瀏覽查詢結(jié)果。返回首頁(yè)例12-1：第1步：建立ASP查詢，文件名為select.asp。在這個(gè)查詢中，使用了Session對(duì)象存儲(chǔ)RecordSet對(duì)象，數(shù)據(jù)庫(kù)的連接使用了RecordSet對(duì)象的Open方法。程序代碼如下：<!--#includefile=adovbs.inc--><HTML><BODYbgcolor="#ccffcc"><%'設(shè)置每一頁(yè)所要顯示的記錄條數(shù)，這里為9條。Session("flag")=9'用RecordSet對(duì)象的Open方法連接數(shù)據(jù)庫(kù)SetSession("rs")=Server.CreateObject("Adodb.recordSet")Constr="Provider=sqloledb;DataSource=zjf;InitialCatalog=txl;UserID=sa;Password=;"Session("rs").cursorlocation=aduseclientsql="select*fromt_studentorderbyt_number"'利用RecordSet對(duì)象的Open方法創(chuàng)建記錄集Session("rs").Opensql,Constr,adOpenkeySet,adlockreadonly,adcmdtext%><%'輸出表頭，由于數(shù)據(jù)庫(kù)中的字段名稱為英文，因此，采用HTML標(biāo)記輸出%><TABLEborder="1"bordercolor="#000000"cellspacing="1"cellpadding="0"align="center"><TRalign=centervalign=middleheight=23><TD><B>學(xué)號(hào)</B></TD><TD><B>姓名</B></TD><TD><B>性別</B></TD><TD><B>電話</B></TD><TD><B>籍貫</B></TD><TD><B>班級(jí)</B></TD><TD><B>民族</B></TD></TR><%'記錄開(kāi)始時(shí)，當(dāng)前數(shù)據(jù)指針在RecordSet對(duì)象的位置

Session("start")=Session("rs").AbsolutePosition'輸出表中的數(shù)據(jù)Forj=0ToSession("flag")-1Response.Write"<TRalign=centervalign=middle>"'記錄結(jié)束時(shí)，當(dāng)前數(shù)據(jù)指針在RecordSet對(duì)象的位置

Session("End")=Session("rs").Absoluteposition'其中Session("rs").fields.count表示表的字段數(shù)

Fori=0ToSession("rs").fields.count-1'把當(dāng)前的數(shù)據(jù)記錄顯示出來(lái)

Response.Write"<TD>"&Session("rs").fields(i).value&"</TD>"NextResponse.Write"</TR>"'移到下一條數(shù)據(jù)記錄，然后判斷是否到表尾，如果是，則把數(shù)據(jù)指針移到表頭

Session("rs").MoveNext

IfSession("rs").EofThenSession("rs").MovePrevious

ExitForEndIfNextResponse.Write"</TABLE>"%><%'引入另一個(gè)文件，完成翻頁(yè)功能%><!--#includefile=link.asp-->第2步：建立具有翻頁(yè)功能的ASP程序，文件名為link.asp。該文件將顯示“上一頁(yè)”、“下一頁(yè)”、“開(kāi)始記錄”、“結(jié)束記錄”和“數(shù)據(jù)總條數(shù)”等信息，并完成一定的鏈接關(guān)系，如“上一頁(yè)”及“下一頁(yè)”加入了超鏈接。注意：當(dāng)記錄指針位于第一頁(yè)時(shí)，“上一頁(yè)”沒(méi)有超鏈接，而當(dāng)記錄指針位于最后一頁(yè)時(shí)，“下一頁(yè)”沒(méi)有超鏈接。程序代碼如下：<%Response.Write"<BR>數(shù)據(jù)總條數(shù)："&Session("rs").RecordCount&""'判斷是否到表尾或記錄解釋否，如果是，則只給“上一頁(yè)”加上超鏈接If(Session("rs").Eof)or(Session("End")>=Session("rs").RecordCount)ThenResponse.Write"[<Ahref=""Query.asp?Method=Previous"">上一頁(yè)</A>|"Response.Write"下一頁(yè)]"'否則看是不是表頭，如果是則只給“下一頁(yè)”加上超鏈接ElseIf((Session("rs").Bof)or(Session("start")=1))ThenResponse.Write"[上一頁(yè)|"

Response.Write"<Ahref=""Query.asp?Method=Next"">下一頁(yè)</A>]"'其他情況，都加上超鏈接ElseResponse.Write"[<Ahref=""Query.asp?Method=Previous"">上一頁(yè)</A>|"Response.Write"<Ahref=""Query.asp?Method=Next"">下一頁(yè)</A>]"EndIfResponse.Write"開(kāi)始記錄："&Session("Start")&"，結(jié)束記錄："&Session("End")&"。"%>第3步：建立顯示“上一頁(yè)”或“下一頁(yè)”功能的ASP程序，文件名為Query.asp。在該程序中將繼續(xù)顯示表中的數(shù)據(jù)。程序中使用MoveNext方法和MovePrevious方法完成數(shù)據(jù)指針的定位。代碼如下：<!--#includefile=adovbs.inc--><HTML><BODYbgcolor="#ccffcc"><%'顯示表頭%><TABLEborder="1"bordercolor="#000000"cellspacing="1"cellpadding="0"align="center"><TRalign=centervalign=middleheight=23><TD><B>學(xué)號(hào)</B></TD><TD><B>姓名</B></TD><TD><B>性別</B></TD><TD><B>電話</B></TD><TD><B>籍貫</B></TD><TD><B>班級(jí)</B></TD><TD><B>民族</B></TD></TR><%'將數(shù)據(jù)指針移到要求的位置，先移到頭，再使用MoveNext往下移IfRequest("Method")="Previous"Thenifsession("end")=Session("rs").AbsolutePositionthencount=session("end")-session("start")+9elsecount=Session("Flag")*2endifFori=1TocountSession("rs").MovePrevious

IfSession("rs").BofThenSession("rs").MoveNext

ExitForEndIf

NextEndIf'記錄數(shù)據(jù)的起始位置。Session("Start")=Session("rs").AbsolutePosition'顯示表中指定數(shù)據(jù)Forj=0ToSession("Flag")-1Response.Write"<TRalign=centervalign=middle>"Session("End")=Session("rs").AbsolutePosition

'顯示當(dāng)前數(shù)據(jù)記錄。

Fori=0ToSession("rs").Fields.count-1Response.Write"<TD>"&Session("rs")(i).Value&"</TD>"NextResponse.Write"</TR>"Session("rs").MoveNext

IfSession("rs").EofThenSession("rs").MovePrevious

ExitForEndIfNEXTResponse.Write"</TABLE>"%></BODY><!--#includeFile=link.asp-->通過(guò)瀏覽器運(yùn)行程序select.asp，顯示結(jié)果如圖12-2所示。圖12-2數(shù)據(jù)控制程序結(jié)果1：顯示首記錄圖12-3數(shù)據(jù)控制程序結(jié)果2：顯示表中最后的數(shù)據(jù)記錄返回本節(jié)12.4數(shù)據(jù)的添加、刪除和修改12.4.1用戶操作權(quán)限12.4.2數(shù)據(jù)的添加12.4.3數(shù)據(jù)的刪除12.4.4數(shù)據(jù)的修改返回首頁(yè)12.4.1用戶操作權(quán)限1．確認(rèn)用戶的權(quán)限可以先將用戶的名稱、密碼和權(quán)限代碼存放在一個(gè)數(shù)據(jù)表中，當(dāng)用戶登錄網(wǎng)站時(shí)，確認(rèn)用戶名和密碼后，從數(shù)據(jù)庫(kù)中取得該用戶的權(quán)限代碼，然后利用Session變量標(biāo)識(shí)該用戶。假設(shè)用戶的相關(guān)信息都存放在表users中，程序代碼如下：<%'取得用戶輸入的用戶名和密碼，并去掉空格sTRUserName=Trim(Request.Form("Username"))sTRUserPassword=Trim(Request.Form("Userpassword"))'創(chuàng)建與數(shù)據(jù)庫(kù)的連接SetobjDBConn=Server.Createobject("ADODB.Connection")sTRProvider="Provider=sqloledb;DataSource=zjf;InitialCatalog=txl;UserID=sa;Password=;"objdbconn.OpensTRProvider'SQL查詢字符串sTRSQL="SELECT*FROMt_userWHEREUserName='"&sTRUserName&"'"SetobjRS=objDBConn.Execute(sTRSQL)'檢查用戶IfobjRS.EOFThen'無(wú)此用戶

Response.Redirect"UserLogin.asp"ElseIfTrim(objRS("UserPassword"))=sTRUserPasswordThen'密碼正確，找到用戶

Session("UserName")=objRS("UserName")

Session("UserLevel")=objRS("UserLevel")'進(jìn)入網(wǎng)站的網(wǎng)頁(yè)

Response.Redirect"main.asp"Else'密碼錯(cuò)誤

Response.Redirect"UserLogin.asp"EndIfSetobjRS=NothingSetobjDBConn=Nothing%>2．確認(rèn)用戶的操作在其他需要驗(yàn)證用戶的頁(yè)面通過(guò)該Session變量識(shí)別用戶，代碼如下：IfSession("UserLevel")<1ThenResponse.Redirect"Error.asp"EndIf圖12-5用戶沒(méi)有操作權(quán)限返回本節(jié)12.4.2數(shù)據(jù)的添加在網(wǎng)站中，經(jīng)常有添加數(shù)據(jù)記錄的需求。如一個(gè)提供電子郵件服務(wù)的網(wǎng)站，常常有人申請(qǐng)加入，這時(shí)就要用到添加用戶資料的功能。添加數(shù)據(jù)記錄的方法很多，這里主要介紹兩種。一種是利用SQL語(yǔ)句中的Insert命令，另一種是利用ADO對(duì)象之一的RecordSet對(duì)象的AddNew方法。例12-3：第1步：首先創(chuàng)建一個(gè)添加數(shù)據(jù)的頁(yè)面（INPUT.htm），在該頁(yè)面中詳細(xì)列出用戶需輸入的項(xiàng)目。其代碼如下：<HTML><BODYbgcolor="#ccffcc"><H2align=center>學(xué)

生

基

本

數(shù)

據(jù)

錄

入</H2><HR><Formmethod=POSTname=addaction="d_ins.asp"><DIValign=center><TABLEborder=0><TR><TDheight="41">姓名：</TD><TD><inputtype="text"name="name"size="20"></TD></TR><TR><TDheight="35">學(xué)號(hào)：</TD><TD><inputtype="text"name="number"size="20"></TD></TR><TR><TDheight="36">班級(jí)：</TD><TD><INPUTtype="text"name="class"size="20"></TD></TR><TR><TDheight="34">性別：</TD><TD><SELECTsize="1"name="sex"> <OPTIONselectedvalue="男">男</OPTION> <OPTIONvaluve="女">女</OPTION> </SELECT></TD></TR><TR><TDheight="33">民族：</TD><TD><INPUTtype="text"name="minzu"size="20"></TD></TR><TR><TDheight="39">籍貫：</TD><TD><inputtype="text"name="jiguan"size="20"></TD></TR><TR><TDheight="37">聯(lián)系電話：</TD><TD><INPUTtype="text"name="phone"size="20"></TD></TR></TABLE><INPUTtype=submitvalue="確定"name=B1><INPUTtype=reSetvalue="重填"name=B2></DIV></Form></BODY></HTML>圖12-6輸入頁(yè)面顯示第2步：建立表單處理程序（d_ins.asp），在該程序中利用SQL語(yǔ)句中的Insert命令添加數(shù)據(jù)記錄。這里將示范使用Connection對(duì)象的Execute方法運(yùn)行Insert命令。<%onerrorresumeNext'取得用戶輸入的數(shù)據(jù)t_name=request.form("name")t_number=request.form("number")t_class=request.form("class")t_sex=request.form("sex")t_minzu=request.form("minzu")t_phone=request.form("phone")t_jiguan=request.form("jiguan")'創(chuàng)建數(shù)據(jù)庫(kù)的連接Setconn=Server.CreateObject("ADODB.Connection")strProvider="Provider=sqloledb;DataSource=zjf;InitialCatalog=txl;UserID=sa;Password=;"conn.OpenstrProvider'添加時(shí)使用的字段fields=array("t_name","t_number","t_class","t_sex","t_mizu","t_phone","t_jiguan")values=array(t_name,t_number,t_class,t_sex,t_minzu,t_phone,t_jiguan)sql="INSERTINTOt_student("&Join(fields,",")&")VALUES('"&_Join(values,"','")&"')"'添加數(shù)據(jù)conn.Executesql'判斷執(zhí)行是否成功Ifconn.Errors.Count>0ThenResponse.Write"系統(tǒng)發(fā)生"&conn.errors.Count&"個(gè)錯(cuò)誤！"ElseResponse.Write"數(shù)據(jù)添加成功！"EndIfSetconn=nothing%>圖12-7數(shù)據(jù)錄入正確和錯(cuò)誤的顯示第3步：在添加數(shù)據(jù)時(shí)還可以利用RecordSet對(duì)象的AddNew方法增加數(shù)據(jù)記錄。程序代碼如下：<!--#includefile=adovbs.inc--><%'取得用戶輸入的數(shù)據(jù)t_name=request.form("name")t_number=request.form("number")t_class=request.form("class")t_sex=request.form("sex")t_minzu=request.form("minzu")t_phone=request.form("phone")t_jiguan=request.form("jiguan")'創(chuàng)建數(shù)據(jù)庫(kù)的連接

Setconn=Server.CreateObject("ADODB.Connection")strProvider="Provider=sqloledb;DataSource=zjf;InitialCatalog=txl;UserID=sa;Password=;"conn.OpenstrProvider'建立RecordSet對(duì)象Setrs=Server.createObject("ADODB.RecordSet")'啟動(dòng)指定的數(shù)據(jù)表，注意要AdLockOptimistic方式打開(kāi)rs.Open"t_student",strProvider,adOpenkeySet,adlockOptimistic'添加一條數(shù)據(jù)記錄rs.AddNewrs("t_number").value=t_numberrs("t_name").value=t_namers("t_sex").value=t_sexrs("t_class").value=t_classrs("t_mizu").value=t_minzurs("t_phone").value=t_phoners("t_jiguan").value=t_jiguan'將數(shù)據(jù)記錄回存到表中rs.UpdateSetrs=nothingSetconn=nothing%>注意：不能以只讀方式打開(kāi)表。返回本節(jié)12.4.3數(shù)據(jù)的刪除例12-4：第1步：建立刪除頁(yè)面，在該頁(yè)面中可以選擇刪除的記錄。其顯示結(jié)果如下圖12-8所示。第2步：建立數(shù)據(jù)刪除程序，可以利用SQL的Delete命令刪除數(shù)據(jù)記錄。程序代碼如下：<%'創(chuàng)建數(shù)據(jù)庫(kù)的連接Setconn=Server.CreateObject("ADODB.Connection")strProvider="Provider=sqloledb;DataSource=zjf;InitialCatalog=txl;UserID=sa;Password=;"conn.OpenstrProvider'取得被刪除記錄的標(biāo)識(shí)t_number=Request("delid")'設(shè)定執(zhí)行的SQL語(yǔ)句sql="DELETEFROMt_studentWHEREt_number="&t_number'執(zhí)行刪除操作conn.executesqlResponse.Write"該記錄已成功刪除!"Setconn=nothing%>第3步：在刪除記錄時(shí)，還可以利用RecordSet對(duì)象的Delete方法來(lái)刪除表中的數(shù)據(jù)記錄，如果要?jiǎng)h除的記錄可能不止一個(gè)，應(yīng)該采用UpdateBatch方法。程序代碼如下：<!--#includefile=adovbs.inc--><%'取得被刪除記錄的標(biāo)識(shí)t_number=Trim(Request("delid"))'創(chuàng)建數(shù)據(jù)庫(kù)的連接Setconn=Server.CreateObject("ADODB.Connection")strProvider="Provider=sqloledb;DataSource=zjf;InitialCatalog=txl;UserID=sa;Password=;"conn.OpenstrProvider'建立RecordSet對(duì)象Setrs=Server.CreateObject("ADODB.RecordSet")'啟動(dòng)指定的數(shù)據(jù)表，注意要AdLockOptimistic方式打開(kāi)rs.Open"t_student",Conn,adOpenkeySet,adlockOptimistic'利用循環(huán)檢查記錄，找到符合條件的記錄，刪除WhileNOTrs.EOFIftrim(rs("t_number").value)=t_numberThen

rs.Delete EndIf

rs.MoveNextWend'將數(shù)據(jù)回存到數(shù)據(jù)庫(kù)中rs.UpdateBatchrs.CloseSetconn=nothingSetrs=nothing%>返回本節(jié)12.4.4數(shù)據(jù)的修改例12-5：第1步：建立數(shù)據(jù)修改頁(yè)面。在修改數(shù)據(jù)時(shí)，應(yīng)該向用戶顯示當(dāng)前所選擇記錄的內(nèi)容，便于修改。因此，在程序的代碼中除了能夠獲得被操作的記錄外（如上節(jié)所示），還要回顯記錄內(nèi)容。程序代碼如下所示：<!--#includefile=adovbs.inc--><%'取得被編輯記錄的標(biāo)識(shí)t_number=Request("editid")'創(chuàng)建數(shù)據(jù)庫(kù)的連接Setconn=Server.CreateObject("ADODB.Connection")strProvider="Provider=sqloledb;DataSource=zjf;InitialCatalog=txl;UserID=sa;Password=;"conn.OpenstrProvider'建立RecordSet對(duì)象Setrs=Server.createObject("ADODB.RecordSet")'啟動(dòng)指定的數(shù)據(jù)表rs.Open"select*fromt_studentwheret_number="&_t_number,conn,adOpenkeySet,adlockOptimistic'獲得記錄值t_name=rs("t_name")t_number=rs("t_number")t_class=rs("t_class")t_sex=rs("t_sex")t_minzu=rs("t_mizu")t_phone=rs("t_phone")t_jiguan=rs("t_jiguan")%><HTML><BODYbgcolor="#ccffcc"onload="page_onload();"><H2align=center>學(xué)

生

基

本

數(shù)

據(jù)

錄

入</H2><HR><Formmethod=POSTname=addaction="d_edit.asp"><%'輸出記錄內(nèi)容%><divalign=center><TABLEborder=0><tr><tdheight="41">姓名：</td><td><inputtype="text"name="name"size="20"value="<%=Server.HTMLEncode(t_name)%>"></td></tr><tr><tdheight="35">學(xué)號(hào)：</td><td><inputtype="text"name="number"size="20"value="<%=Server.HTMLEncode(t_number)%>"></td></tr><tr><tdheight="36">班級(jí)：</td><td><inputtype="text"name="class"size="20"value="<%=Server.HTMLEncode(t_class)%>"></td></tr><tr><tdheight="34">性別：</td><td><selectsize="1"name="sex"> <optionvalue="<%=Server.HTMLEncode(t_sex)%>"> <%=Server.HTMLEncode(t_sex)%></option> <optionvalue="男">男</option> <optionvaluve="女">女</option> </select></td></tr><tr><tdheight="33">民族：</td><td><inputtype="text"name="minzu"size="20"value="<%=Server.HTMLEncode(t_minzu)%>"></td></tr><tr><tdheight="39">籍貫：</td><td><inputtype="text"name="jiguan"size="20"value="<%=Server.HTMLEncode(t_jiguan)%>"></td></tr><tr><tdheight="37">聯(lián)系電話：</td><td><inputtype="text"name="phone"size="20"value="<%=Server.HTMLEncode(t_phone)%>"></td></tr></TABLE><INPUTtype=submitvalue="確定"name=B1><INPUTtype=reSetvalue="重填"name=B2></div></Form><%Setconn=nothing%></BODY></HTML>在上例中，顯示每個(gè)字段的同時(shí)顯示了其對(duì)應(yīng)的取值，在圖12-7的頁(yè)面中選擇“修改”后，屏幕顯示如圖12-9所示。圖12-9修改頁(yè)面顯示第2步：建立數(shù)據(jù)修改程序?？梢岳肧QL語(yǔ)句中的Update命令修改表中的記錄，程序代碼如下：<!--#includefile=adovbs.inc--><%'取得用戶輸入的數(shù)據(jù)t_name=Trim(request.form("name"))t_number=Trim(request.form("number"))t_class=Trim(request.form("class"))t_sex=Trim(request.form("sex"))t_minzu=Trim(request.form("minzu"))t_phone=Trim(request.form("phone"))t_jiguan=Trim(request.form("jiguan"))'創(chuàng)建數(shù)據(jù)庫(kù)的連接Setconn=Server.CreateObject("ADODB.Connection")strProvider="Provider=sqloledb;DataSource=zjf;InitialCatalog=txl;UserID=sa;Password=;"conn.OpenstrProvider'設(shè)置修改時(shí)的SQL語(yǔ)句field=array("t_name","t_number","t_class","t_sex","t_mizu","t_phone","t_ji

溫馨提示

  • 1. 本站所有資源如無(wú)特殊說(shuō)明，都需要本地電腦安裝OFFICE2007和PDF閱讀器。圖紙軟件為CAD,CAXA,PROE,UG,SolidWorks等.壓縮文件請(qǐng)下載最新的WinRAR軟件解壓。
  • 2. 本站的文檔不包含任何第三方提供的附件圖紙等，如果需要附件，請(qǐng)聯(lián)系上傳者。文件的所有權(quán)益歸上傳用戶所有。
  • 3. 本站RAR壓縮包中若帶圖紙，網(wǎng)頁(yè)內(nèi)容里面會(huì)有圖紙預(yù)覽，若沒(méi)有圖紙預(yù)覽就沒(méi)有圖紙。
  • 4. 未經(jīng)權(quán)益所有人同意不得將文件中的內(nèi)容挪作商業(yè)或盈利用途。
  • 5. 人人文庫(kù)網(wǎng)僅提供信息存儲(chǔ)空間，僅對(duì)用戶上傳內(nèi)容的表現(xiàn)方式做保護(hù)處理，對(duì)用戶上傳分享的文檔內(nèi)容本身不做任何修改或編輯，并不能對(duì)任何下載內(nèi)容負(fù)責(zé)。
  • 6. 下載文件中如有侵權(quán)或不適當(dāng)內(nèi)容，請(qǐng)與我們聯(lián)系，我們立即糾正。
  • 7. 本站不保證下載資源的準(zhǔn)確性、安全性和完整性, 同時(shí)也不承擔(dān)用戶因使用這些下載資源對(duì)自己和他人造成任何形式的傷害或損失。

最新文檔

評(píng)論

0/150

提交評(píng)論