新微赢技术网»论坛 › 学习网知识堂 › WEB开发 › ASP › 数据库更新问题请指教

查看: 73|回复: 8

数据库更新问题请指教

[复制链接]

轌婲の滿天飛

电梯直达

1^#

发表于 2010-1-8 05:42:14 | 只看该作者回帖奖励

|倒序浏览 |阅读模式

<%
Dim tpbts,tpfls,tpxxs,user1,id
tpbts=request.Form("tpbt")
tpfls=request.Form("tpfl")
tpxxs=request.Form("tpxx")
If session("users")<>"" Then
user1=session("users")
Else
user1="guest"
End If
Call openDB()
sql="select top 1 * from img order by id desc"
rs.open sql,conn,1,1
id=rs("id")
sql="update img set bt='"&tpbts&"',fl='"&tpfls&"',js='"&tpxxs&"',user='"&user1&"' where "&id&")"
conn.Execute(sql)
Call closeDB()
%>

提示错误
___________________________________________________________________________
错误类型：
Microsoft OLE DB Provider for ODBC Drivers (0x80040E14)
[Microsoft][ODBC Microsoft Access Driver] 多余的 ) 在查询表达式 '36)' 中。
/xc/tpxx.asp, 第 17 行

收藏0

使用道具举报

西门庆

2^#

发表于 2010-1-8 05:42:18 | 只看该作者

不用SQL=, 直接用conn.execute"update img set bt='"&tpbts&"',fl='"&tpfls&"',js='"&tpxxs&"',user='"&user1&"' where id="&id
快一点．

回复支持反对

使用道具举报

√龙

3^#

发表于 2010-1-8 05:42:21 | 只看该作者

有兄弟帮忙么 - -!

回复支持反对

使用道具举报

林风

4^#

发表于 2010-1-8 05:42:24 | 只看该作者

sql="update img set bt='"&tpbts&"',fl='"&tpfls&"',js='"&tpxxs&"',user='"&user1&"' where &id&")"

改成

sql="update img set bt='"&tpbts&"',fl='"&tpfls&"',js='"&tpxxs&"',user='"&user1&"' where id="&id

回复支持反对

使用道具举报

随处风流

5^#

发表于 2010-1-8 05:42:27 | 只看该作者

换成这个试试
sql="update img set bt='"&tpbts&"',fl='"&tpfls&"',js='"&tpxxs&"',user='"&user1&"' where id='"&id&"'"

回复支持反对

使用道具举报

俬錛ヤ

6^#

发表于 2010-1-8 05:42:30 | 只看该作者

set rs=server.CreateObject("adodb.recordset")
rs.open "select * from img where id="&ID,conn,3,3
rs("bt")=tpbts
rs("fl")=tpfls
rs("js")=tpxxs
rs("user")=user1
rs.update()