ASP.NET發送ICQ消息DIY

2024-07-10 12:57:56

字體：大中小

來源：轉載

供稿：網友

asp.net發送icq信息diy 
 
 
 
　　這里我給大家提供一個很實用的例子，就是在線發送icq信息。想一想我們在網頁上直接給朋友發送icq信息，那是多么美妙的事情啊。呵呵，在吹牛啊，其實icq本來就有在線發送的代碼，不過，這些都是aol給你寫好的代碼，多沒有意思啊。還是自已寫的比較好，呵呵,廢話少說，大家來看代碼吧 
 
＜% @ page language="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; 
file://首先取得要發送的信息 
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"; 
file://然后就是組裝全部的信息 
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()); 
file://需要發送的信息處理完畢 
 
file://======下面就是發送這些信息===== 
file://首先是建立一個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服務器"; 
} 
file://關閉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＞＜br＞＜/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＞ 
 
　　開始顯示是這個樣子: 
 
　　　　如果提交后，在這里顯示信息 
 
　　　　　　發送icq信息 
您的icq號:　 
您的網名: 　 
您的email:　 
發送主題: 　 
發送內容: 　 
 
按下"發送icq信息"鍵后的顯示是： 
 
　　　　icq消息發送成功 
 
 
　　　　　　發送icq信息 
　　您的icq號:　 
　　您的網名: 　 
　　您的email:　 
　　發送主題: 　 
　　發送內容: 　 
 
　　相信大家能看懂上面的程序，我已經加了注釋，應當沒有問題吧。呵呵。其實這個程序也不過是在走aol在線代碼的老路，只是寫了個程序模擬了post方法。不過這個已經足夠了，我們寫程序時也就不必為那個post如表示來煩人了。 
 
　　有了icq信息，肯定不少朋友會問到oicq，畢竟在國內oicq是老大。但是很不幸，騰訊公司并沒有給我們提供接口，我寫信去問，他們告訴我沒有提供，其實我也搞到一個，是通過wap方式搞到的。但是這個不太好，只能是向騰訊公司發通知的那種形式出現，很不好玩,而且還必須網友在線才能收到，太沒有意思了。本來也想通過udp直接來寫，但是實在不知道，這個數據包中要填些什么東東去驗證，所以也沒有辦法，如果哪位朋友知道，請您寫信給我，我也在waiting著啊。 
 
　　關于這個發icq信息的例子示范,我把它放在 http://aspx1.brinkster.com/feidao/code/qicq.aspx 上了，大家有興趣去看一下，呵呵。

網站運營seo文章大全

提供全面的站長運營經驗及seo技術!

上一篇：.Net邊學邊講（一）

下一篇：在 ASP.NET 中使用多個 runat&#061;server form