農(nóng)業(yè)大學(xué)計(jì)算機(jī)網(wǎng)絡(luò)課程設(shè)計(jì)報(bào)告(已修改)
2025-08-01 10:06 本頁面
【正文】 華南農(nóng)業(yè)大學(xué)理學(xué)院課程實(shí)驗(yàn)（設(shè)計(jì)）報(bào)告專業(yè)年級： 11信息與計(jì)算科學(xué) 學(xué)生學(xué)號： 201130760 學(xué)生學(xué)號： 201130760 學(xué)生姓名： 學(xué)生姓名： 實(shí)驗(yàn)題目： Socket應(yīng)用程序設(shè)計(jì) 指導(dǎo)老師： 實(shí)驗(yàn)時(shí)間：2013年11月1日2013年11月29日27 / 31目 錄1實(shí)驗(yàn)內(nèi)容和要求 1 1 1 12實(shí)驗(yàn)過程 2 2 2 2 3 4 4 4 6 8 9 10 12 13 1注冊驗(yàn)證功能 19 21 213實(shí)驗(yàn)結(jié)果 234討論與總結(jié) 245參考文獻(xiàn) 246小組分工 251實(shí)驗(yàn)內(nèi)容和要求在學(xué)習(xí)完TCP/IP協(xié)議組后，要求掌握基于此協(xié)議實(shí)現(xiàn)網(wǎng)絡(luò)通信，理解TCP與UDP的不同特征以及實(shí)現(xiàn)方式。基于Windows平臺建立一個(gè)基于TCP/IP協(xié)議的網(wǎng)絡(luò)通訊小應(yīng)用，實(shí)驗(yàn)可采用UDP或TCP實(shí)現(xiàn)。（1）能夠進(jìn)行用戶管理，所有用戶必須登錄到服務(wù)器，有服務(wù)器維護(hù)在線信息；（2）IM功能：用戶登錄后能夠進(jìn)行實(shí)時(shí)多方點(diǎn)到點(diǎn)短信息通信，如聊天；（3）能夠選擇要求服務(wù)器進(jìn)行轉(zhuǎn)發(fā)服務(wù)；（4）能夠保存通信記錄到數(shù)據(jù)庫（SQL Server或者其他桌面型數(shù)據(jù)庫或數(shù)據(jù)文件）；（5）能進(jìn)行雙方文件傳輸，能夠顯示進(jìn)度；*（6）支持?jǐn)帱c(diǎn)重傳，檢查時(shí)需有功能隨時(shí)中斷傳送，并在下次啟動時(shí)能顯示重傳狀態(tài)；*（7）數(shù)據(jù)包加密；*（8）實(shí)時(shí)語音雙向傳送功能；*（9）多方通話功能；（10）界面設(shè)計(jì)要求布局合理，信息清晰。（11）自加功能。（*為選做內(nèi)容）（1）服務(wù)器能夠進(jìn)行用戶管理，所有用戶必須登錄到服務(wù)器，有服務(wù)器維護(hù)在線信息；（2）IM功能：用戶登錄后能夠進(jìn)行實(shí)時(shí)多方點(diǎn)到點(diǎn)短信息通信，如聊天；（3）服務(wù)器離線轉(zhuǎn)發(fā)功能；（4）客戶端保存群聊天記錄；（5）能進(jìn)行雙方文件傳輸，能夠顯示進(jìn)度；（10）界面設(shè)計(jì)要求布局合理，信息清晰。2實(shí)驗(yàn)過程（1）登陸功能：在用戶填寫相關(guān)的賬戶和密碼時(shí)，客戶端能夠發(fā)送連接客戶端要求，當(dāng)，連上客戶端的時(shí)候，客戶端能夠?qū)①~號和密碼信息發(fā)送到服務(wù)器進(jìn)行核對，并返回信心（2）聊天功能：在客戶端中，用戶有權(quán)選擇群聊還是與某在線用戶私聊（3）離線聊天功能：在線的用戶可能通過服務(wù)器將信息發(fā)給離線的用戶（4）接受離線信息共能：當(dāng)用戶上線時(shí)，接收其他用戶的離線信息（5）聊天記錄功能：客戶端能自動將群聊的信息保存在相應(yīng)的數(shù)據(jù)庫當(dāng)中（6）顯示用戶狀態(tài)功能：對于在線的用戶和離線的用戶能夠及時(shí)顯示在表格當(dāng)中（1）維護(hù)用戶功能：添加新用戶，修改用戶密碼，刪除用戶（2）更新用戶狀態(tài)功能：通知客戶端更新成員狀態(tài)和相應(yīng)的列表（3）離線功能：為離線用戶保存離線信息，并且在用戶上線的時(shí)發(fā)送相應(yīng)的離線信息（4）檢驗(yàn)用戶信息功能：驗(yàn)證用戶的賬號和密碼的正確性，并禁止用戶異地同時(shí)登陸（5）顯示群聊記錄：在服務(wù)器中幾時(shí)顯示群聊的信息（1）在按下登陸按鈕的時(shí)候，程序獲取界面中的服務(wù)器中IP地址和端口號，同時(shí)檢驗(yàn)賬號和密碼是否有誤。若賬號和密碼填寫上沒有錯(cuò)誤，進(jìn)行連接服務(wù)器。代碼如下：Private Sub Command1_Click() 39。點(diǎn)擊登陸按鈕 = False 39。設(shè)置能否登陸標(biāo)志為“不能” If = Or = Then 39。檢查賬號和密碼填寫是否有空 MsgBox 請輸入賬號和密碼 Else Call tcpClient_Connect 39。連接服務(wù)器 DoEvents If = 7 Then 39。若連接上服務(wù)器則發(fā)送賬號和密碼 | amp。 *** amp。 amp。 *** amp。 amp。 amp。 amp。 | 39。***賬號***密碼 DoEvents Else MsgBox 沒有服務(wù)器 End If = True End IfEnd SubPublic Sub tcpClient_Connect() If 7 Then = = DoEvents End IfEnd Sub（2）當(dāng)連接成功后，發(fā)送賬號和密碼，用相關(guān)的已經(jīng)定義好協(xié)議進(jìn)行封裝發(fā)送給服務(wù)器。協(xié)議是***賬號***密碼代碼如下：If = 7 Then 39。若連接上服務(wù)器則發(fā)送賬號和密碼 | amp。 *** amp。 amp。 *** amp。 amp。 amp。 amp。 | 39。***賬號***密碼（3）當(dāng)客戶端收到的服務(wù)器的協(xié)議信息是密碼和賬號是正確的時(shí)候才能進(jìn)行真正的登錄。協(xié)議是：當(dāng)收到*時(shí)，代表登錄成功。當(dāng)收到*ERROR時(shí)，代表沒有這賬號。當(dāng)收到ERROR時(shí)，代表密碼錯(cuò)誤。當(dāng)收到*ONLINE時(shí)，代表賬號已經(jīng)登錄。代碼如下：If InStr(sData, *) 0 Then login = True ElseIf InStr(sData, *ERROR) 0 Then MsgBox 沒有這賬號 ElseIf InStr(sData, ERROR) 0 Then MsgBox 密碼錯(cuò)誤 ElseIf InStr(sData, *ONLINE) 0 Then MsgBox 賬號已經(jīng)登錄End If（1）群聊天。，便可以發(fā)送信息。發(fā)送的協(xié)議：$$$群聊天信息$$$，通過進(jìn)行過協(xié)議封裝的聊天信息，能夠讓服務(wù)器進(jìn)行識別，別且轉(zhuǎn)發(fā)給在線用戶。Private Sub cmdSend_Click() If = Then MsgBox 發(fā)送內(nèi)容不能為空 Exit Sub End If $$$ + + : amp。 + $$$ 39。============================================插入聊天記錄 a = CStr(Now()) + Chr(10) + + : + + Chr(10) Set rs = (insert into data (tcp_data) values (39。 amp。 a amp。 39。)) 39。tcp_data是表的列名 39。============================================插入聊天記錄 = amp。 Chr(10) + CStr(No
范文總結(jié)相關(guān)推薦
鄂ICP備17016276號-1