asp 更新数据库信息
因为把表单和更新分开了,下面是更新代码,打开更新表单页后不论修改什么直接又回到表单页,也就是说下面的代码根本没起作用,请问哪里出了问题T-T,求位大神帮帮我……<body...
因为把表单和更新分开了,下面是更新代码,打开更新表单页后不论修改什么直接又回到表单页,也就是说下面的代码根本没起作用,请问哪里出了问题T-T,求位大神帮帮我……
<body>
<%
If Request.Form("txtName")<>"" Then
'以下获取提交的表单数据
Dim ID,dtmTime,strName,urlAdd,strIntro '声明几个变量
ID=Request.Form("txtID") '获取隐藏文本框传递过来的ID值
dtmTime=request.form("txtTime")
strName=request.form("txtName")
urlAdd=request.form("txtURL")
strIntro=request.form("txtCon")
'以下连接数据库,建立一个Connection对象实例conn
Dim conn,strConn
Set conn=Server.CreateObject("ADODB.Connection")
strConn="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath("subject.mdb")
conn.Open strConn
'下面利用Execute方法更新记录,注意更新条件为隐藏文本框传过来的ID值
Dim strSql
strSql="Update tbSubject Set dtmTime='" & dtmTime & "',strName='" & strName & "',urlAdd='" & urlAdd & "',strIntro='" & strIntro & "' Where ID=" & ID
conn.Execute(strSql)
'更新完毕,重定向回首页
Response.Redirect "chapter1.asp"
Else
Response.Write "请保留新番名称"
Response.Write "<a href='index.asp'>重新填写</a>"
End If
%>
</body>
表单页太长了图片能看清么? 展开
<body>
<%
If Request.Form("txtName")<>"" Then
'以下获取提交的表单数据
Dim ID,dtmTime,strName,urlAdd,strIntro '声明几个变量
ID=Request.Form("txtID") '获取隐藏文本框传递过来的ID值
dtmTime=request.form("txtTime")
strName=request.form("txtName")
urlAdd=request.form("txtURL")
strIntro=request.form("txtCon")
'以下连接数据库,建立一个Connection对象实例conn
Dim conn,strConn
Set conn=Server.CreateObject("ADODB.Connection")
strConn="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath("subject.mdb")
conn.Open strConn
'下面利用Execute方法更新记录,注意更新条件为隐藏文本框传过来的ID值
Dim strSql
strSql="Update tbSubject Set dtmTime='" & dtmTime & "',strName='" & strName & "',urlAdd='" & urlAdd & "',strIntro='" & strIntro & "' Where ID=" & ID
conn.Execute(strSql)
'更新完毕,重定向回首页
Response.Redirect "chapter1.asp"
Else
Response.Write "请保留新番名称"
Response.Write "<a href='index.asp'>重新填写</a>"
End If
%>
</body>
表单页太长了图片能看清么? 展开
2个回答
快又稳
2024-10-28 广告
2024-10-28 广告
数据库服务器作为广州快又稳网络科技有限公司的核心基础设施之一,承载着公司海量数据的存储、处理与访问需求。我们采用高性能、高可用性的服务器架构,确保数据的安全性、完整性和快速响应能力。通过先进的数据库管理系统,优化查询效率,支持复杂业务场景下...
点击进入详情页
本回答由快又稳提供
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询