【導(dǎo)讀】淘汰，而依靠計(jì)算機(jī)進(jìn)行網(wǎng)絡(luò)存儲(chǔ)、資料信息傳送和信息共享已經(jīng)越來(lái)越普遍，地方訪問(wèn)存儲(chǔ)的數(shù)據(jù)。在此形勢(shì)下，基于網(wǎng)絡(luò)的存儲(chǔ)與交換系統(tǒng)迅速發(fā)展起來(lái)，使得以上問(wèn)題迎刃而解。該系統(tǒng)完成了用戶注冊(cè)管理、后臺(tái)管理和用戶空間管理功能；為每個(gè)。積分制；通過(guò)積分制來(lái)對(duì)用戶空間升級(jí)實(shí)行優(yōu)惠。最后通過(guò)測(cè)試，基本滿足了。用戶的需求，但還需要進(jìn)一步完善，才可以應(yīng)用于實(shí)際中。

　　

【正文】 報(bào)次數(shù)統(tǒng)計(jì)，并按被舉報(bào)次數(shù)排列，通過(guò)查看文件驗(yàn)證共享文件是否不合適，對(duì)不合適文件進(jìn)行鎖定。主要代碼如下： Sql = Select * From UserFiles WHERE vSharType=39。共享 39。 AND vFileLock=39。39。 AND vFileUp39。039。 ORDER BY vFileUp DESC Dim objAdapter As New SqlDataAdapter(Sql, SqlServer) (ds, UserFiles) = ds () (3) 管理員還可以從“被鎖定文件”鏈接到被鎖定文件查看頁(yè)面 ，對(duì)錯(cuò)判而鎖定的文件進(jìn)行解鎖。主要代碼如下： Dim Sql As String = UPDATE UserFiles SET vFileLock=39。39。 WHERE vWay=@vWay Dim cmd As New SqlCommand(Sql, conn) (New SqlParameter(@vWay, , 50)) (@vWay).Value = (0).Text 收費(fèi)管理模塊 管理員可以添加、刪除、修改用戶積分等級(jí)， 按照空間大小收費(fèi)、根據(jù)用戶的積分級(jí)別實(shí)施優(yōu)惠收費(fèi)。 當(dāng)某用戶申請(qǐng)升級(jí)時(shí)候，可以查詢?cè)撚脩舻姆e分、積分等級(jí)，以及升級(jí)到相應(yīng)等級(jí)經(jīng)過(guò)優(yōu)惠折算后應(yīng)支付的實(shí)際費(fèi)用。 (1) 添加積分等級(jí) SQL 語(yǔ)句如下： = INSERT INTO IntegralRank(vIntegralRank,vUserSoreU,vUserSoreD,vContrbRed) VALUES(39。 amp。 amp。 39。,39。 amp。 amp。 39。,39。 amp。 amp。 39。,39。 amp。 amp。 39。) (2) 查看積分等級(jí)頁(yè)面（ Admin/）用 DataGrid 顯示，主要代碼如下： Sql = Select * From IntegralRank ORDER BY vIntegralRank Dim objAdapter As New SqlDataAdapter(Sql, SqlServer) (ds, IntegralRank) = ds () (3) 通過(guò)查看積分等級(jí)頁(yè)面 DataGrid 顯示中各行的修改超鏈接鏈接到積分等級(jí)修改頁(yè)面 (Admin/)，此頁(yè)面主要代碼如下： Dim id As String = (id) 39。獲得傳值 = Select * From IntegralRank where vIntegralRank=39。 amp。 id amp。 39。 objReader = () = (1) = (2) = (3) 39。初始化頁(yè)面 (4) 收費(fèi)查詢頁(yè)面 (Admin/)，實(shí)現(xiàn)查詢某特定用戶升級(jí)到特定用戶等級(jí)所需要的實(shí)際費(fèi)用，還顯示出了該用戶的積分、優(yōu)惠打折，查詢Button 觸發(fā)的主要代碼如下： Dim userrank As Integer = () 39。查詢?cè)撚脩舴e分 = Select vUserSore From Users where UserId=39。 amp。 amp。 39。 objReader = () = (vUserSore) () 39。根據(jù)積分查詢出該用戶所處積分等級(jí)的優(yōu)惠打折 = Select * From IntegralRank objReader = Do While () If (vUserSoreU) And (vUserSoreD) Then contrbred = (vContrbRed) = (vContrbRed) i = 1 Exit Do End If Loop 39。查詢想要獲得用戶等級(jí)的原價(jià) = Select vCharge From UsersRank where vUserRank=39。 amp。 userrank amp。 39。 objReader = () Dim charger As String = (0) () = charger = charger * contrbred / 10 39。計(jì)算 出需要升級(jí)所支付的實(shí)際費(fèi)用 6 系統(tǒng)測(cè)試 服務(wù)器配置 硬件環(huán)境： (1) CPU: AMD 1600+ (2) 內(nèi)存： 512MB (3) 硬盤： 40G 軟件環(huán)境： Windows XP(含 IIS ),Microsoft SQL Server2020 前臺(tái)測(cè)試結(jié) 果 用戶注冊(cè)、登錄測(cè)試 經(jīng)過(guò)測(cè)試，用戶能成功注冊(cè)帳號(hào)，能夠在服務(wù)器上新建一個(gè)個(gè)人專用的存儲(chǔ)文件夾，并能夠成功驗(yàn)證用戶真假，通過(guò)驗(yàn)證后能成功登錄到相應(yīng)用戶頁(yè)面，進(jìn)行后面的操作。出現(xiàn)的主要問(wèn)題就是新用戶注冊(cè)登陸后，還沒(méi)有上傳任何文件，導(dǎo)致登錄到用戶主操作頁(yè)面 User0 的時(shí)候，右邊分頁(yè)讀取空間大小出錯(cuò)，解決辦法就是讀取前先判斷文件信息表中是否有屬于該用戶的文件，如有才進(jìn)行讀取，如沒(méi)有就不進(jìn)行讀取，輸出 0。 文件上傳、下載測(cè)試 經(jīng)過(guò)測(cè)試，能夠成功上傳用戶本地的文件，并能夠根據(jù)擁有用戶空間來(lái)限 定上傳的總文件大小，這里要注意文件上傳到服務(wù)器的物理路徑和虛擬路徑，否則不能成功上傳到指定文件夾內(nèi)。出現(xiàn)問(wèn)題主要是不能上傳大于 4MB 的單個(gè)文件，經(jīng)過(guò)查找資料，找到解決方法就是修改 配置中的 參 maxRequestLength的值 ，如下： ＜ ! 設(shè)置可接受的最大字節(jié)數(shù) ＞ ＜ Runtime maxRequestLength=1048575＞ ＜ /Runtime＞ 能夠成功從服務(wù)器上下載個(gè)人和他人共享的文件，出現(xiàn)的主要問(wèn)題就是 : (1) 左鍵點(diǎn)擊用戶名不能下載，需要 在點(diǎn)擊觸發(fā)事件里邊添加如下一段代碼 方能下載。 Dim fileW As String = (0).Text Dim filepath As String = (fileW) Dim filename As String = (filepath) () = application/octetstream (ContentDisposition, attachment。filename= + filename) () (filepath) (2) 當(dāng)用戶第一次上傳文件的時(shí)候，數(shù)據(jù)庫(kù)文件信息表中沒(méi)有該用戶的文件的信息，導(dǎo)致統(tǒng)計(jì)目前空間大 小出錯(cuò)，問(wèn)題和上邊登錄測(cè)試時(shí)第一次登錄相同，解決辦法也相同。 文件管理和共享測(cè)試 經(jīng)過(guò)測(cè)試，用戶可以成功查看和管理自己空間文件，可以共享任一個(gè)文件，將其顯示在共享區(qū)，如圖 5 所示。 圖 5 用戶文件管理頁(yè)面 這里出現(xiàn)了兩個(gè)問(wèn)題：一是刪除后文件頁(yè)面不能刷新，被刪除文件仍顯示在頁(yè)面上；二是進(jìn)入文件編輯頁(yè)面后修改文件名無(wú)效。其實(shí)是同一個(gè)技術(shù)問(wèn)題，解決方法類似，在初始化頁(yè)面時(shí)加一個(gè)判斷語(yǔ)句如下： If Not () Then () 39。初始化頁(yè)面代碼 End If 加入這句后問(wèn)題就解決了。 后臺(tái)測(cè)試結(jié)果 通過(guò)測(cè)試，后臺(tái)管理員能夠成功完成對(duì)用戶、用戶空間、共享文件等實(shí)行管理。通過(guò)用戶等級(jí)的設(shè)定，成功限定了用戶空間大??；通過(guò)對(duì)積分等級(jí)的設(shè)定，成功實(shí)現(xiàn)了積分制優(yōu)惠收費(fèi)；可以成功查看共享文件內(nèi)容，舉報(bào)情況，對(duì)不良共享文件進(jìn)行鎖定，阻止其在共享區(qū)域的顯示，實(shí)現(xiàn)對(duì)共享文件的管理。 結(jié) 論 該數(shù)據(jù)存儲(chǔ)與交換系統(tǒng)運(yùn)用 和 SQL Server2020 開(kāi)發(fā)，基本功能已經(jīng)實(shí)現(xiàn)，前臺(tái) 主要實(shí)現(xiàn)了：文件的上傳、下載、修改、刪除、查詢和共享，以及用戶的注冊(cè)、登錄、修改；后臺(tái)主要實(shí)現(xiàn)了：管理員對(duì)用戶、用戶等級(jí)、用戶積分等級(jí)和管理員進(jìn)行添加、修改、刪除，對(duì)用戶、共享文件的鎖定、解鎖，通過(guò)用戶等級(jí)分配空間大小，以及收費(fèi)查詢等功能。在該系統(tǒng)設(shè)計(jì)過(guò)程中遇到的最關(guān)鍵的問(wèn)題就是如何分配空間大小，這個(gè)問(wèn)題很容易進(jìn)入誤區(qū)，就是去考慮劃分磁盤空間，其實(shí)只需要在數(shù)據(jù)庫(kù)設(shè)一個(gè)空間大小字段，每次上傳的時(shí)候加以判斷，不允許其總上傳大小超過(guò)該字段的值。該系統(tǒng)能夠正常使用，但是還不能進(jìn)行多個(gè)文件上傳，不能進(jìn)行批量的修改刪除 ，還需要進(jìn)一步完善； 在系統(tǒng)的安全性、數(shù)據(jù)庫(kù)設(shè)計(jì)的合理性、界面的美觀性和搜索顯示功能上存在不足，還需改進(jìn)。 通過(guò)幾個(gè)月的努力，在老師同學(xué)的指點(diǎn)下，反復(fù)經(jīng)歷了無(wú)數(shù)次的嘗試與失敗，資料的查詢、收集與學(xué)習(xí)，最終完成了該系統(tǒng)的設(shè)計(jì)。從中確實(shí)收獲不少，學(xué)到很多實(shí)際的技術(shù)知識(shí)，對(duì)涉及到該系統(tǒng)的知識(shí)有了一定的了解。雖然做的不怎么好，但我經(jīng)過(guò)自己的努力完成了該設(shè)計(jì)，對(duì)我來(lái)說(shuō)也算是個(gè)小小的成功，從中我所經(jīng)歷的成功與失敗相信對(duì)我以后都有很大的影響。 參考文獻(xiàn) [1] 陳文軍 .Visual 數(shù)據(jù)庫(kù)編程 [M].北京 ：清華大學(xué)出版社， 2020。 [2] 高升 . 和 編程手冊(cè) [M].北京：清華大學(xué)出版社， 2020。 [3] 陳語(yǔ)林 .Visual 程序設(shè)計(jì)教程 [M].北京：中國(guó)水利水電出版社， 2020。 [4] 何明國(guó) .Visual 數(shù)據(jù)庫(kù)編程 [M].北京：中國(guó)水利水電出版社， 2020。 [5] 方睿，刁仁宏，吳四九 .網(wǎng)絡(luò)數(shù)據(jù)庫(kù)原理及應(yīng)用 [M].四川：四川大學(xué)出版社， 2020。 [6] 王松 .Visual 數(shù)據(jù)庫(kù)開(kāi)發(fā)實(shí)例精粹 [M].北京：電子工業(yè)出 版社， 2020。 [7] 吉根林 . 程序設(shè)計(jì)教程 [M].北京：電子工業(yè)出版社， 2020。 致 謝 本文是在杜小丹老師的熱情關(guān)心和指導(dǎo)下完成的，他嚴(yán)謹(jǐn)?shù)闹螌W(xué)作風(fēng) 和豐富的知識(shí) 使我受益匪淺， 在存儲(chǔ)技術(shù)、網(wǎng)絡(luò)編程、數(shù)據(jù)庫(kù)設(shè)計(jì)規(guī)劃等方面得到了極大幫助， 對(duì)順利完成本課題起到了極大的作用。在此向他表示我最衷心的感謝！ 在論文完成過(guò)程中， 在數(shù)據(jù)存儲(chǔ)流程分析設(shè)計(jì)方面， 本人還得到了秦智老師和同班何坤賢、黃澤角等幾位同學(xué)的熱心幫助，本人向他們表示深深的謝意！ 最后向在百忙之中評(píng)審本文的各位專家、老師表示衷心的 感謝！ 作者簡(jiǎn)介： 姓 名：陳 登 建 性別：男 出生年月： 1984 年 8月 民族：漢 Email: 聲 明 本論文的工作是 2020 年 2 月至 2020 年 7 月在成都信息工程學(xué)院網(wǎng)絡(luò)工程系 完成的。文中除了特別加以標(biāo)注地方外，不包含他人已經(jīng)發(fā)表或撰寫(xiě)過(guò)的研究成果，也不包含為獲得成都信息工程學(xué)院或其他教學(xué)機(jī)構(gòu)的學(xué)位或證書(shū) 而使用過(guò)的材料。除非另有說(shuō)明，本文的工作是原始性工作。 關(guān)于學(xué)位論文使用權(quán)和研究成果知識(shí)產(chǎn)權(quán)的說(shuō)明： 本人完全了解成都信息工程學(xué)院有關(guān)保管使用學(xué)位論文的規(guī)定，其中包括： （ 1）學(xué)校有權(quán)保管并向有關(guān)部門遞交學(xué)位論文的原件與復(fù)印件。 （ 2）學(xué)校可以采用影印、縮印或其他復(fù)制方式保存學(xué)位論文。 （ 3）學(xué)?？梢詫W(xué)術(shù)交流為目的復(fù)制、贈(zèng)送和交換學(xué)位論文。 （ 4）學(xué)?？稍试S學(xué)位論文被查閱或借閱。 （ 5）學(xué)?？梢怨紝W(xué)位論文的全部或部分內(nèi)容（保密學(xué)位論文在解密后遵守此規(guī)定）。 除非另有科研合同和其他法律文書(shū)的制約，本論文的科 研成果屬于成都信息工程學(xué)院。 特此聲明！ 作者簽名： 2020 年 月 日 Are you hungry now? No, I am tired and lazy now。 if I pursue you I will not catch you, and if I catch