【正文】 的操作環(huán)境。 本課題的研究方法Windows 系統(tǒng)動態(tài)連接庫提供了豐富的 API，這些函數(shù)可為 VB 應(yīng)用程序所調(diào)用。只要將 DLL 中的函數(shù)按一定的規(guī)則在 VB 中進行聲明，就可以調(diào)用這些API 函數(shù)，實現(xiàn)其中功能，程序編寫簡潔、易懂。文件搜索采用 VB 提供的一些功能，實現(xiàn)對文件和文件夾的處理。2 需求分析 需求調(diào)研通過對非計算機行業(yè)使用計算機的人調(diào)查，了解他們對計算機使用中需要的功能進行分析。了解了用戶需求后，對系統(tǒng)進行開發(fā)和設(shè)計。為不熟悉WINDOWS 系統(tǒng)操作的人員提供一個更方便、快捷的操作環(huán)境。 開發(fā)運行環(huán)境（1） 安裝此系統(tǒng)所需的基本軟、硬件環(huán)境為① Windows 2022/XP② Visual Basic ③ 486DX/66MHz 或更高的處理器④ 32MB 以上內(nèi)存⑤ VGA 顯示器⑥ CD——ROM 驅(qū)動器本程序在 Windows 操作系統(tǒng)下，以中文版 Visual 為前臺開發(fā)工具，其中主要通過調(diào)用 API 函數(shù)來實現(xiàn)各功能。以下對本設(shè)計主要的開發(fā)軟件Visual 做個概述。（2） Visual 概述Visual Basic 提供了開發(fā) Windows 應(yīng)用程序最迅速、最簡潔的方法。它提供了一整套工具，供用戶開發(fā)應(yīng)用程序。 “Visual”指的是開發(fā)圖形用戶界面（GUI）的方法。在圖形用戶界面下，不需要編寫大量的代碼去描述界面元素的外觀和位置，而只要把預(yù)先建立的對象加到屏幕上的適當(dāng)位置，再進行簡單的設(shè)置即可。 “Basic”指的是 BASIC（Beginners AllPurpose Symbol Instruction Code）語言，是一種十分廣泛的計算機語言。Visual Basic 在原有 BASIC 語言的基礎(chǔ)上進一步發(fā)展，至今包含了數(shù)百條語句、函數(shù)及關(guān)鍵詞，其中很多和 Windows GUI 有直接關(guān)系。專業(yè)人員可以用 Visual Basic 實現(xiàn)其他任何 Windows 編程語言的功能，而初學(xué)者只要掌握幾個關(guān)鍵詞就可以建立簡單的應(yīng)用程序。Visual Basic 與以前的版本不同，它是 Visual Studio 家族的一個組件，保留了 Visual Basic 的優(yōu)點，如在開發(fā)環(huán)境上的改進；增加了工作組；在代碼編輯器中提供了控件屬性／方法的自動提示；能編譯生成本機代碼，大大提高程序的執(zhí)行速度等。同時，Visual Basic 在數(shù)據(jù)技術(shù)、Inter 技術(shù)及智能化向?qū)Х矫娑加辛嗽S多新的特性。1．?dāng)?shù)據(jù)訪問的新特性：Visual Basic 在數(shù)據(jù)訪問技術(shù)方面比 Visual Basic 有了很大的增強，首先，它采用了一種新的數(shù)據(jù)訪問技術(shù)ADO(Active Data Object)，使之能更好地訪問本地和遠程的數(shù)據(jù)庫，其次，在數(shù)據(jù)環(huán)境方面，允許程序員可視化地創(chuàng)建和操作 ADO 連接及命令，為程序員操作數(shù)據(jù)源提供了很大的方便。第三，增加了 ADO 控件和集成的可視化數(shù)據(jù)庫工具。2．Inter 功能的增強：Inter 是當(dāng)今發(fā)展的潮流，Visual Basic 在 Inter 方面的在增強使得它已成為當(dāng)前最強有力的開發(fā)工具之一。① IIS 程序設(shè)計：專業(yè)版和企業(yè)版中都有。用 Visual Basic 可直接創(chuàng)建 IIS 應(yīng)用程序，響應(yīng)用戶的要求。② DHTML 的設(shè)計：利用 Visual 程序員可直接通過 Visual Basic 代碼來實現(xiàn)動態(tài)網(wǎng)頁的設(shè)計。③ Inter Explorer 對下載 ActiveX 文檔的支持。3．控件、語言和向?qū)Х矫娴男略鎏匦裕孩?DataGrid、DataList、DataCombo 等新增的數(shù)據(jù)控件，相當(dāng)于 DB 版本的 DB Grid、OLEDBList 和 DBCombo，所不同的是它們都支持新的 ADO 控件。② 可以創(chuàng)建自己的數(shù)據(jù)源和數(shù)據(jù)綁定對象。③ 函數(shù)可以將數(shù)組作為返回值，并且可以為可變大小的數(shù)組賦值。④ 安裝向?qū)?、?shù)據(jù)對象向?qū)?、?shù)據(jù)窗體向?qū)б约皯?yīng)用程序向?qū)?。這些新增的向?qū)Ъ肮δ茉鰪姷南驅(qū)?，可以使開發(fā)人員能設(shè)計出更優(yōu)秀的應(yīng)用程序。4．高度可移植化的代碼：代碼的可移植性是面向?qū)ο缶幊痰囊粋€重要特點。Visual Basic 集成了 Visual Component Manager(VCM,可視化模塊設(shè)計器)。5．創(chuàng)建 ActiveX 控件更加輕松方便：用 Visual Basic 創(chuàng)建 ActiveX控件，其外觀和行為均和用Ｃ語言編寫的控件一樣，可以用在 Visual C++、Visual Basic、Delphi 甚至 Word、Access 中。6．Visual Basic 有兩張光盤的文檔資料，包括 Visual Basic 程序員設(shè)計手冊、全文搜索索引、Visual Basic 文檔（VB Documentation） 、Visual Basic 程序樣例（VB Product Samples）等。（3） Visual Basic 集成開發(fā)圖 VB 開發(fā)環(huán)境圖左面是 VB 的工具箱里面的各種圖標是我們開發(fā)程序時經(jīng)常用到的標準控件。正中間是窗體編輯器，又稱對象窗口。我們程序的界面，大部分是在它上面設(shè)計的。右上方是工程資源管理器，它能讓我們對整個工程進行整體性的管理。右中處的是屬性窗口，陳列著程序中所涉及的各種窗體和控件的屬性。右下方是窗體布局區(qū)，它能夠調(diào)節(jié)程序運行時窗體在屏幕中的位置?？偨Y(jié)：以非計算機行業(yè)的用戶為分析對象，確定該系統(tǒng)開發(fā)的方向，最后確定其應(yīng)該具備的功能，以確定系統(tǒng)的主要模塊，也簡單介紹了該軟件的開發(fā)環(huán)境和運行條件。 軟件設(shè)計（1）功能模塊初步設(shè)計通過對用戶需求調(diào)研并分析，確定系統(tǒng)應(yīng)具備的功能，包括：獲取主機名和 IP 地址，獲取物理地址，顯示本機用戶信息，顯示工作站信息，列舉本機服務(wù)，測試目的地是否可達，文件查找，各功能設(shè)計如下：獲取主機名和 IP 地址：對用戶而言要想輕松地在網(wǎng)絡(luò)中遨游，首先必須對本地主機的網(wǎng)絡(luò)配置信息有清晰的了解，如主機名、IP 地址、所注冊的域等。在網(wǎng)絡(luò)編程中，一般都需要獲取本地主機的主機名和 IP 地址，起碼應(yīng)該將這些信息顯示給用戶，讓其感到程序界面的友好性。獲取物理地址：Windows 下的 TCP/IP 協(xié)議允許計算機通過網(wǎng)絡(luò)與另一臺計算機通過 IP 地址、主機名或 NETBIOS 名稱進行通信。但是，當(dāng)計算機間使用上述三種名稱進行通信時，這些名稱都必須解析為硬件地址，即 MAC 地址。如何獲取計算機上安裝的網(wǎng)卡的物理地址是一個重要問題。顯示本機用戶信息：由于 Windows 設(shè)計已達到了 C2 標準，C2 標準建立在用戶級別的權(quán)限管理基礎(chǔ)上，因此任何 Windows 中與安全性有關(guān)的問題都要先查看用戶賬號的相關(guān)信息，用戶賬號是 Windows 常用的最小的用戶身份標識。任何行為都直接與它的用戶賬號相聯(lián)系。但是，管理整個系統(tǒng)的所有用戶的權(quán)限是一個費時費力的工作，特別是用戶很多的情況下。通過一個簡易的用戶顯示工具，管理員可以很快的知道用戶對某種資源有什么權(quán)限。顯示工作站信息：獲取工作站的配置信息（如工作站的操作平臺信息、操作系統(tǒng)版本信息等）以及工作站上的登陸用戶信息。列舉本機服務(wù)：了解網(wǎng)絡(luò)機器提供的服務(wù)信息非常有用，它可以讓用戶充分了解機器的性能和功用，對服務(wù)進行管理。測試目的地是否可達：隨著網(wǎng)絡(luò)的普及，網(wǎng)絡(luò)資源的豐富給很多用戶帶來很大的便利，獲取網(wǎng)絡(luò)的連接狀態(tài)能更高效的利用網(wǎng)絡(luò)資源。文件查找：查找文件是每個用戶經(jīng)常遇到的事情，因此，一個簡潔、方便的文件搜索工具將受到大家的青睞。（2）模塊的組織結(jié)構(gòu)圖Windows 輔助管理程序設(shè)計與開發(fā)網(wǎng)絡(luò)工具 文件查找顯示主機名和IP地址獲取物理地址顯示用戶信息工作站及用戶信息本機服務(wù)目的地是否可達圖 功能模塊圖3 系統(tǒng)工具設(shè)計與實現(xiàn) 獲取主機名和 IP 地址 功能設(shè)計這個窗體主要用來獲取本地主機名和 IP 地址。獲取本地主機名及 IP 地址通過 WinSock API 編程實現(xiàn)，應(yīng)用程序在使用 WinSock API 之前，必須先成功調(diào)用函數(shù) WSAStartup，對 WinSock DLL 進行初始化，協(xié)商 WinSock DLL 的版本支持，并分配必要的資源，如果在調(diào)用 WinSock 函數(shù)之前，沒有加載 WinSock DLL，則會返回 SOCKET_ERROR 錯誤，錯誤信息是 WSANOTINITIALISED。而應(yīng)用程序結(jié)束時，調(diào)用 WSACleanup 函數(shù)終止對 Winsock DLL 的使用，并釋放資源，以備下一次使用。模塊使用 WSAGetLastError 函數(shù)返回上次發(fā)生的網(wǎng)絡(luò)錯誤。當(dāng)一特定的 Winsock Sockets API 函數(shù)指出已經(jīng)發(fā)生了一個錯誤，則調(diào)用本函數(shù)來獲得相應(yīng)的錯誤代碼。功能實現(xiàn)主要函數(shù)和結(jié)構(gòu)：（1）gethostname 函數(shù)返回本地主機的標準主機名，函數(shù)原型如下：int PASCAL FAR gethostname( char FAR *name int namelen)name：一個指向要存放主機名的緩沖區(qū)指針。namelen：緩沖區(qū)的長度。該函數(shù)把本地主機名存放在由 name 參數(shù)指定的緩沖區(qū)中。返回的主機名是一個以空字符結(jié)尾的字符串。主機名的形式取決于 Windows Sockets 的實現(xiàn)，也就是說，它可以是一個簡單的主機名，也可以是一個域名。如果函數(shù)調(diào)用成功，則返回 0；否則返回 SOCKET_ERROR。應(yīng)用程序可調(diào)用函數(shù)WSAGetLastError 來獲取詳細的錯誤信息。（2）Gethostbyname 函數(shù)根據(jù)主機名稱返回相應(yīng)的信息。函數(shù)原型如下：Struct hostent FAR * gethostbyname( Const char FAR *name)name：一個以空字符結(jié)尾的表示主機名的字符串。函數(shù) gethostbyname 返回一個 HOSTENT 結(jié)構(gòu)的地址，該結(jié)構(gòu)由 Windows 套接字分配。應(yīng)用程序不能修改本結(jié)果或釋放它的某個成員。函數(shù)gethostbyname 不能解析傳遞給它的 IP 地址字符串。也就是說，如果向函數(shù)傳遞一個 IP 地址字符串作為參數(shù)，則函數(shù)認為這是一個未知的主機名參數(shù)。如果要想通過機器的 IP 地址字符串獲取相應(yīng)的主機信息，可以先調(diào)用函數(shù)i_addr，將 IP 地址字符串轉(zhuǎn)換為實際的 IP 地址，然后使用函數(shù)gethostbyaddr 來得到 HOSTENT 結(jié)構(gòu)中的信息。函數(shù) gethostbyname 可以成功解析由函數(shù) gethostname 返回的主機名字符串。如果成功，則函數(shù)返回一個指向 HOSTENT 結(jié)構(gòu)的指針；否則，函數(shù)返回一個 NULL 指針，若調(diào)用函數(shù)WSAGetLastError，還可得到相應(yīng)的錯誤代碼。（3）結(jié)構(gòu) HOSTENT，結(jié)構(gòu)的定義如下：Struct hostent( Char FAR *h_name； Char FAR *FAR *h_aliases； Short h_addrtype； Short h_length； Char FAR *FAR *h_addr_list；)；h_name：主機名的官方名稱。h_aliases：可選擇的別名數(shù)組，該數(shù)組以 NULL 結(jié)尾。h_addrtype：返回的地址的類型。h_length：每個地址的字節(jié)長度。h_addr_lis：一個以 NULL 結(jié)尾的主機地址列表。窗體使用自定義函數(shù) GetIPAddress()實現(xiàn)本地主機 IP 地址的獲取：Private Function GetIPAddress() As String …… sHostName = Trim$(sHostName) lpHost = gethostbyname(sHostN