复制一个asp网页,在数据库中同时新复制了一个表,如何修改这个网页,让它调用我新建的这个数据表中的内容
现在在学习用asp模版建站,遇到一个问题,网站中有一个网页AdminAboutusAdd.asp(是一个后台添加“关于我们”栏目的网页),对应的数据库中的表是Aboutu...
现在在学习用asp模版建站,遇到一个问题,网站中有一个网页AdminAboutusAdd.asp(是一个后台添加“关于我们”栏目的网页),对应的数据库中的表是Aboutus。我想用这个为模版,新建一个AdminFanganAdd.asp(此页面是复制上面一个asp文件,仅修改的名字),同时在表中也复制了Aboutus的表,并改名为Fangan。
现在问题是:我修改了AdminFanganAdd.asp里面的所有“Aboutus”字符为“Fangan”,当我运行这个网页的时候,仍旧是往Aboutus表中写入数据。请问一下如何修改?
附上数据库部分代码如下。
@@@@这是AdminAboutusAdd.asp的代码@@@@
<!--#include file="conn.asp"-->
<!--#include file="admin.asp"-->
<%if Request.QueryString("mark")="southidc" then%>
<%
Title=Trim(Request("Title"))
Content=Request("Content")
Aboutusorder=Request("Aboutusorder")
Language=Request("Language")
%>
<%
If Title="" Then
response.write "SORRY <br>"
response.write "请输入栏目名称!<a href=""javascript:history.go(-1)"">返回重输</a>"
response.end
end if
If Content="" Then
response.write "SORRY <br>"
response.write "请输入栏目内容!<a href=""javascript:history.go(-1)"">返回重输</a>"
response.end
end if
Set rs = Server.CreateObject("ADODB.Recordset")
sql="select * from Aboutus"
rs.open sql,conn,1,3
rs.addnew
rs("Title")=Title
rs("Content")=Content
rs("Aboutusorder")=Aboutusorder
rs("Language")=Language
rs.update
rs.close
response.redirect "AdminAboutus.asp"
end if
%>
@@@@这是我复制修改后的AdminFanganAdd.asp的代码@@@@
<!--#include file="conn.asp"-->
<!--#include file="admin.asp"-->
<%if Request.QueryString("mark")="southidc" then%>
<%
Title=Trim(Request("Title"))
Content=Request("Content")
Fanganorder=Request("Fanganorder")
Language=Request("Language")
%>
<%
If Title="" Then
response.write "SORRY <br>"
response.write "请输入栏目名称!<a href=""javascript:history.go(-1)"">返回重输</a>"
response.end
end if
If Content="" Then
response.write "SORRY <br>"
response.write "请输入栏目内容!<a href=""javascript:history.go(-1)"">返回重输</a>"
response.end
end if
Set rs = Server.CreateObject("ADODB.Recordset")
sql="select * from Fangan"
rs.open sql,conn,1,3
rs.addnew
rs("Title")=Title
rs("Content")=Content
rs("Fanganorder")=Fanganorder
rs("Language")=Language
rs.update
rs.close
response.redirect "AdminFangan.asp"
end if
%>
请问我修改的有什么地方不对吗?或者说如何修改"AdminFanganAdd.asp"实现我想要的内容? 展开
现在问题是:我修改了AdminFanganAdd.asp里面的所有“Aboutus”字符为“Fangan”,当我运行这个网页的时候,仍旧是往Aboutus表中写入数据。请问一下如何修改?
附上数据库部分代码如下。
@@@@这是AdminAboutusAdd.asp的代码@@@@
<!--#include file="conn.asp"-->
<!--#include file="admin.asp"-->
<%if Request.QueryString("mark")="southidc" then%>
<%
Title=Trim(Request("Title"))
Content=Request("Content")
Aboutusorder=Request("Aboutusorder")
Language=Request("Language")
%>
<%
If Title="" Then
response.write "SORRY <br>"
response.write "请输入栏目名称!<a href=""javascript:history.go(-1)"">返回重输</a>"
response.end
end if
If Content="" Then
response.write "SORRY <br>"
response.write "请输入栏目内容!<a href=""javascript:history.go(-1)"">返回重输</a>"
response.end
end if
Set rs = Server.CreateObject("ADODB.Recordset")
sql="select * from Aboutus"
rs.open sql,conn,1,3
rs.addnew
rs("Title")=Title
rs("Content")=Content
rs("Aboutusorder")=Aboutusorder
rs("Language")=Language
rs.update
rs.close
response.redirect "AdminAboutus.asp"
end if
%>
@@@@这是我复制修改后的AdminFanganAdd.asp的代码@@@@
<!--#include file="conn.asp"-->
<!--#include file="admin.asp"-->
<%if Request.QueryString("mark")="southidc" then%>
<%
Title=Trim(Request("Title"))
Content=Request("Content")
Fanganorder=Request("Fanganorder")
Language=Request("Language")
%>
<%
If Title="" Then
response.write "SORRY <br>"
response.write "请输入栏目名称!<a href=""javascript:history.go(-1)"">返回重输</a>"
response.end
end if
If Content="" Then
response.write "SORRY <br>"
response.write "请输入栏目内容!<a href=""javascript:history.go(-1)"">返回重输</a>"
response.end
end if
Set rs = Server.CreateObject("ADODB.Recordset")
sql="select * from Fangan"
rs.open sql,conn,1,3
rs.addnew
rs("Title")=Title
rs("Content")=Content
rs("Fanganorder")=Fanganorder
rs("Language")=Language
rs.update
rs.close
response.redirect "AdminFangan.asp"
end if
%>
请问我修改的有什么地方不对吗?或者说如何修改"AdminFanganAdd.asp"实现我想要的内容? 展开
展开全部
参数没提交过来
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
<!--#include file="conn.asp"-->
这个你处理了没有,
会不会是这里有问题?
这个你处理了没有,
会不会是这里有问题?
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
网页代码应该没错,是不是你测试出了问题
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询