欢迎光临
我们一直在努力

ASP.NET发送ICQ消息DIY-.NET教程,Asp.Net开发

建站超值云服务器,限时71元/月

asp.net发送icq信息diy<br>

<br>

<br>

<br>

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

<br>

<% @ page language=&quot;c#&quot; %><br>

<% @ assembly name=&quot;system.net&quot; %><br>

<% @ import namespace=&quot;system.net&quot; %><br>

<% @ import namespace=&quot;system.net.sockets&quot; %><br>

<% @ import namespace=&quot;system.io&quot; %><br>

<% @ import namespace=&quot;system.text&quot; %><br>

<br>

<script language=&quot;c#&quot; runat=&quot;server&quot;><br>

public void page_load(object src,eventargs e)<br>

{<br>

icq_show.text=&quot;如果提交后,在这里显示信息&quot;; <br>

}<br>

<br>

public void send_click(object sender,eventargs e)<br>

{<br>

string sendmsg;<br>

string commandmsg;<br>

file://首先取得要发送的信息<br>

commandmsg = &quot;from=&quot;+icq_name.text+&quot;&fromemail=&quot;+icq_email.text+&quot;&subject=&quot;; <br>

commandmsg += icq_subject.text+&quot;&body=&quot;+icq_message.text+&quot;&to=&quot;+icq_number.text <br>

commandmsg += &quot;&send=send+message&quot;;<br>

file://然后就是组装全部的信息<br>

sendmsg=&quot;post /scripts/wwpmsg.dll http/1.1\r\n&quot;;<br>

sendmsg += &quot;accept: image/gif, image/x-xbitmap, image/jpeg, image/pjpeg,&quot;;<br>

sendmsg += &quot; application/vnd.ms-excel,&quot;;<br>

sendmsg += &quot; application/msword, application/vnd.ms-powerpoint, */*\r\n&quot;;<br>

sendmsg += &quot;accept-language: zh-cn\r\n&quot;;<br>

sendmsg += &quot;content-type: application/x-www-form-urlencoded\r\n&quot;;<br>

sendmsg += &quot;accept-encoding: gzip, deflate\r\n&quot;;<br>

sendmsg += &quot;user-agent: mozilla/4.0 (compatible; msie 5.01; windows 95)\r\n&quot;;<br>

sendmsg += &quot;host: wwp.icq.com\r\n&quot;;<br>

sendmsg += &quot;content-length: &quot; + commandmsg.length + &quot;\r\n&quot;;<br>

sendmsg += &quot;connection: keep-alive\r\n\r\n&quot;;<br>

sendmsg += commandmsg + &quot;\r\n\r\n&quot;;<br>

<br>

byte[] arrmsg=encoding.default.getbytes(sendmsg.tochararray());<br>

file://需要发送的信息处理完毕<br>

<br>

file://======下面就是发送这些信息=====<br>

file://首先是建立一个tcpclient 对象<br>

tcpclient tcpc=new tcpclient();<br>

if(0==tcpc.connect(&quot;wwp.icq.com&quot;,80))<br>

{<br>

stream sm = tcpc.getstream();<br>

sm.write(arrmsg,0,sendmsg.length);<br>

streamreader sr=new streamreader(tcpc.getstream(),encoding.default);<br>

string strrev=sr.readline();<br>

if(strrev.indexof(&quot;ok&quot;)!=-1)<br>

{<br>

icq_show.text=&quot;icq消息发送成功&quot;;<br>

}<br>

else<br>

{<br>

icq_show.text=&quot;icq消息发送不成功&quot;;<br>

}<br>

<br>

}<br>

else<br>

{<br>

icq_show.text=&quot;icq消息发送不成功,无法联结icq服务器&quot;;<br>

}<br>

file://关闭tcp联结<br>

tcpc.close();<br>

}<br>

<br>

</script><br>

<html><br>

<meta http-equiv=&quot;content-language&quot; content=&quot;zh-cn&quot;><br>

<head><br>

<title></title><br>

</head><br>

<body><br>

<form runat=&quot;server&quot; ><br>

<table><br>

<tr><td align=center colspan=2><br>

<asp:label id=&quot;icq_show&quot; runat=&quot;server&quot; forecolor=&quot;red&quot; /></td></tr><br>

<tr><td><br></tr><br>

<tr><td align=center colspan=2>发送icq信息</td></tr><br>

<tr><td>您的icq号:</td><td><asp:textbox id=&quot;icq_number&quot; runat=&quot;server&quot; /></td></tr><br>

<tr><td>您的网名:</td><td><asp:textbox id=&quot;icq_name&quot; runat=&quot;server&quot; /></td></tr><br>

<tr><td>您的email:</td><td><asp:textbox id=&quot;icq_email&quot; runat=&quot;server&quot; /></td></tr><br>

<tr><td>发送主题:</td><td><asp:textbox id=&quot;icq_subject&quot; runat=&quot;server&quot; /></td></tr><br>

<tr><td>发送内容:</td><td><asp:textbox id=&quot;icq_message&quot; runat=&quot;server&quot; /></td></tr><br>

<tr><td><asp:button onclick=&quot;send_click&quot; text=&quot;发送icq信息&quot; runat=&quot;server&quot; /></td></tr><br>

</table><br>

</form><br>

<br>

</body><br>

</html><br>

<br>

  开始显示是这个样子:<br>

<br>

    如果提交后,在这里显示信息 <br>

<br>

      发送icq信息 <br>

您的icq号:  <br>

您的网名:   <br>

您的email:  <br>

发送主题:   <br>

发送内容:   <br>

<br>

按下&quot;发送icq信息&quot;键后的显示是:<br>

<br>

    icq消息发送成功 <br>

<br>

<br>

      发送icq信息 <br>

  您的icq号:  <br>

  您的网名:   <br>

  您的email:  <br>

  发送主题:   <br>

  发送内容:   <br>

<br>

  相信大家能看懂上面的程序,我已经加了注释,应当没有问题吧。呵呵。其实这个程序也不过是在走aol在线代码的老路,只是写了个程序模拟了post方法。不过这个已经足够了,我们写程序时也就不必为那个post如表示来烦人了。<br>

<br>

  有了icq信息,肯定不少朋友会问到oicq,毕竟在国内oicq是老大。但是很不幸,腾讯公司并没有给我们提供接口,我写信去问,他们告诉我没有提供,其实我也搞到一个,是通过wap方式搞到的。但是这个不太好,只能是向腾讯公司发通知的那种形式出现,很不好玩,而且还必须网友在线才能收到,太没有意思了。本来也想通过udp直接来写,但是实在不知道,这个数据包中要填些什么东东去验证,所以也没有办法,如果哪位朋友知道,请您写信给我,我也在waiting着啊。<br>

<br>

  关于这个发icq信息的例子示范,我把它放在 http://aspx1.brinkster.com/feidao/code/qicq.aspx 上了,大家有兴趣去看一下,呵呵。<br>

<br>

赞(0)
版权申明:本站文章部分自网络,如有侵权,请联系:west999com@outlook.com 特别注意:本站所有转载文章言论不代表本站观点! 本站所提供的图片等素材,版权归原作者所有,如需使用,请与原作者联系。未经允许不得转载:IDC资讯中心 » ASP.NET发送ICQ消息DIY-.NET教程,Asp.Net开发
分享到: 更多 (0)