用ASP.Net写一个发送ICQ信息的程序

这里我给大家提供一个很实用的例子，就是在线发送ICQ信息。想一想我们在网页上直接给朋友发送ICQ信息，那是多么美妙的事情啊。呵呵，在吹牛啊，其实ICQ本来就有在线发送的代码，不过，这些都是AOL给你写好的代码，多没有意思啊。还是自已写的比较好，呵呵,废话少说，大家来看代码吧

<% @ Page Langua
ge="C#" %>
<% @ Assembly Name="System.Net" %>
<% @ Import Namespace="System.Net" %>
<% @ Import Namespace="System.Net.Sockets" %>
<% @ Import Namespace="System.IO" %>
<% @ Import Namespace="System.Text" %><Script Language="C#" Runat="Server">
public void Page_Load(Object src,EventArgs e)
{ICQ_Show.Text="如果提交后，在这里显示信息";
}public void Send_Click(Object sender,EventArgs e)
{string sendmsg;string commandmsg;//首先取得要发送的信息commandmsg = "from="+ICQ_Name.Text+"&fromemail="+ICQ_Email.Text+"&subject=";  commandmsg +=  ICQ_Subject.Text+"&body="+ICQ_Message.Text+"&to="+ICQ_Number.Text  commandmsg +=  "&Send=Send+Message";//然后就是组装全部的信息sendmsg="POST /scripts/WWPMsg.dll HTTP/1.1\r\n";sendmsg += "Accept: image/gif, image/x-xbitmap, image/jpeg, image/pjpeg,";sendmsg += " application/vnd.ms-excel,";sendmsg += " application/msword, application/vnd.ms-powerpoint, */*\r\n";sendmsg += "Accept-Language: zh-cn\r\n";sendmsg += "Content-Type: application/x-www-form-urlencoded\r\n";sendmsg += "Accept-Encoding: gzip, deflate\r\n";sendmsg += "User-Agent: Mozilla/4.0 (compatible; MSIE 5.01; Windows 95)\r\n";sendmsg += "Host: wwp.icq.com\r\n";sendmsg += "Content-Length: " + commandmsg.Length + "\r\n";sendmsg += "Connection: Keep-Alive\r\n\r\n";sendmsg += commandmsg + "\r\n\r\n"; Byte[] arrMsg=Encoding.Default.GetBytes(sendmsg.ToCharArray());//需要发送的信息处理完毕//======下面就是发送这些信息=====//首先是建立一个TCPClient 对象TCPClient tcpc=new TCPClient();if(0==tcpc.Connect("wwp.icq.com",80)){Stream sm = tcpc.GetStream();sm.Write(arrMsg,0,sendmsg.Length);StreamReader sr=new StreamReader(tcpc.GetStream(),Encoding.Default);string strRev=sr.ReadLine();if(strRev.IndexOf("OK")!=-1){ICQ_Show.Text="ICQ消息发送成功";}else{ICQ_Show.Text="ICQ消息发送不成功";}}else{ICQ_Show.Text="ICQ消息发送不成功，无法联结ICQ服务器";} //关闭TCP联结tcpc.Close();}</script>
<html>
<meta http-equiv="Content-Language" content="zh-cn">
<head>
<title></title>
</head>
<body>
<form runat="server" >
<table>
<tr><td align=center colspan=2><asp:Label id="ICQ_Show" runat="server" ForeColor="red" /></td></tr>
<tr><td>
</tr>
<tr><td align=center colspan=2>发送ICQ信息</td></tr>
<tr><td>您的ICQ号:</td><td><asp:TextBox id="ICQ_Number" runat="server" /></td></tr>
<tr><td>您的网名:</td><td><asp:TextBox id="ICQ_Name" runat="server" /></td></tr>
<tr><td>您的Email:</td><td><asp:TextBox id="ICQ_Email" runat="server" /></td></tr>
<tr><td>发送主题:</td><td><asp:TextBox id="ICQ_Subject" runat="server" /></td></tr>
<tr><td>发送内容:</td><td><asp:TextBox id="ICQ_Message" runat="server" /></td></tr>
<tr><td><asp:Button OnClick="Send_Click" Text="发送ICQ信息" RunAt="server" /></td></tr>
</table>
</form>
</body>
</html>

关于.NET技术 等其他计算机技术，欢迎加群一起讨论 3群 70536418 2群 5851499 1群 12672376

转载于:https://www.cnblogs.com/guolilong/archive/2012/04/17/2453188.html

用ASP.Net写一个发送ICQ信息的程序相关推荐

python自动填写小程序表单_新年好！教大家用Python写一个自动回复拜年信息的小程序！...
原标题:新年好!教大家用Python写一个自动回复拜年信息的小程序! 过年期间,想必大家都收到很多拜年信息吧!有没有也被拜年短信(大部分是群发)搞得很焦虑?不回复似乎显得很没有礼貌,一一回复又累心劳神 ...
写一个面试应聘者信息填入程序
好的,我可以为您写一个面试应聘者信息填入程序.这是用 Python 实现的代码示例: # 定义字典存储应聘者信息 candidate = {}# 询问应聘者的姓名 name = input(" ...
写一个《扎金花》程序自己玩。
写一个<扎金花>程序自己玩.hongjin2用一年半的时间基本自学完了程序设计专业的主干课程(除了<扎金花>,hongjin2实在看不懂),1995年hongjin2参加了初级 ...
java程序购物车_用java代码写一个简单的网上购物车程序
1 需求:1.写一个商品类,有商品编号.商品名称.商品分类.商品单价属性.2.写一个商品条目信息类,有商品和数量两个属性,有商品总价格方法.2 3 3.写一个购物车类,有添加商品方法.查看订单信息,删 ...
写一个简单的Java界面程序
写一个简单的Java界面程序有时候未免想写一些有界面的java小程序练练手,那么如何写一个比较好看的界面话程序呢?下面小编就带你一步一步来搭建这个小洋房. 实现界面化编程要用到的一个主要包impor ...
python软件代码示例-用Python写一个模拟qq聊天小程序的代码实例
Python 超简单的聊天程序客户端: import socket, sys host = '10.248.27.23' # host = raw_input("Plz imput des ...
怎样用java写一个简单的文件复制程序
怎样用java写一个简单的文件复制程序代码来源:https://jingyan.baidu.com/article/c35dbcb0d6f1398916fcbc07.html package Num ...
能不能用python开发qq_用Python写一个模拟qq聊天小程序的代码实例
用Python写一个模拟qq聊天小程序的代码实例发布时间:2020-09-09 07:49:29
用Python写一个模拟qq聊天小程序的代码实例
前言今天小编就为大家分享一篇关于用Python写一个模拟qq聊天小程序的代码实例,小编觉得内容挺不错的,现在分享给大家,具有很好的参考价值,需要的朋友一起跟随小编来看看吧 Python 超简单的聊天 ...

用ASP.Net写一个发送ICQ信息的程序

用ASP.Net写一个发送ICQ信息的程序相关推荐

最新文章

热门文章