在ASP.NET中实现POST发送数据
2007-12-28 10:25
429 查看
下面的代码实现了与以前XMLHTTP类似的功能。代码如下:
HttpSendData.aspx
<%@ Page language="c#"%>
<%@ Import Namespace = "System"%>
<%@ Import Namespace = "System.Collections"%>
<%@ Import Namespace = "System.Web"%>
<%@ Import Namespace = "System.Web.UI"%>
<%@ Import Namespace = "System.Web.UI.WebControls"%>
<%@ Import Namespace = "System.Net"%>
<%@ Import Namespace = "System.IO"%>
<%@ Import Namespace = "System.Text"%>
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN" >
<HTML>
<HEAD>
<script runat="server">
void Button1_Click(object sender, System.EventArgs e)
{
string strTitle = TextBox1.Text;
string strDesc = TextBox2.Text;
Encoding encoding = Encoding.GetEncoding("GB2312");
string postData = "Title=" + strTitle;
string strUrl = "http://xml.sz.luohuedu.net/HttpReceiveData.aspx";
postData += ("&Desc=" + strDesc);
byte[] data = encoding.GetBytes(postData);
// 准备请求...
HttpWebRequest myRequest = (HttpWebRequest)WebRequest.Create(strUrl);
myRequest.Method = "POST";
myRequest.ContentType="application/x-www-form-urlencoded";
myRequest.ContentLength = data.Length;
Stream newStream=myRequest.GetRequestStream();
// 发送数据
newStream.Write(data,0,data.Length);
newStream.Close();
Response.Redirect("HttpSendData.aspx");
}
</script>
</HEAD>
<body>
<form id="HTTPPost" method="post" runat="server">
标题:<asp:TextBox id="TextBox1" runat="server"></asp:TextBox>
<br>
内容:
<br>
<asp:TextBox id="TextBox2" runat="server" TextMode="MultiLine" Rows="10" Columns="100"></asp:TextBox>
<br>
<asp:Button id="Button1" runat="server" Text=" 发 送 " onclick="Button1_Click"></asp:Button>
</form>
</body>
</HTML>
HttpReceiveData.aspx
<%@ Page Language="vb"%>
<%@ import Namespace = "System" %>
<%@ import Namespace = "System.Web.UI" %>
<%@ import Namespace = "System.Web" %>
<script runat="server">
Sub Page_Load(ByVal sender As System.Object, ByVal e As System.EventArgs)
If Request.ServerVariables("REQUEST_METHOD").ToString() = "POST" Then
Dim connstr As String
connstr = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" + Server.MapPath("Test.mdb")
Dim cn As New System.Data.OleDb.OleDbConnection(connstr)
Dim strSQL As String = "INSERT INTO TestTable (Title,Description) VALUES('" _
+ Request.Form("Title").ToString() + "','" + Request.Form("Desc").ToString() + "')"
cn.Open()
Dim cmd As New System.Data.OleDb.OleDbCommand(strSQL, cn)
cmd.ExecuteNonQuery()
cn.Close()
cn.Dispose()
cmd.Dispose()
End If
End Sub
</script>
HttpSendData.aspx
<%@ Page language="c#"%>
<%@ Import Namespace = "System"%>
<%@ Import Namespace = "System.Collections"%>
<%@ Import Namespace = "System.Web"%>
<%@ Import Namespace = "System.Web.UI"%>
<%@ Import Namespace = "System.Web.UI.WebControls"%>
<%@ Import Namespace = "System.Net"%>
<%@ Import Namespace = "System.IO"%>
<%@ Import Namespace = "System.Text"%>
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN" >
<HTML>
<HEAD>
<script runat="server">
void Button1_Click(object sender, System.EventArgs e)
{
string strTitle = TextBox1.Text;
string strDesc = TextBox2.Text;
Encoding encoding = Encoding.GetEncoding("GB2312");
string postData = "Title=" + strTitle;
string strUrl = "http://xml.sz.luohuedu.net/HttpReceiveData.aspx";
postData += ("&Desc=" + strDesc);
byte[] data = encoding.GetBytes(postData);
// 准备请求...
HttpWebRequest myRequest = (HttpWebRequest)WebRequest.Create(strUrl);
myRequest.Method = "POST";
myRequest.ContentType="application/x-www-form-urlencoded";
myRequest.ContentLength = data.Length;
Stream newStream=myRequest.GetRequestStream();
// 发送数据
newStream.Write(data,0,data.Length);
newStream.Close();
Response.Redirect("HttpSendData.aspx");
}
</script>
</HEAD>
<body>
<form id="HTTPPost" method="post" runat="server">
标题:<asp:TextBox id="TextBox1" runat="server"></asp:TextBox>
<br>
内容:
<br>
<asp:TextBox id="TextBox2" runat="server" TextMode="MultiLine" Rows="10" Columns="100"></asp:TextBox>
<br>
<asp:Button id="Button1" runat="server" Text=" 发 送 " onclick="Button1_Click"></asp:Button>
</form>
</body>
</HTML>
HttpReceiveData.aspx
<%@ Page Language="vb"%>
<%@ import Namespace = "System" %>
<%@ import Namespace = "System.Web.UI" %>
<%@ import Namespace = "System.Web" %>
<script runat="server">
Sub Page_Load(ByVal sender As System.Object, ByVal e As System.EventArgs)
If Request.ServerVariables("REQUEST_METHOD").ToString() = "POST" Then
Dim connstr As String
connstr = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" + Server.MapPath("Test.mdb")
Dim cn As New System.Data.OleDb.OleDbConnection(connstr)
Dim strSQL As String = "INSERT INTO TestTable (Title,Description) VALUES('" _
+ Request.Form("Title").ToString() + "','" + Request.Form("Desc").ToString() + "')"
cn.Open()
Dim cmd As New System.Data.OleDb.OleDbCommand(strSQL, cn)
cmd.ExecuteNonQuery()
cn.Close()
cn.Dispose()
cmd.Dispose()
End If
End Sub
</script>
相关文章推荐
- 在ASP.NET中实现POST发送数据http://dotnet.aspx.cc/article/atv1glxt-65ff-4m82-ct5u-b1j65d3zn2ok/read.aspx
- 在ASP.NET中实现POST发送数据
- 在ASP.NET中实现POST发送数据
- 在ASP.NET中实现POST发送数据
- asp.net 从静态页Post发送数据到服务端页
- Asp.net XMLHTTP 基类 (GET,Post发送XML数据)
- Asp.net XMLHTTP 基类 (GET,Post发送和接收数据)
- ASP.NET POST XML JSON数据,发送与接收
- ASP.NET以Post方式向网页发送数据
- Asp.NET WebMethod: 使用Jquery的post发送信息的数据信息的大小限制
- Asp.net XMLHTTP封装类(GET,Post发送和接收数据)
- Asp.net XMLHTTP 基类 (GET,Post发送和接收数据)
- 服务器端压缩发送数据到客户端ASP.NET MVC
- ASP.NET 中 POST 数据并跳转页面(译自 Redirect and POST in ASP.NET)
- asp.net mvc dropdownlist 实现 aotopost 自动回发
- 用DataList控件和ObjectDataSource在ASP.NET 2.0中实现高效能数据分页
- asp.net基于windows服务实现定时发送邮件的方法
- Ajax 实现在WebForm中拖动控件并即时在服务端保存状态数据 (Asp.net 2.0)(示例代码下载)
- Asp.net(asp,jsp)+JavaScript动态实现添加数据行