做了ASP的后台,如何将表单里面的信息提交到一个页面呢?谢谢,连接关系
如何将这表单的内容提交到一个网页,谢谢,希望给点代码,并说明下,谢谢谢谢2位,可以用过查询语句查询表单吗?362366724-这位朋友帮忙下,能给个比较完整的吗?这个已经...
如何将这表单的内容提交到一个网页,谢谢,希望给点代码,并说明下,谢谢
谢谢2位,可以用过查询语句查询表单吗?362366724 -这位朋友帮忙下,能给个比较完整的吗?这个已经很多了,但是没完整,还是没搞清楚,谢谢了 展开
谢谢2位,可以用过查询语句查询表单吗?362366724 -这位朋友帮忙下,能给个比较完整的吗?这个已经很多了,但是没完整,还是没搞清楚,谢谢了 展开
展开全部
这个其实很简单的吗,只要传递一个变量,然后根据传递的变量值进行不同的操作就可以了,这里我吧你的表单代码省略了,注意你要修改你的<form action="">改成<form action="?Action=AddChk">这里的?表示提交到本页,Actions是变量,AddChk是变量的值,下面的根据你的表单制作的简洁版的演示功能,希望你能灵活运用
<!--#include file="conn.asp" -->
<%
'定义需要用到的变量
Dim ProductName,ProductIntroduce,Action
'接受表单传递过来的变量
ProductName = Trim(Request.QueryString("ProductName"))
ProductIntroduce = Trim(Request.QueryString("ProductIntroduce"))
Action = Trim(Request.QueryString("Action"))
'根据Action的参数进行不同的操作
Select Case Action
Case "AddChk" '如果接收到的是AddChk,则调用Addchk的过程
Call AddChk()
Case Else '如果接收到的是其他,则调用Add的过程
Call Add()
Sub AddChk() '这里写添加处理过程
Set rs = Server.CreateObject("Adodb.recordset")
sql= "select * From Product"
rs.Open sql,conn,1,3
rs.Addnew()
rs("ProductName ") = Server.HTMLEncode(ProductName)
rs("ProductIntroduce") = Server.HTMLEncode(ProductIntroduce)
rs.Update()
rs.Close
Set rs = Nothing
response.Write "<script>alert('添加成功!');location.href='add.asp';</script>"
End Sub
Sub Add() ' 这里是添加表单的过程
%>
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>添加产品</title>
</head>
<body>
<!----您的HTML表单代码开始----->
<form name="form1" method="post" action="?Action=AddChk">
<p>商品名称
<input name="ProductName" type="text" id="ProductName" size="30">
</p>
<p>商品说明
<textarea name="ProductIntroduce" cols="40" rows="10" id="ProductIntroduce"></textarea>
</p>
</form>
<!----您的HTML表单代码结束----->
</body>
</html>
<%
End Sub
%>
<!--#include file="conn.asp" -->
<%
'定义需要用到的变量
Dim ProductName,ProductIntroduce,Action
'接受表单传递过来的变量
ProductName = Trim(Request.QueryString("ProductName"))
ProductIntroduce = Trim(Request.QueryString("ProductIntroduce"))
Action = Trim(Request.QueryString("Action"))
'根据Action的参数进行不同的操作
Select Case Action
Case "AddChk" '如果接收到的是AddChk,则调用Addchk的过程
Call AddChk()
Case Else '如果接收到的是其他,则调用Add的过程
Call Add()
Sub AddChk() '这里写添加处理过程
Set rs = Server.CreateObject("Adodb.recordset")
sql= "select * From Product"
rs.Open sql,conn,1,3
rs.Addnew()
rs("ProductName ") = Server.HTMLEncode(ProductName)
rs("ProductIntroduce") = Server.HTMLEncode(ProductIntroduce)
rs.Update()
rs.Close
Set rs = Nothing
response.Write "<script>alert('添加成功!');location.href='add.asp';</script>"
End Sub
Sub Add() ' 这里是添加表单的过程
%>
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>添加产品</title>
</head>
<body>
<!----您的HTML表单代码开始----->
<form name="form1" method="post" action="?Action=AddChk">
<p>商品名称
<input name="ProductName" type="text" id="ProductName" size="30">
</p>
<p>商品说明
<textarea name="ProductIntroduce" cols="40" rows="10" id="ProductIntroduce"></textarea>
</p>
</form>
<!----您的HTML表单代码结束----->
</body>
</html>
<%
End Sub
%>
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询