【正文】 readstream(fs,lsize)。 writeln(39。 // (cmd)。 //服務(wù)器端 ... var cmd,tmpfn,msg,targetname,localdir,:string。 postmessage(,TransferSupervisor,integer(pname),lSize)。 //釋放文件流 end。 //寫入套接字類型為 TRANSFILE (FFileName)。 //定義客戶端套節(jié)字 fs:tfilestream。 FreeMem(Buf)。 For I := 0 To Count 1 Do //列舉各個工作組的信息 Begin ( StrPAS( P^.lpRemoteName )) 。 //得到網(wǎng)絡(luò)中的所有工作組的名稱 If Res NO_ERROR Then exit。 lphEnum : THandle。LOGOUT39。)。)。,myname,myworkgroup])。 recvname:=copy(msg,headlen+1,namelen)。 head:=trim(copy(msg,1,headlen))。 var readbuf:array[0..2030]of char。 Res := WNetCloseEnum(lphEnum)。//資源列舉完畢 If (Res NO_ERROR) then Exit。 := RESOURCETYPE_DISK。 Ind : Integer。 // 廣播自己離線信息 。 mylogoutinfo:string。,[39。 (myinfobuf,9000)。 。 //獲取主機名 myname:=strpas(pmyname)。 //新用戶上線 以 LOGIN 為頭信息 var wsadata:twsadata。文件傳輸?shù)恼?個流程圖如下： 第 6 頁 共 26頁 TCP/IP 3 次握手 SOCKET 流 三次握手 圖 2 文件傳輸系統(tǒng)框架圖 系統(tǒng)界面設(shè)計 界面設(shè)計 界面是系統(tǒng)功能得以實現(xiàn)的基本平臺，這里充分利用 Delphi 可視化開發(fā)環(huán)境以各種組件設(shè)置。徹底避免了文件交換過程與外部網(wǎng)絡(luò)的接觸，實現(xiàn)快速的文件資源共享。而且開發(fā)的系統(tǒng)應(yīng)該簡單易操作，易維護，減少了不必要的麻煩。 最 重要的是，在如今病毒黑客橫行的網(wǎng)絡(luò)世界中，信息的安全性也得不到保證。 在網(wǎng)絡(luò)編程中， 客戶端使用 Socket 對網(wǎng)絡(luò)上某一個服務(wù)器的某一個端口發(fā)出 連接請求，一旦連接成功，打開會話；會話完成后，關(guān)閉 Socket。而且其重要 的還 有 Object Pascal 語言，它是一切的根本。目前大多數(shù)應(yīng)用軟件系統(tǒng)都是Client/Server 形式的兩層結(jié)構(gòu) 。通常說 TCP/IP是 Inter協(xié)議族，而不單單是 TCP和 IP。文件傳輸系統(tǒng)主要功能是自動獲取局 域網(wǎng)內(nèi)用戶的主機名， IP 地址以及工作組名字，最終以 C/S 模式通過 TCP/IP 協(xié)議實現(xiàn)點到點文件傳輸功能。 國內(nèi)外研究現(xiàn)狀 目前，國內(nèi)外 企業(yè)對局域網(wǎng)的文件傳輸系統(tǒng)認識和使用情況并不好，各個企業(yè)單位在局域網(wǎng)內(nèi)實現(xiàn)文件傳輸，資源共享還有很大的缺陷。 聲 明 ................................................... 錯誤 !未定義書簽。 Pointtopoint。 設(shè)計共分為五大模塊，分別為：一、介紹選題背景及意義和國內(nèi)外研究現(xiàn)狀；二、介紹 TCP/IP 點對點協(xié)議技術(shù) ,C/S 架構(gòu)的 Delphi 程序設(shè)計技術(shù)和 Socket 網(wǎng)絡(luò)編程技術(shù)；三、對當前局域網(wǎng)文件傳輸進行需求分析并提出解決方案；四、根據(jù)解決方案對系統(tǒng)進行設(shè)計；五、對基于局域網(wǎng)的文件傳輸系統(tǒng)進行測試并得到測試結(jié)果。 基于局域網(wǎng)的文件傳輸系統(tǒng)的設(shè)計與實現(xiàn) 摘 要 隨著互聯(lián)網(wǎng)技術(shù)的迅猛發(fā)展，計算機通信給人類文明帶來了翻天覆地的變化。 關(guān)鍵詞： C/S 結(jié)構(gòu)；網(wǎng)絡(luò)通訊組件；點對點； Socket 連接 The Design and Implementation of File Transfer System Based on LAN Abstract Along with the Inter technology swift and violent development, the puter correspondence the human culture has brought the earthshaking change for. In very many situations, people39。 Socket connection. 目 錄 論文總頁數(shù)： 26 頁 1 引言 ................................................................... 1 選題背景 ........................................................... 1 國內(nèi)外研究現(xiàn)狀 ...................................................... 1 課題研究的意義 ...................................................... 1 2 理論基礎(chǔ) ............................................................... 2 TCP/IP點對點協(xié)議技術(shù) ............................................... 2 C/S架構(gòu)的 DELPHI程序設(shè)計技術(shù) ....................................... 2 SOCKET網(wǎng)絡(luò)程序設(shè)計技術(shù) ............................................. 3 3 系統(tǒng)需求分析 ........................................................... 4 現(xiàn)行業(yè)務(wù)系統(tǒng)描述 .................................................... 4 現(xiàn)行系統(tǒng)存在的主要問題分析 .......................................... 4 提出解決方案 ....................................................... 4 4 系 統(tǒng)設(shè)計 ............................................................... 5 系統(tǒng)總體架構(gòu) ....................................................... 5 系統(tǒng)界面設(shè)計 ....................................................... 6 界面設(shè)計 ....................................................... 6 用戶信息 ....................................................... 7 系統(tǒng)功能模塊設(shè)計 .................................................... 9 獲取用戶信息 .................................................... 9 局域網(wǎng)內(nèi)文件傳輸 ............................................... 13 局域網(wǎng)內(nèi)文件夾傳輸 .............................. 錯誤 !未定義書簽。 第 1 頁 共 26頁 1 引言 選題背景 當今世界科學技術(shù)飛速發(fā)展，尤其以計算機通信網(wǎng)絡(luò)為代表的互聯(lián)網(wǎng)技術(shù)更是日新月異，令人眼花燎亂，目不睱接。 技術(shù)無論 是從 理論上 或 實踐 上 都還不夠完善 。 本系統(tǒng)既鍛煉了我們的實際動手能力，使我們將大學四年所學的理論知識與實際開發(fā)相結(jié)合，又引導我們進行了一次模擬實際產(chǎn)品的開發(fā)，對于我們以后工作能力的培養(yǎng)具有重要的意義。 傳統(tǒng)的 C／ S 體系結(jié)構(gòu)雖然采用的是開放模式，但這只是系統(tǒng)開發(fā)一級的開放性，在特定的應(yīng)用中無論是 Client 端還是 Server