Asp.net post 实例
来源:互联网 发布:数据库误删除没备份 编辑:程序博客网 时间:2024/05/23 19:14
Asp.net post 实例
下面的代码实现了与以前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>
下面的代码实现了与以前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>
0 0
- Asp.net post 实例
- ASP.NET接受GET和POST数据终极方法实例
- jquery.post 与asp.net 实现一步刷新实例
- asp.net Post Get提交数据转Model实例
- asp.net post ViewState
- Asp.net Post Sample
- asp.net post
- asp.net post远程网页
- asp.net ajax post方式
- asp.net xmlhttp post XML
- asp.net post xml文档
- ASP.NET POST模拟登陆
- asp.net AJAX POST抓取
- ASP.NET数据库连接实例
- 【asp.NET】分页实例
- ASP.NET数据库连接实例
- asp.Net Cookie实例
- asp.net mvc 实例
- PAT_乙级 1030 完美数列
- 视差效果实现
- Linearization of the kernel functions in SVM
- 第7章 Spring Boot的Web开发2
- mysql 有索引没走索引 更新锁全表
- Asp.net post 实例
- 绝了,我想起来了不启动流程取得第一任务的下一环节
- java 复习——数据类型
- 深入理解JavaScript系地址
- iOS--屏幕尺寸
- MySql-5.7.16 win64免安装版安装教程
- 机器学习小组知识点24:数据预处理之数据清理(Data-Cleaning)
- 四大组件基础篇
- openfire php 初始配置