国产激情自拍_国产9色视频_丁香花在线电影小说观看 _久久久久国产精品嫩草影院

首頁 > 編程 > Delphi > 正文

用Delphi實現BP機、手機短訊

2019-11-18 18:56:15
字體：大 中 小
來源：轉載
供稿：網友
     很多人一定用過OICQ，想必也用過了它的BP機短訊、手機短訊，編程的朋友一定想實現這種功能，
如果你的程序能發到手機、發到BP機一定很酷。
     現在我就介紹一種可行的方法。
    一、原理
              它不同于OICQ的雙方都在網上才能進行交流的尋呼功能，它可以將文字信息發送到真正的尋呼機上。只要你能夠上網，就可以自己動手，隨時隨地將信息發送出去，即使你在國外，也可以利用它來向國內的友人發送信息了，而且不用交納國際長途費用，是不是方便又省事呢！
   二、分析
              現在網上各尋呼臺都有網上服務,網頁尋呼(Web Paging)就是常用的一種。它是通過在互聯網上訪問尋呼臺的主頁，然后由尋呼臺的信息尋呼系統打傳呼。所以我們只要利用HTTP協議就可以實現網絡尋呼了。以下就簡單介紹一下HTTP協議：
   HTTP中完成一個會話通常要完成：1)客戶端程序與服務器建立連接2)發送請求3)服務器響應客戶端4)關閉連接
   HTTP常用到的請求有：1)GET(請求一萬維網頁) 2)HEAD(讀取一萬維網頁的頭部) 3)PUT(請求一存儲萬維網頁) 4)POST(附加一個命名的資源) 5)DELETE(刪除萬維網頁) 6)LINK(連接兩個已有的資源) 7)UNLINK(斷開兩個已有資源的連接)
   HTTP中常用到的應答狀態代碼有：(*號代表0-9間的一個數) 1. 1** (信息) 2. 2**(成功) 3.4**(客戶端錯誤) 4.5**(服務器錯誤)
   其實我們要實現的程序，只用POST、GET請求，收到正常應答就可以了。POST可以用于把用戶輸入的數據以數據流的方式傳給CGI程序，CGI通過Contect-Length環境變量來取相應長度的數據流信息。
POST請求格式如下：
POST http://www2.scuta.edu.cn/stu/chatroom/check.asp HTTP/1.0
Accept: image/gif, image/x-xbitmap, image/jpeg, image/pjpeg, application/vnd.ms-Powerpoint, application/vnd.ms-Excel, application/msWord, */*
Referer: http://www2.scuta.edu.cn/stu/
Accept-Language: zh-cn
Content-Type: application/x-www-form-urlencoded
PRoxy-Connection: Keep-Alive
User-Agent: Mozilla/4.0 (compatible; MSIE 5.5; Windows 98)
Host: www2.scuta.edu.cn
Content-Length: 87
Pragma: no-cache
Cookie: ASPsessionIDQGGGQHHE=ABGNNOJCIGOFCDLBIOLHKAFK
服務器正常應答的頭部結構為：
  200 OK HTTP/1.0  說明提交數據成功
    三、程序的實現
             Delphi中NMHTTP已經可以很容易的實現上面的所說的數據提交,而且它還支持Proxy、這樣對于通過代理服務器上網一樣可以適用，并且它不是OICQ中發送訊信所用到SOCKET5代理。
   新建一個窗體，加入組件一個ComboBox，命名為callto,用于存放尋呼對象，如國信尋呼就有95908、94908、94909、98062、98063、98019、98035、98052、98038、99055、98060、98061、98051、98003、99062、99016、99017、99018、99019、99046、99076；加入組件Edit，命名為tonumber，表示尋呼號碼；加入組件RadioGroup，命名為RadioGroup1,Caption設為呼機類型，items中加入兩項，分別為中文機、數字機;加入組件Edit,命名為firstName，用于表示發尋呼人的姓；加入組件RadioGroup，命名為RadioGroup2,Caption設為尋呼人性別，items中加入兩項，分別為先生、小姐;加入組件Memo，命名為callmsg，用于輸入發送的信息(注：對于數字機只能是數字信息)；加入組件NMHTTP,命名為NMHTTP1；加入Checkbox，命名為ifuseproxy，用于確定是否使用代理服務器;加入兩個Edit組件，分別用于軟件代理服務器地址、代理服務器端口；最后加入命令按鈕,Caption設為“發送”。
現在以國信尋呼為例，它用GET請求就可以實現了,“發送”按鈕的程序代碼如下：
procedure TForm1.Button1Click(Sender: TObject);
  var callstr:string;
begin            callstr:='http://t     case RadioGroup1.ItemIndex of
       0:callstr:=callstr+'&pager_type=C';
       1:callstr:=callstr+'&pager_type=N';
     end;
     callstr:=callstr+'&firstname='+firstname.text;
     case RadioGroup2.ItemIndex of
       0:callstr:=callstr+'&title=0';
       1:callstr:=callstr+'&title=1';
     end;    
     callstr:=callstr+'&msg='+callmsg.Text+'&answer=null&B1=發送尋呼';
  NMHTTP1.InputFileMode := FALSE;
  NMHTTP1.OutputFileMode := FALSE;
  NMHTTP1.ReportLevel := Status_Basic;
  If ifuseproxy.Checked then
  Begin
    NMHTTP1.Proxy := Edit1.Text;
    NMHTTP1.ProxyPort := StrToInt(Edit2.Text);
  End;
  NMHTTP1.Get(callstr);
end;
有些尋呼(如潤迅尋呼就不能用上面的GET請求實現，它要用POST請求)，使用與上面相差不大，如下面是NMHTTP的POST用法：
  NMHTTP1.InputFileMode:=False;
  NMHTTP1.OutputFileMode:=True; 
  NMHTTP1.ReportLevel:=Status_Basic;
  If ifuseproxy.Checked then
  Begin
    NMHTTP1.Proxy := Edit1.Text;
    NMHTTP1.ProxyPort := StrToInt(Edit2.Text);
  End;
  With NMHTTP1.HeaderInfo do
  Begin
    Cookie := Edit5.Text;
    LocalMailAddress := Edit6.Text;
    LocalProgram := Edit7.Text;
    Referer := Edit8.Text;
    UserID := Edit9.Text;
    Password := Edit10.Text;
  End;
//  把要提交的數據先放在test.txt文件中：格式為stnid=A&pageno=123456...
  NMHTTP1.Post('http://www.wocall.com/script/zbwebcall.asp','test.txt');
//NMHTTP的具體用法在Delphi安裝目前BorlandDelphi5DemosFastNetHttp下有個NMHTTP使用的例子。
以上都是用NMHTTP實現的，其實用Delphi中的WebBrowser組件同樣可以完成數據的提交，使用是這樣的 Webbrowser1.OleObject.Document.FrontPage_Form1.submit();
說明：WebBrowser1是WebBrowser組件的名,Frontpage_Form1是用WebBrowser打開的網頁中的表單名
網頁中的表單是這機樣的：
<FORM name=FrontPage_Form1  action=http://message.com.cn/cgi-bin/ips/webpaging  method=post>
......
</Form>
這樣的實現方法就是用程序生成一個已經按用戶輸入信息生成一個網頁，然后通過WebBrowser1.Navigate(生成的網頁),最后提交到服務器Webbrowser1.OleObject.Document.FrontPage_Form1.submit();這樣就完成了一次尋呼

上一篇：在DELPHI程序中使用ADO對象存取ODBC

下一篇：Delphi中實現文件拷貝的三種方法

發表評論 共有條評論
用戶名: 密碼:
驗證碼: 匿名發表
學習交流
熱門圖片

新聞熱點

疑難解答

圖片精選

網友關注

国产激情自拍_国产9色视频_丁香花在线电影小说观看 _久久久久国产精品嫩草影院
久久国产热视频| 亚洲91av| 中文字幕网在线| 狠狠狠狠狠狠操| 国产免费a∨片在线观看不卡| 交视频在线观看国产| 国产中文字幕网| 国产馆av播放| 99在线免费视频| 国产福利在线观看| 亚洲天堂久久久| 国产一级片网站| 亚洲精品天堂在线观看| 福利视频在线看| av黄色在线观看| 国产免费av网站| 在线国产中文字幕| 国产真实伦在线观看| 国产99在线|亚洲| 九七电影韩国女主播在线观看| 国产乱码在线| 一级二级三级在线观看| 豆国产97在线|亚洲| 在线视频中文字幕久| 日本成人在线播放| 国产对白国语对白| sm国产在线调教视频| 精品一区二区在线欧美| 国产在线第一页| 欧美日韩亚洲第一页| av高清资源| 中文资源在线官网| 97中文字幕| 国产精品日日爱| 国产精品亚洲第五区在线| baoyu777.永久免费视频| 国产www网站| 国产激情视频一区二区| 二人午夜免费观看在线视频| 精品女厕厕露p撒尿| 中文字幕在线永久在线视频| 久久99亚洲网美利坚合众国| 日本一级理论片在线大全| 国产91在线视频蝌蚪| 国产一级片在线| 国产视频一二三区| 国产一级黄色电影| 99视频免费| 国产一级激情| 国产三级自拍| 99在线播放| 亚洲综合在线不卡| 亚洲精品影视在线| 免费在线超碰| 久草电影在线| 国产网站在线播放| 国产91足控脚交在线观看| 2019年中文字幕| 日本动漫理论片在线观看网站| 超碰97在线免费观看| 九九在线观看免费视频| 资源视频在线播放免费| 国产对白在线| 免费影视观看网站入口| 国产香蕉视频在线看| 国产高清自拍视频在线观看| 在线视频婷婷| 天堂资源在线中文| 999国产在线视频| 香蕉视频在线看| 久久精品无码一区二区日韩av| 五月综合网站| 欧美日韩**字幕一区| 国产视频2区| 国产中文字幕在线看| 亚洲精品视频区| 国产精品白浆视频免费观看| 女同一区二区免费aⅴ| 精品亚洲综合| 国产区在线看| 高潮白浆视频| 国内精品一区视频| 日本a级黄色| 一级二级在线观看| 国产一级免费在线观看| 久久久久久久久亚洲精品| 伊人伊人av电影| 国产福利在线播放| 国产一二在线观看| 国产原创精品视频| 青青在线视频| 亚洲字幕成人中文在线观看| 国产天堂在线观看| 国产在线观看色| 日本福利午夜视频在线| 在线视频中文字幕久| 国产午夜精品一区理论片| 久久综合精品视频| 亚洲www色| 国产成人福利| 69国产精品视频| 国产经典av| √天堂资源中文www| 国产精品9区| 国产99在线|亚洲| 精品黄色免费中文电影在线播放| 国产精品久久一区二区三区不卡| 国产一区二区三区不卡免费观看| 国产裸舞福利在线视频合集 | 91福利在线免费| 欧美亚洲系列| 国产麻豆免费| 国产日本在线视频| 99re6在线视频精品免费| eeuss影院在线观看| 秋霞av在线| 自拍亚洲国产| 在线看黄网址| 国产美女在线免费观看| 国产娇喘精品一区二区三区图片| 91亚洲欧美| 国产精品综合久久久久| 国产视频三区| 亚洲社区在线| 激情亚洲综合网| 最新国产在线精品91尤物| 国产视频你懂的| 人成在线免费视频| 国产一级性片| 轻轻色免费在线视频| 国产日本视频| 超碰在线网站| 在线视频色在线| 中文字幕在线永久在线视频| 一本久中文高清| 国产污视频在线| 开心婷婷激情| 在线观看免费黄色| 国产三级在线播放| 国产美女免费观看| 精品欧美日韩一区二区| 九九热视频免费在线观看| 99综合精品久久| 国产精品入口麻豆高清| 久热国产在线| 日韩黄色成人| 在线中文免费视频| 国产丝袜在线| 久久精品视频免费看| www.香蕉视频在线观看| 国产黄色片中文字幕| 国产一级网站视频在线| 超碰免费97在线观看| 在线免费观看污| 国产欧美一区二区三区小说| www操操操| 夜色资源网av在先锋网站观看| 天堂资源在线中文| 久蕉依人在线视频| 噜噜噜噜噜在线视频| 四虎成人免费观看在线网址| 国产区av在线| 最新国产在线精品91尤物| 国产福利片在线| av在线日韩国产精品| 四虎成人免费| 国产精品久久精品牛牛影视| 国产欧美久久久久久久久 | 国产视频三区| 九九色在线观看| 欧美啪啪精品| 在线āv视频| 99热免费在线| 精品国产一区二区三区不卡在线| 国产午夜视频| 国产中文在线观看| 一本大道久久a久久精品| 99久久免费精品国产免费| 国产网红在线观看| 在线视频观看国产| 91av福利| 伊人中文字幕在线| 国产精品亚洲色图| 国产二区三区在线| 香蕉视频网站在线播放| www.亚洲视频| 国产午夜在线视频| www.av在线视频| 中文字幕av在线| 人人九九精品| 导航福利在线| 国产丝袜精品丝袜| 国产高清自拍视频在线观看| 国产桃色电影在线播放| 九九热视频在线| 黄色国产网站在线播放| 国产日本韩国在线播放| 国产激情在线| 国产成人精品久久一区二区小说 | 懂色av一区|