asp数据连接UPDATE

最新推荐文章于 2025-06-29 09:11:26 发布

xuezhanliang6886

最新推荐文章于 2025-06-29 09:11:26 发布

阅读量814

点赞数

CC 4.0 BY-SA版权

分类专栏： asp 文章标签： asp 数据库 microsoft access sql

本文链接：https://blog.youkuaiyun.com/xuezhanliang6886/article/details/4506091

asp 专栏收录该内容

1 篇文章

订阅专栏

本文详细介绍了如何在ASP中使用ADO（ActiveX Data Objects）进行Access数据库的UPDATE操作。通过实例代码，展示了如何连接数据库、编写SQL更新语句以及执行更新操作的过程，帮助读者掌握ASP中对数据库记录的修改技巧。

摘要生成于 C知道，由 DeepSeek-R1 满血版支持，前往体验 >

sub OpenDatabase(conn)
    IsSqlData = 0 '定义数据库类别，0为Access数据库，1为SQL数据库
    if IsSqlData = 0 then
        'Access数据库
        Datapath = "data/" '数据库目录的相对路径
        Datafile = "data.mdb" '数据库的文件名
        Connstr = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source="&Server.MapPath
(""&Datapath&""&Datafile&"")
        Connstr = "DBQ="&server.mappath(""&Datapath&""&Datafile&"")&";DRIVER={Mi
crosoft Access Driver (*.mdb)};"

    else
        'SQL数据库
        SqlLocalName = "(local)" '连接IP  [ 本地用 (local) 外地用IP ]
        SqlUsername = "sa" '用户名
        SqlPassword = "1" '用户密码
        SqlDatabaseName = "data" '数据库名
        Connstr = "Provider=Sqloledb;User ID=" & SqlUsername & "; Password=" & S
qlPassword & "; Initial Catalog = " & SqlDatabaseName & "; Data Source=" & SqlLo
calName & ";"

    end if
    on error resume next
    set Conn = Server.createobject("ADODB.Connection")
    Conn.open Connstr
    if err then
        err.clear
        set Conn = nothing
        Response.write "数据库连接出错，请检查连接字串。"
        Response.end
    end if
    on error goto 0
end sub
%>

用的时候 改下里面的 相应设置 

然后 在需要的地方 

<%call OpenDatabase(conn)%> 

更新数据 有2种方式 一是ado 的recordset对象的 update方法 


set rs = server.createobject("adodb.recordset") 
sqlstr = "sql语句" 
rs.open sqlstr, conn, 1, 3 
rs.update'更新记录集 

二是 直接 sql更新 

conn.execute("UPDATE [表名] SET  [字段一] =  '" & 值一 & "', [字段二] =  '" & 值二 & "' where id=自己设置")