ASP.NET中 *** 作SQL数据库(连接字符串的配置及获取)

ASP.NET中 *** 作SQL数据库(连接字符串的配置及获取),第1张

在WebConfig中配置数据库连接字符串 代码如下

复制代码 代码如下: <connectionStrings><add name=ConnectionString connectionString="user id=用户名password=密码initial catalog=数据库名称data source=服务器名称"/></connectionStrings>

然后在Webform_ aspx cs里面获取连接字符串 要添加如下引用

复制代码 代码如下: using System Configurationusing System Datausing System Data SqlClient 复制代码 代码如下: SqlConnection conprotected void Page_Load(object sender EventArgs e) { ConnectDB()} private void ConnectDB() { string ConString = ConfigurationManager ConnectionStrings["ConnectionString"] ConnectionStringcon = new SqlConnection(ConString)con Open()SqlCommand = new SqlCommand()SqlDataReader sdrstring sqlstr = "select * from item"CommandText = sqlstrConnection = consdr = ExecuteReader()while (sdr Read()) { Response Write(sdr["字段名"] ToString()+"</br>")} sdr Close()sdr = null} lishixinzhi/Article/program/net/201311/14106

ASP(Active Server Pages)是微软公司为开发互联网应用程序所提出的工具之一 ASP与数据库的联接一般通过ADO(Activex Data Object)来实现的 就象《计算机世界》 年 月 日的《用ASP对SQL Server数据库 *** 作》文章介绍的一样 ADO可以完全支持Microsoft SQL Server 但对应用更加广泛 机制更加复杂的ORACLE 数据库服务就有一些困难 如果想作一些简单的查询功能 ADO是足够的 如要想更好地发挥ORACLE数据库特有的功能 如STORED PROCEDURE STORED FUNCTION等就要采取利用ASP存取ORACLE 数据库服务的另一个强有力工具——Oracle Object for OLE中的ORACLE对象服务器(The Oracle Object Server) 本文从一个实例说明如何在ASP中使用ORACLE对象服务器提供的控件来实现对ORACLE数据库的存取 并就如何维护网络数据库的完整性约束问题进行一些讨论      Oracle Object for OLE是ORACLE公司为了客户端存取数据库所发展的一个很需要的产品 它以Windows / /NT 为基础供所有的与OLE 兼容的应用程序与程序语言存取ORACLE数据库 如ASP Visual Basic excess 等 Oracle Object for OLE包含了ORACLE对象服务器(The Oracle Object Server) ORCLE 数据控制项(The Oracle Data Control)与ORACLE 对象类程序库(The Oracle Objects for OLE C++ Class Library)等三项产品      与ADO相比 ORACLE对象服务器是专用于ORACLE数据库应用程序开发的产品 它有以下优点      ( ) 与数据库服务器的连接的运行效率好 因为ADO是通过ODBC来连接数据库服务器的 而ORACLE对象服务器是通过ORACLE的SQL*NET来连接数据库服务器的     ( ) 能更好地发挥ORACLE数据库的特有功能 如STORED PROCEDURE STORED FUNCTION PACKAGE或Multiple Cursor      本例是一个通讯录的查询 录入的小程序 用户可以通过浏览器对通讯录表进行查询 也可把自己的信息输入 供别人查询      通讯录表的结构如下

Name                            Null?    Type NAME                            NOT NULL CHAR( )ADDRESS                                  CHAR( )PHONE                                    CHAR( )EMAIL                                    VARCHAR ( )

首先 进行环境配置      在WEB服务器上安装以下软件并进行配置      ( )基本的WEB 服务器(WEB SERVER)与ASP等软件     ( )Oracle Object for OLE x     ( )SQL*Net Client 或 Oracle Net Client 安装之后 用Sql*Net Easy Configuration建立数据库别名(Database Alias) 为ASP连接到数据库所用的别名      二.功能实现 ( )查询 用ASP 取数据库通讯录表(TSB )的数据 将数据显示在屏幕上 查询的关键在于确定与数据库的连接成功与否 ORACLE对象服务器本身有错误控制机制可以报出数据库连接方面的错误 具体的程序如下

<HTML >    <tile >  查询程序 </title ><BODY ><%on error resume next 连接数据库set orasession=createobject( OracleInprocServer XOraSession )set oradatabase=orasession dbopendatabase( axp scott/tiger ) 出错处理if err number >thenresponse write <h >asp 错误控制 </h >response write asp 错误来源: &err source &<br >response write asp 错误代码: &err number&<br >response write asp 错误说明: &err description&<br >err clearresponse write <h >ORACLE OLE 错误控制</h >response write ORACLE 错误代码: &OraSession LastServerErr&<br >response write ORACLE 错误说明: &OraSession LastServerErrText&<br >else 查询sql= select * from t *** set oradynaset=oradatabase dbcreatedynaset(sql )response write <h >result</h >response write <table border= ><tr >for i= to ount response write <td >response write oradynaset fields(i) name &response write </td >nextresponse write </tr >do until oradynaset eofresponse write <tr >for i= to ount response write <td >response write oradynaset fields(i) value response write </td >next response write </tr >oradynaset dbmovenextloopresponse write </table >关闭数据库oradatabase closeset orasession=nothingend if% ></body ></ >下面是程序的查询结果图面 通讯录 NAME ADDRESS PHONE EMAIL  张玲 马鞍山市湖北路 号 zh cn 林向 马鞍山市湖南路 号   l cn 邓国虹 采矿路子 幢 号 李城 青岛海洋大学 幢 王国在 采矿小区 幢 号 cn 丁刚 红旗南路 幢 号 d cn 全在保 江西路子 幢 号     ( )插入自己的信息 用ASP将用户在浏览器上提供的数据插入到数据库通讯录表(TSB )中 由ORACLE数据库有一套完整性约束机制 所以插入过程不光是简单地把数据插入到表中 还要做完整性约束的检查 不合要求的数据拒绝插入 如果在程序中不考虑处理 运行时 就会因数据库服务器报错而中断程序 而ASP中的ERR对象可以报出错误来源 错误代码 错误说明等 并能把程序引向错误处理     以下是程序 一个是 是一个输入界面 供用户输入自己的信息 一个是insert asp 负责将用户输入信息插入数据库 并进行错误检查

lishixinzhi/Article/program/Oracle/201311/17490

<%

dim conn,db

dim connstr

db="db.mdb" ' access数据库文件路径

connstr="Provider=Microsoft.Jet.OLEDB.4.0Data Source="&server.MapPath(""&db&"")&"Persist Security Info=False"

set conn=server.createobject("ADODB.CONNECTION")

'连接数据库

conn.open connstr 'open datebase

'数据库结构

'文件名db.mdb

'表名admin

'字段id,自动编号

'字段username,文本

'字段userpass,文本

' 增

    set Rs=server.createobject("adodb.recordset")

    Sql="select * from admin"

    Rs.open Sql,conn,1,3

    Rs.addnew

    Rs("username")="用户名"

    Rs("userpass")="用户密码"

    Rs.update

    Rs.close

    set Rs=nothing

    response.Write "<script language='javascript'>alert('管理员增加成功!')'</script>"

' 删

    s_id=1 '假设有个用户数据的id为1

    Sql="delete * from admin where id="&s_id&""

    set Rs=server.CreateObject("ADODB.recordset")

    rs.open Sql,conn,1,3

    response.Write("<script>alert('帐号删除成功!')</script>")

    rs.close

    set Rs=nothing

' 改

    s_id=1 '假设有个用户数据的id为1

    set Rs=server.createobject("adodb.recordset")

    Sql="select * from admin where id="&s_id&""

    Rs.open Sql,conn,1,3

    if Rs.eof and Rs.bof then

        Rs.close

        set Rs=nothing

        response.Write("<script language='javascript'>alert('此用户不存在!')history.back()</script>")

    else

        Rs("Password")="新密码"

        Rs.update

        Rs.close

        set Rs=nothing

        response.Write ("<script language='javascript'>alert('密码修改成功!')</script>")

    End If

' 查单个

    s_username="admin" '假设有个用户名为admin的用户数据

    set Rs=server.createobject("adodb.recordset")

    Sql="select * from admin where username='"&s_username&"'"

    Rs.open Sql,conn,1,3

    if Rs.eof and Rs.bof then

        Rs.close

        set Rs=nothing

        response.Write("<script language='javascript'>alert('此用户不存在!')history.back()</script>")

    else

        s_name=Rs("username")

        s_pass=Rs("userpass")

        Rs.close

        set Rs=nothing

        ' 输出查询到的信息

        response.Write ("<script language='javascript'>alert('你查询的用户名"&s_name&"的密码为:"&s_pass&"')</script>")

    End If

' 查列表

    set Rs=server.CreateObject("Adodb.recordset")

    sql="select * from admin order by id desc"

    Rs.open sql,conn,1,1

    if not Rs.eof then

        ' 循环输出查询到的信息

        do while not Rs.eof 

            response.Write "id:"&Rs("id")&",用户名:"&Rs("username")&",密码:"&Rs("userpass")&"<br />"

        Rs.movenext

        loop

    end if

    Rs.close

    set Rs=nothing

' 使用完数据库后要关闭连接资源

    conn.close

    set conn=nothing

%>


欢迎分享,转载请注明来源:内存溢出

原文地址: http://outofmemory.cn/sjk/10653314.html

(0)
打赏 微信扫一扫 微信扫一扫 支付宝扫一扫 支付宝扫一扫
上一篇 2023-05-10
下一篇 2023-05-10

发表评论

登录后才能评论

评论列表(0条)

保存