【正文】 功能 ............................................... 17 5 系統(tǒng)實施及測試 ........................................................ 18 實施概況 .......................................................... 18 測試方案 .......................................................... 19 測試結(jié)果 .......................................................... 22 結(jié) 論 .................................................................. 22 參考文獻(xiàn) .................................................................. 23 致 謝 .................................................................. 24 聲 明 .................................................................. 25 第 1 頁 共 25 頁 1 引言 課題的背景 隨著計算機網(wǎng)絡(luò)日新月異的發(fā)展，人們的交流方 式越來越多，傳統(tǒng)的交流方式，如：信件、電報、電話等已經(jīng)難以滿足人們的交流要求，在互聯(lián)網(wǎng)上即時的和好友取得聯(lián)系，已經(jīng)成為當(dāng)今社會人們主流的聯(lián)系方式。 the second part is the rationale knowledge which utilizes。八年經(jīng)驗 專業(yè)指導(dǎo)畢業(yè)設(shè)計 需要全套設(shè)計請聯(lián)系： 731767310 分類號： U D C： D10621408(2020) 60610 密 級：公 開 編 號： 2020215001 學(xué)位論文 基于局域網(wǎng)的信息收發(fā)系統(tǒng)的設(shè)計與實現(xiàn) 論文作者姓名： 申請學(xué)位專業(yè)： 網(wǎng)絡(luò)工程 申請學(xué)位類別： 工學(xué)學(xué)士 指導(dǎo)教師姓名（職稱）： 論文提交日期： 2020 年 06 月 05 日 基于局域網(wǎng)的信息收發(fā)系統(tǒng)的設(shè)計與實現(xiàn) 摘 要 網(wǎng)絡(luò)通訊 在當(dāng)今已經(jīng)不算新鮮事物，但大多數(shù)網(wǎng)絡(luò)通訊都需要借助 Inter上的服務(wù)器 ，這就給那些具有大規(guī)模內(nèi)部網(wǎng)絡(luò)的用戶造成了 許多問題，如浪費網(wǎng)絡(luò)資源、遭遇到網(wǎng)絡(luò)攻擊、傳播的病毒、破壞防御系統(tǒng)等等。 the third part is this system demand analysis。因此，計算機之間進(jìn)行即時通訊、發(fā)送文件等交流方式已經(jīng)成為必然潮流。從 1997 年第一代即時通訊軟件誕生后發(fā)展到現(xiàn)在，即時通訊行業(yè)先后經(jīng)歷了文本通信（第一代）、語音交流（第二代）、視頻交流（第三代）和跨網(wǎng)溝通（第四代）等多種信息傳遞技術(shù)變革。因此本課題主要是研究基于局域網(wǎng)的信息收發(fā)系統(tǒng)的設(shè)計與實現(xiàn)，希望能通開發(fā)設(shè)計的局域網(wǎng)通訊軟件來方便在內(nèi)部網(wǎng)絡(luò)上的信息交流，這樣不緊提高了通訊的質(zhì)量，還能有效的防護在互連網(wǎng)上帶來的攻擊，對于那些大中型企業(yè)來說更是需要這樣的一個自己內(nèi)部的即時通訊工具，避免帶來工作效率上不去；病毒及木馬的感染率增大；遠(yuǎn)程服務(wù)器連接時過多的浪費網(wǎng)絡(luò)資源；互連網(wǎng)由于某種原因而斷開時造成通訊中斷等問題。 UDP 協(xié)議基本上是 IP 協(xié)議與上層協(xié)議的接口。 單播 （ Unicast） 單播（ Unicast）指網(wǎng)絡(luò)中從源向目的地轉(zhuǎn)發(fā)單播流量的過程。許多路由選擇協(xié)議如路由選擇信息協(xié)議（ RIP）和開放最短路徑優(yōu)先（ OSPF），都支持高效 Inter 單播路由選擇過程。通過該協(xié)議，主機發(fā)送一個地址解析查詢到局域網(wǎng)中的所有計算機上，以實現(xiàn)網(wǎng)絡(luò) IP 地址的分配。 第 5 頁 共 25 頁 廣播地址（ Broadcast Address）：這是一個特殊地址，當(dāng)數(shù)據(jù)包可以尋址到該地址時，可以幫助所有設(shè)備打開和處理信息。因此出現(xiàn)了 、 UC 等即時通訊工具。并且避免了服務(wù)器忙或與服務(wù)器無法連接時浪費過多時間用于和服務(wù)器建立連接，同時也為內(nèi)網(wǎng)服務(wù)增強了許多的安全性，徹底的將通訊工具從互連網(wǎng)上搬到內(nèi)網(wǎng)中來，這樣一來就不會受到來自互連網(wǎng)的攻擊了。 第 9 頁 共 25 頁 圖 7 信息查看界面 在歷史記錄的窗體中點擊記錄文件按鈕來選擇保存的路徑，將會自動生成一個文本文件來對通訊記錄進(jìn)行保存。由于 UDP 是無連接的，因此在 UDP 的接口方法中不包括 Connect 方法。 1) 用戶名獲取代碼如下： Function ( GroupName : string。 Temp: TNetResourceArray。 //列舉文件資源信息 //獲取指定工作組的網(wǎng)絡(luò)資源句柄 Res := WNetOpenEnum( RESOURCE_GLOBALNET, RESOURCETYPE_DISK, RESOURCEUSAGE_CONTAINER, NetResource,lphEnum)。 //執(zhí)行失敗 Temp := TNetResourceArray(Buf)。 Res := WNetCloseEnum(lphEnum)。 //一個無符號的，占四個字節(jié)（ 32）的整型 //句柄類型 lphEnum : THandle。 //不限資源數(shù)目 BufSize := 8192。 end。 第 13 頁 共 25 頁 3) IP 地址獲取代碼如下： procedure (Sender: TObject。 (readbuf,sizeof(readbuf))。 // (39。 //添加對方返回的自己的 ip (對比 ) if head=39。 end。 f:textfile。 recvip:=。)。recvport:integer):string。 :=RECVNAME。 //調(diào)用窗口 exit。,myname,])。 end。 :=INTTOSTR()。 if then (revname)。 begin for i:=0 to do begin if myname then inc(j,1)。%6s%255s%1024s39。 :=myname。 第 18 頁 共 25 頁 進(jìn)行記錄的功能，主要是創(chuàng)建一個記事本文件對信息進(jìn)行復(fù)制保存，以下就是歷史信息記錄的代碼： 5 系統(tǒng)實施及測試 實施概況 本設(shè)計是基于局域網(wǎng)內(nèi)采用 C/S 結(jié)構(gòu)的即時通信軟件，其主要實現(xiàn)的是單播procedure (Sender: TObject)。 rewrite(F)。=====================================39。時間： 39。)。 測試方案 本程序在 Windows XP操作系統(tǒng)下，使用 Borland Delphi 7 企業(yè)版軟件作為開發(fā)工具，利用 Delphi7（企業(yè)版）集成開發(fā)環(huán)境中提供的網(wǎng)絡(luò)通訊組件進(jìn)行編程的，代碼也是在這個開發(fā)環(huán)境中編譯的，并在組建的局域網(wǎng)中進(jìn)行系統(tǒng)測試的。 本次課題設(shè)計我學(xué)到了很多關(guān)于網(wǎng)絡(luò)通訊方面的知識，也認(rèn)識到自己的能力， 是我從理論走向?qū)嵺`邁出的堅實的一步。 [6] (美 ) ：協(xié)議 [M]. 北京：機械工業(yè)出版社 ,2020。 （ 3）學(xué)?？梢詫W(xué)術(shù)交流為目的復(fù)制、贈送和交換學(xué)位論文。 （ 5）學(xué)?？梢怨紝W(xué)位論文的全部或部分內(nèi)容（保密學(xué)位論文在解密后遵守此規(guī)定）。 第 24 頁 共 25 頁 致 謝 本文是在趙軍老師的熱情關(guān)心和指導(dǎo)下完成的，他淵博的知識和嚴(yán)謹(jǐn)?shù)闹螌W(xué)作風(fēng)使我受益匪淺，對順利完成本課題起到了極大的作用?？傊ㄟ^這次畢業(yè)設(shè)計，我深深體會到，一個好的程序設(shè)計人員必須具有認(rèn)真、 第 23 頁 共 25 頁 謹(jǐn)慎的作風(fēng)，堅忍不拔 的毅力，并且要不斷的向更高的臺階邁進(jìn)，我會向著這個方向去努力。如圖 11： 圖 11 顯示在線用戶 第 20 頁 共 25 頁 如果能顯示出來用戶的信息則在其中一臺計算機上的信息窗體中輸入好準(zhǔn)備發(fā)送出去的信息“歡迎使用！”，如圖 12： 圖 12 輸入發(fā)送信息 如果是想發(fā)送到整的網(wǎng)絡(luò)就點擊界面上的廣播按鈕，這時在所有的計算機上都會彈出一個接收的界面，如圖 13： 圖 13 接收界面 點擊查看按鈕則會彈到一個查看信息的界面上，上面會顯示出剛才所發(fā)送的信息和來自于誰，如圖 14： 第 21 頁 共 25 頁 圖 14 查看界面 如果是想發(fā)送給網(wǎng)絡(luò)中的其中一個用戶就先選擇要發(fā)送的對象再點擊發(fā)送按鈕，這時就只會在那個指定的用戶那里彈出查看的界面了而其他用戶則不會接收到 發(fā)送來的信息。 end。 writeln(f,39。 writeln(f,39。 end。 end。 if then (myname)。CHAT39。 局域網(wǎng)內(nèi)實現(xiàn)廣播功能 在本設(shè)計中單播發(fā)送的按鈕為 BitBtn3，主要是通過 IdUDPServer 和IdUDPClient 組件來編寫的，主要是使用了 來對信息進(jìn)行發(fā)送的，在發(fā)送時將會把信息發(fā)送給在局域網(wǎng)內(nèi)部的所有用戶包括自己。 :=INTTOSTR()。 procedure (revname,revworkgroup,revip:string。%6s%4d%255s39。 //(strpas(myinfobuf))。 _ToIp:=[1]。 begin tempItem:=。 minfo:string。 recvworkgroup:=copy(msg,headlen+namelen+1,workglen)。 recvp2pdat