专题十用ADO开发Web数据库应用系统

专题十用ADO开发Web数据库应用系统提问 ASP的含义 ASP的内置对象有哪些，主要功能是什么专题十用ADO开发Web数据库应用系统提纲 ODBC,OLEDB,ADO ADO的常用对象 Web数据库应用程序开发步骤数据库的连接数据库操作一、ODBC,OLEDB,ADO ODBC（OpenDatabaseConnectivity，开放数据库互联）是微软公司开放服务结构中有关数据库的部分；它建立了一组对数据库访问的标准API，它们利用SQL来完成任务。一个基于ODBC的应用程序不依赖于任何DBMS(DataBaseManagementSystem,...

提问 ASP的含义 ASP的内置对象有哪些，主要功能是什么专题十用ADO开发Web数据库应用系统提纲 ODBC,OLEDB,ADO ADO的常用对象 Web数据库应用程序开发步骤数据库的连接数据库操作一、ODBC,OLEDB,ADO ODBC（OpenDatabaseConnectivity，开放数据库互联）是微软公司开放服务结构中有关数据库的部分；它建立了一组对数据库访问的标准 API，它们利用SQL来完成任务。一个基于ODBC的应用程序不依赖于任何DBMS(DataBaseManagementSystem,数据库管理系统)，所有数据库操作由对应的DBMS的ODBC驱动程序完成。 OLEDB是一种技术标准，目的是提供一种统一的数据访问接口，这里所说的“数据”除了包括标准关系型数据库中的数据外，还包括邮件数据、Web上的文本或图形、目录服务等。 OLEDB的核心内容是为各种数据存储提供一种相同的访问接口。 ADO是应用层编程接口，它通过OLEDB或ODBC提供的API接口函数访问数据库。它适合于各种C/S应用系统和基于Web的应用。 ADO是一套用自动化技术建立起来的对象层次结构，可以将ASP与ADO结合，开发具有读取Web数据库功能的应用程序；ASP完成服务器与浏览器的通信，ADO通过ODBC或OLEDB驱动程序连接各种支持ODBC或OLEDB的数据库。二、ADO的常用对象 Connection对象 Connection对象用于建立应用程序和数据库之间的连接；使用它可以确定以何种方式连接数据库、设置查询条件以及检查整个过程中发生的错误。常用的属性： ConnectionString：通过传递包含一系列由；分隔的参数语句详细描述数据源。常用的方法： Open：建立与数据库之间的连接语法：Connection对象实例.OpenConnectionString ConnectionString指明了连接的数据库类型以及名称等。 Execute：可以运行SQL语句实现数据查询，并将结果存在Recordset对象中。语法：SetRecordSet对象实例=Connection对象实例.Execute(SQL语句) Close方法：关闭已打开的Connection对象。语法：Connection对象实例.Close Eg: <html> <head> <title>用Connection对象建立连接</title> </head> <body> <b>第一步：</b>book.mdb数据库连接成功，您可以对该数据库进行操作! <%Setconn=Server.CreateObject("ADODB.Connection") conn.Open"driver={MicrosoftAccessDriver(*.mdb)};dbq="&Server.MapPath("book.mdb")%> <br><b>第二步：</b>rs中存放了数据表 sheet中的所有记录，<br>您可以用RecordSet对象的方法对其进行操作! <%Setrs=conn.Execute("Select*Fromsheet")%> <br><b>第三步：</b>book.mdb数据库连接已经关闭! <%conn.Close%> </body> </heml> Recordset对象保存的是待处理数据的记录集，记录集中的一行叫做一条记录，一条记录包含一个或多个字段；使用Recordset对象，可以对数据库中的数据表进行各种操作，如插入记录和删除记录、更新记录、检索数据等。常用属性 RecordCount BOF EOF 常用方法 Open Close AddNew Delete Update Move MoveFirst MoveLast MoveNext MovePrevious Field对象每个Field对象对应于Recordset数据集中的一列，可以用它对数据记录中某一数据项进行操作。常用属性 name value count definedsize actualsize三、Web数据库应用程序开发步骤创建数据库建立连接对象、打开数据库打开指定的数据表操作数据表断开连接对象、关闭数据库四、数据库的连接用DSN连接数据库用ODBC管理器创建一个DSN 打开数据源连接 Eg: <% Dimconn Setconn=Server.CreateObject("ADODB.Connection") conn.Open"MyDatabase" %> 用连接字符串连接数据库 Eg： <% '建立Connection对象 Setconn=Server.CreateObject("ADODB.Connection") conn.Open"driver={MicrosoftAccessDriver(*.mdb)};dbq="&Server.MapPath("book.mdb") '建立Recordset对象 Setrs=Server.CreateObject("ADODB.Recordset") '打开数据表 rs=conn.Execute("sheet") %>五、数据库操作查询与浏览 Eg: <html> <head> <title>数据库查询、浏览示例</title> </head> <body> <formmethod=“post”action=“Recordset_Query_View.asp”> 请输入您要查询的Email地址 <inputtype=“text”name=“Email_str”> <inputtype=“submit”value=“查询”> </form> </body> </html> <html> <body> <% Criteria=Request.Form("Email_str") sql="Select*Fromsheet" IfCriteria<>""Then sql=sql&"WhereEmail='"&Criteria&"'OrderbyTime" EndIf Setconn=Server.CreateObject("ADODB.Connection") conn.open"driver={MicrosoftAccessDriver(*.mdb)};dbq="&Server.MapPath("book.mdb") Setrs=conn.Execute(sql) 'Part1输出数据库的表头 Response.Write"<CENTER><TABLEborder=1>" Response.Write"<TRbgcolor=#00FFFF>" Fori=0Tors.Fields.Count-1 Response.Write"<TD>"&rs.Fields(i).Name&"</TD>" Next Response.Write"</TR>" 'Part2输出数据库的内容 WhileNotrs.EOF Response.Write"<TR>" Fori=0Tors.Fields.Count-1 Response.Write"<TD>"&rs.Fields(i).Value&"</TD>" Next Response.Write"</TR>" rs.MoveNext Wend %> <Palign="center"><b> <ahref="Recordset_Query_View.htm"><<--返回查询主页</a></b> </BODY> </HTML> 添加记录 Eg: <html> <head> <title>留言表单</title> </head> <body> <tableborder="1"width="100%"bgcolor=#D0D0EC> <tr><tdalign="center"><fontsize="+2">留言表单</font> </table> <formaction="Recordset_Insert.asp"method="post"> <tableborder="1"width="100%"> <tr> <td><fontcolor="#000080">姓名：</font> <td><inputtype="text"name="Name"size="20"> </tr> <tr> <td><fontcolor="#000080">Email:</font> <td><inputtype="text"name="Email"size="40"> </tr> <tr> <td><fontcolor="#000080">主题：</font> <td><inputtype="text"name="Subject"size="60"> </tr> <tr> <tdalign="top"><fontcolor="#000080">留言：</font> <td><textareaname="Memo"rows="6"cols="60"></textarea> </tr> </table> <divalign="center"> <tablewidth="100%"> <tralign="center"> <td><inputtype="submit"name="send"value="送出留言"> <td><ahref="User_Message_List.asp">查看留言</a> <td><inputtype="reset"value="清除重写"> </tr> </table> </div> </form> </body> </html> <% Nam=Request.Form("Name") Email=Request.Form("Email") Subject=Request.Form("Subject") Memo=Request.Form("Memo") '检查各字段是否输入了数据 IfNam=""OrEmail=""OrSubject=""OrMemo=""Then Response.Write"字段空白不接受!" Response.End'不再处理以下程序 EndIf Setconn=Server.CreateObject("ADODB.Connection") DBpath=Server.MapPath("book.mdb") conn.open"driver={MicrosoftAccessDriver(*.mdb)};dbq="&Server.MapPath("book.mdb") Setrs=Server.CreateObject("ADODB.Recordset") rs.Open"sheet1",conn,2,2 rs.AddNew rs("Name")=Nam rs("Email")=Email rs("Subject")=Subject rs("Memo")=Memo rs("Time")=Now() rs.Update '将网页转到User_Message_list.asp网页 Response.Redirect"User_Message_list.asp" %> <% sql="Select*Fromsheet1" Setconn=Server.CreateObject("ADODB.Connection") conn.open"driver={MicrosoftAccessDriver(*.mdb)};dbq="&Server.MapPath("book.mdb") Setrs=conn.Execute(sql) 'Part1：输出数据库的“表头” Response.Write"<center><tableborder=1>" Response.Write"<trbgcolor=#00FFFF>" Fori=0Tors.Fields.Count-2 Response.Write"<td>"&rs.Fields(i).Name&"</td>" Next Response.Write"</tr>" 'Part2:输出数据库中的内容 WhileNotrs.EOF Response.Write"<tr>" Fori=0Tors.Fields.Count-2 Response.Write"<td>"&rs.Fields(i).Value&"</td>" Next Response.Write"</tr>" rs.MoveNext Wend Response.Write"</table></center>" %> 修改记录将AddNew改为MoveNext，其他过程同添加记录删除记录用MoveFirst、MoveNext等方法移动记录指针到要删除的记录，然后用rs.Delete删除当前记录

                    本文档为【专题十 用ADO开发Web数据库应用系统】，请使用软件OFFICE或WPS软件打开。作品中的文字与图均可以修改和编辑，
                    图片更改请在作品中右键图片并更换，文字修改请直接点击文字进行修改，也可以新增和删除文档中的内容。 
 该文档来自用户分享，如有侵权行为请发邮件ishare@vip.sina.com联系网站客服，我们会及时删除。

                    [版权声明] 本站所有资料为用户分享产生，若发现您的权利被侵害，请联系客服邮件isharekefu@iask.cn，我们尽快处理。

                    本作品所展示的图片、画像、字体、音乐的版权可能需版权方额外授权，请谨慎使用。

                    网站提供的党政主题相关内容(国旗、国徽、党徽..)目的在于配合国家政策宣传，仅限个人学习分享使用，禁止用于任何广告和商用目的。
                

下载需要：免费已有0 人下载

立即下载

专题十 用ADO开发Web数据库应用系统

你可能还喜欢

专题十用ADO开发Web数据库应用系统