我做了一个可以更新数据库信息的这样一个update页面,但是当我点击提交的时候,数据却更新不了,这是为什么呢?请高手指教!!代码如下:
<%
dim id
id=request.QueryString("id")
dim db,connstr
connstr= "DRIVER=Microsoft Access Driver (*.mdb);DBQ=" & Server.MapPath("Database\SiteContentData\Content.mdb")
set db = server.createobject("adodb.connection")
db.open connstr
dim strsql,rs
strsql="select * from tupian where id="& id
set rs=db.execute(strsql)
%>
<div align="center">
<p>更新信息
</p>
<form name="LPform" method="post" action="">
<p>图片信息:
<input name="info" type="text" id="info"value="<%=rs("info")%>">
</p>
<p>图片路径:
<input name="LPattern" type="text" class="myput" id="LPattern" value="<%=rs("pic")%>" size="80">
[<a href="JavaScript:openem()"><strong><font color="#0000ff">上传图片</font></strong></a>]
</p>
<p>
<input type="submit" value="确定">
</p>
</form>
</div>
<%
if request("info")<>""and request("pic")<>"" then
dim info,lpattern,pic
info=request("info")
pic=request.form("pic")
strsql="update tupian set info='"& info &"',lpattern='"& lpattern &"'where id="& id
db.execute(strsql)
response.Redirect"aaa.asp"
else
response.Write"请将所有信息填写完整。"
end if
%>
帮忙看看呀,谢谢各位了!!!