通信工程畢業設計_基于socket的即時通訊軟-wenkub.com

　 　

【正文】 頭命令 ClientData, vbString tou = Val(Left(ClientData, 2)) Select Case tou Case 1 ’代碼省略 Case 2 ’代碼省略 ?? End Select 長沙學院 畢業設計 (論文 ) 32 End Sub 服務器和客戶端之間的連接： 其中 winsock 控件需要正確設置服務器的 IP 地址 (這里仍假設為本機 ) ,設置服務器端口為客戶端中所 要求的遠程端口號 , 這樣才能保證通訊。發送一個數據，等待響應信息的回來，客戶端是通過服務器回復信息的頭命令，判定消息類型。生成新的 Winsock Winsock1(maxconnext).LocalPort = 0 Winsock1(maxconnext).Accept requestID 39。接收 長沙學院 畢業設計 (論文 ) 31 nowconnext(I) = True 39。主 Winsock—— Winsock(0)發生消息 I = 1 While I = maxconnext And nowconnext(I) 39。 登陸窗口如圖 ： 長沙學院 畢業設計 (論文 ) 29 圖 注冊窗口和個人信息窗口也顯示在下面了，通過注冊界面可以自定義個人信息，完成注冊并且用自己隨機獲取的 ID 號進行登陸，登陸后可以通過雙擊在線名單的某一行，查看對應的人員信息。 | amp。ql If = True Then = False = 0 End If End Sub Private Sub Option2_Click() 39。 標簽欄接收并顯示服務器發來的通告信息。 Time amp。 你要通知什么事情 ?, 通知 , tongz) If Trim(tongz) = Then tongz = 歡迎你 使用本軟件。 鍵值位置： HKEY_CURRENT_USER\Software\VB and VBA Program Settings\即時通訊軟件服務器\server 更改密碼的界面見圖 ： 圖 更改密碼的界面圖 發布通知 發布通告是在菜單欄的工具里，點擊即可發布你所輸入的信息。 .txt For Input As 1 Do Until EOF(1) Input 1, str t = t amp。 str DoEvents Loop Close 1 If t = Then Text1 = 這一天沒有任何日志信息 Else Text1 = t Exit Sub 30: Close 1 Text1 = 這一天的日志信息不存在，或文件已丟失 End Sub Private Sub Command3_Click() On Error GoTo 30 Dim t, str As String c1 = False 長沙學院 畢業設計 (論文 ) 22 Open amp。 \data\ amp。 人 amp。 (2).Text amp。 vbCrLf = 當前 amp。 vbCrLf = 程序是 amp。 \bat\ strDestination = amp。 時 amp。 月 amp。 \) If a = 0 Then MsgBox 數據庫文件出錯，請查看 配置是否正確 : End ServerName = Left$(str_tem, Len(Trim$(str_tem)) 1) Nian = Mid(ServerName, 1, 4) Yue = Mid(ServerName, 5, 2) Ri = Mid(ServerName, 7, 2) Shi = Mid(ServerName, 9, 2) Fen = Mid(ServerName, 11, 2) I = MsgBox(數據庫恢復將會覆蓋當前數據庫，你恢復到 amp。這里點擊的是 “no Exit Sub Else strSource = amp。 \ CopyFile strSource, strDestination, False MsgBox 數據初始化完畢，請按 “確定 ”返回 , vbInformation End If 界面圖如下： 圖 長沙學院 畢業設計 (論文 ) 17 圖 圖 數據備份和還原模塊 數據需要定期備份，并且具有還原的功能，以保證數據的穩定性，所以數據備份還原的模塊是必須有的。 關鍵程序代碼所示： FileNames = Dir( amp。 圖 數據庫邏輯結構設計 根據系統的需要，設計 2 個數據表來存放用戶信息，數據庫中這兩個表的名稱分別為 BACK 和 DATA。 Access 具有較獨特的優勢 提供了更強大的數據組織 ,用戶管理 ,查詢檢索、數據排序及數據打印等功能。 Winsock 控件屬性： Protocol∥ 值為 sckTCPProtocol 時使用 TCP/ IP 協議 ,sckUDPProtocol 使用 UDP 協議 長沙學院 畢業設計 (論文 ) 12 RemoteHost ∥ 準備連接遠程機的 IP 地址 RemotePort ∥ 連接遠程機的 IP 端口號 LocalPort ∥ 本地機 IP 端口號 Winsock 控件方法 : Connect ∥ 申請連接遠程機 Listen ∥ 設置監聽 Accept ∥ 建立實際連接 Senddata ∥ 發送數據 Getdata ∥ 接收數據 (用文本框接收時應加上參數 Vbstring) Close ∥ 關閉連接 Winsock 控件事件 : Connectionrequest ∥ 一方請求連接時另一方產生 Connect ∥ 一方接受連接時另一方產生 Close ∥ 一方關閉連接時另一方產生 DataArrival ∥ 一方發送數據另一方產生 Error ∥ 請求連接失敗時產生 長沙學院 畢業設計 (論文 ) 13 第 6 章 詳細設計 數據庫設計 本系統采用的 Access 數據庫是 Microsoft公司始于 1994年發表的微機數據庫管理系統。為了完成連接，可以在 ConnectionRequest 事件中調用Accept 方法。 利用 TCP 協議通訊必須分別建立客戶應用程序和服務器應用程序。 Winsock 控件可以使用兩種協議： TCP 協議和 UDP 協議。客戶端只需一個 Winsock 控件，應具有隨時連接、斷開服務器的功能，也應具有對接收到的信息做出正確分析、處理的能力。它可以綜合用戶、領導和原型開發人員的各方需求 [10]。考察用戶新加入的需求信息和組成成分的嚴格說明信息，看其對原型 效果的影響，是否影響到原型的有效性，如果導致原型失敗，應加以修正和改進。包括確定需求和開發工作模型，例如屏幕格式、功能菜單、報表格式以及對關鍵數據和功能的說明等。本 即時通訊 軟件采用的是原型法。 面向對象法： 以類，類的繼承，聚集等概念描述客觀事物以及聯系。適用于開發需求較 明確固定的信息系統。 系統功能需求圖 這個即時通訊軟件系統包括服務器端和客戶端，服務器端有聊天記錄、系統設置、發布通告、數據庫備份還原初始化、置頂的功能，客戶端要求有登陸、注冊、聊天和修改查看個人信息的功能，系統功能的需求圖如下： 長沙學院 畢業設計 (論文 ) 9 圖 系統 功能需求圖 開發方法介紹 目前比較成熟的信息系統開發方法有：生命周期法、原型法、面向對象法等。 （ 7） 用戶上線通知。 （ 3） 可以同時發送一個消息給所有人。 Socket執行體處理傳輸層內 UDP 軟件模塊和客戶程序之間的接口 [9]。無連接客戶程序使用數據報發送網絡服務請求，它不建立點到點連接。同樣，由于無連接客戶程序沒有和遠地主機建立直接連接，所以它也必須對協議端口進行偵 聽，以便接收以對它服務請求產生的數據報應答。也就是說，程序告訴 Socket 執行體使用哪一個協議端口進行數據傳送。這些術語進一步描述了與網絡連接、協議可靠性以及數據服務有關的協議特性。但是，也可以設計同時完成這兩種功能的程序，例如，一些服務器程序如果不能完成一個服務請求時，它將轉而充當客戶程序，向其它服務器程序請求信息 。服務程序通常在一個眾所周知的地址監聽對服務的請求，也就是說，服務進程一直處于休眠狀態，直到一個客戶程序提出了請求長沙學院 畢業設計 (論文 ) 7 信息。 客戶機 /服務器模型 客戶機 /服務器（ C/S）模型是一種網絡模型，它并不是定義了網絡的層次結構，而是描述了一種網絡程序運行的方式。通用口分配是特定應用程序廣泛使用的一個協議端口。成千的 PC 機應用程序使用此方案。 PC 機給它的端口命名和編號。 IP 數據報保存目的和源 IP 地址，同樣傳輸協議也保存源和目的端口號。如果你在同一天給同一個人郵寄兩封信，你無 法知道那個人先收到那封信。相比之下，傳輸到同一目的地的多個數據報可能不會按發送順序到達。連接的接收方可以按每次 20 字節讀數據 (要讀 5 次 )。協議不管要求發送或接收數據的長度和傳送數目，只是將數據看作一個簡單的字節串流。如果發送地址是錯誤的，由于郵遞系統不能將信退回給你，所以你就不知道信件有沒有送到。相比之下，不可靠協議不能確保數據正確傳輸。其次，為了確保傳輸的數據有效，可靠協議在每次傳輸時，都包含一個或更多的校驗和（ CRC）。可靠傳輸包括幾個特征。 TCP/IP 協議的核心是傳輸層協議（ TCP、 UDP）、網絡層協議（ IP）和物理接口層，這三層通常在操作系統的內核中實現。這個協議組包括幾種工作在不同層次上的網 絡協議， UDP 用戶數據報協議（ User Datagram Protocol），提供給用戶進程的無連接協議，也負責在應用程序之間無連接傳遞數據，但不執行正確性檢查。 長沙學院 畢業設計 (論文 ) 5 第 3 章 網絡通訊程序的設計原理 TCP/IP 協議 TCP/IP 是國際互聯網所采用進行網際互連的通信協議。由于這些源將 XML 用作自己的數據交換格式，因此可以在 Access 中創建一系列聚合查詢，以將該數據拉入視圖中，然后利用這些視圖設計窗體和報表。 Microsoft Access 2021 提供有功能強大而直觀的 XML 數據共享功能，而無須考慮平臺、數據格式、協議、架構或商務規則之間的差異。自從 1992年開始銷售以來， Access 已經賣出了超過 6000 萬份，現在它已經成為世界上最流行的桌面數據庫管理系統。此外，通過動態鏈接庫，還可以調用 Windows 應用程序接口（ API）函數，實現 SDK 所具有的功能 [6]。 OLE 技術是 Microsoft 公司對象技術的戰略，它把多個應用程序合為一體，將每個應用程序看作是一個對象進行鏈接和嵌入，是一種應用程序一體化的技術。 利用動態數據交換（ Dynamic Data Exchange）技術，可以把一種應用程序中的數據動態地鏈接到另一種應用程序中，使兩種完全不同的應用程序建立起一條動態數據鏈路。 Visual Basic 具有強大的數據庫管理功能，利用數據控件和數據庫管理窗口，可以直接建立或處理 Microsoft Access 格式的數據庫，并提供了強大的數據存儲和檢索功能。一個對象可能會產生多個事件，每個事件都可以通過一段程序來響應。 Visual Basic 語句簡單易懂，其編輯器支持彩色代碼，可自動進行語法錯誤檢查，同時具有功能強大且使用靈活的調試器和編譯器。 版以后的 Visual Basic 支持面向對象的程序設計，但它與一般的面向對象的程序設計語言（ C++）不完全相同。有時候，這種編程 編譯 修改的操作需要反復多次，大大影響了軟件開發效率。 長沙學院 畢業設計 (論文 ) 2 第 2 章 開發工具介紹 VB 簡介 Visual Basic 是一個功能強大的應用程序開發工具，在世界范圍內得到了廣泛的 應用。 課題的內容 這個基于 socket 技術 的即時通訊軟件是基于 Visual Basic 平臺和 Access 數據庫設計的 。 課題的目的 現在也有很多在局域網上不使用服務器的通訊軟件，比如飛鴿傳書，這種軟件小巧且方便，也能解決一部分問題。首先，在局域網里的網上鄰居里，只能看到機器名，不清楚對方是誰，也不知道對方機器里有什么資源可以共享，而且當局域網內的機器很多時，這種方式更加麻煩。t meet the need of modern life. Instant messenger software as a convenient contact between the practic