用VB制作軟件安裝程序

在此筆者介紹一個(gè)最簡(jiǎn)單的安裝方法,就是用VB自帶的打包程序進(jìn)行打包,雖然比較普通,不過內(nèi)部卻有不少竅門,相信這一點(diǎn)知道的人可能不多吧?。。ㄕ?qǐng)大家一定看到最后,好戲在后頭)好了,不廢話了,開始進(jìn)入正題。
?、龠\(yùn)行打包向?qū)В缦聢D所示:
?、邳c(diǎn)擊“瀏覽”按鈕,選擇要打包的工程。然后單擊“打包”按鈕(在此只介紹打包,其他的功能不做介紹)。進(jìn)入下一個(gè)頁面,如下圖所示:
③選擇要打包的類型,普通的EXE工程選擇“標(biāo)準(zhǔn)安裝包”就可以了,控件之類的看使用的地點(diǎn),如果是在網(wǎng)頁中使用,請(qǐng)選擇“Internet軟件包”,然后點(diǎn)擊“下一步”按鈕。如下圖所示:
④選擇包文件存放的位置(這一點(diǎn)不用多說了吧),如下圖所示:
?、菹?qū)ё詣?dòng)找出了工程中應(yīng)用的控件、DLL等文件,你需要自己到工程中檢查一下,看看所包含的文件是否全,第三方控件所帶的文件一定要帶上,否則麻煩多多~~~,然后點(diǎn)擊下一步,如下圖所示:
⑥選擇打包的文件類型,根據(jù)需要,如果你發(fā)布是用光盤,則選擇單個(gè)的壓縮文件,如果發(fā)布是用軟盤之類的,則選擇多個(gè)壓縮文件。(當(dāng)然,這不是絕對(duì)的,用光盤你也可以選擇多個(gè)壓縮文件,不過可能沒有人這么干~~~)。然后單擊“下一步”。如下圖所示:
?、叽_定安裝程序的標(biāo)題,就是在安裝背景上顯示的文字。然后單擊“下一步”,如下圖所示:
⑧在這里你可以設(shè)置在“開始菜單”中顯示哪些項(xiàng)目,比如你可以加卸載程序項(xiàng),可以選擇“新建項(xiàng)”按鈕,然后在“目標(biāo)”欄中輸入$(WinPath)\st6unst.exe -n "$(AppPath)\ST6UNST.LOG",包括雙引號(hào)。在“開始”項(xiàng)目中選擇“$(WinPath)”,不包括雙引號(hào)。然后點(diǎn)擊確定,如下圖所示:
?、嵩诖四憧梢愿奈募A的安裝位置,然后點(diǎn)擊“下一步”,如下圖所示:
⑩在此你可以將文件設(shè)置為共享(即文件可以被多個(gè)程序使用)。到此為止安裝制作完成。
安裝完之后會(huì)生成三個(gè)文件和一個(gè)文件夾,如下圖所示:
SERTUP.LST 安裝信息文件
.CAB文件包是數(shù)據(jù)文件,安裝的文件全部在包里。
Setup.exe是安裝的主文件。
Support是壓縮包中所包含的所有文件。如下圖所示:
這個(gè)文件夾里有一個(gè)比較重要的文件就是“執(zhí)照套打.BAT”這個(gè)批處理文件(不同的工程,文件名會(huì)不一樣),當(dāng)你的工程改動(dòng)之后,你可以將工程重新編譯一下,然后將執(zhí)行文件拷貝到此SUPPORT目錄下,執(zhí)行這個(gè)批處理文件,就可以重新打包,而不需要每次改動(dòng)都運(yùn)行打包向?qū)Я恕_€有一個(gè)比較重要的文件就是SETUP1.EXE這個(gè)文件,他是安裝的主文件,安裝時(shí)我們看到的界面就是這個(gè)文件運(yùn)行產(chǎn)生的。他是用VB寫的,源程序在VB的安裝目錄下:“C:\Program Files\Microsoft Visual Studio\VB98\Wizards\PDWizard\Setup1\SETUP1.VBP”,你可以用VB直接來編輯此工程(VB的安裝界面太丑了,所以你可以自己改動(dòng),改的怎么樣就要看你自己的能力了~~~),如果在安裝之后想在桌面上加上程序的快捷方式,可以編譯此工程,打開“frmSetup1”窗口,在其代碼的第463行的位置上加如下代碼:
Dim sProgramsPath As String
Dim sDesktopPath As String
sProgramsPath = GetSpecialFolder(sfidPROGRAMS)
sDesktopPath = GetSpecialFolder(sfidDESKTOP)
sProgramsPath = sProgramsPath & "\" & gstrAppName & "\" & gstrAppName & ".lnk"
sDesktopPath = sDesktopPath & "\" & gstrAppName & ".lnk"
FileCopy sProgramsPath, sDesktopPath
下面對(duì)向?qū)傻腟ERTUP.LST(安裝信息文件)進(jìn)行一下介紹,如下圖所示:
這是文件的第一個(gè)區(qū)的內(nèi)容,SetupTitle設(shè)置的是解壓窗口的標(biāo)題,SetupText設(shè)置的是解壓窗口的內(nèi)容。改動(dòng)之后,如下圖所示:
接下來介紹一下SERTUP.LST文件Setup區(qū)的作用,如下圖所示:
改動(dòng)Color為不同的值,可以改變安裝窗口的背景色(默認(rèn)為藍(lán)色,看都看膩了)。改為16之后為綠色(當(dāng)然還有其他的顏色,你可以自己慢慢試~~~),效果如下圖所示(這是我改動(dòng)之后的VB自帶的安裝程序的安裝界面,大家覺得怎么樣,是不是不比其他的一些安裝軟件的界面遜色):
好了,安裝程序就介紹到這了,當(dāng)然了,VB的安裝程序完全是VB自己做的,到底怎么改以及改動(dòng)的漂亮與否,就要看你自己的水平與美術(shù)功底了,反正安裝程序的源碼都給你了,你想怎么做都行~~~~~
相關(guān)文章
- 百度云怎么擴(kuò)展容量?百度云雖然很好用,但是免費(fèi)的空間真的是太小了,該怎么提升百度云的空間容量呢?下面分享三種提升云盤容量的方法,需要的朋友可以參考下2015-09-15
百度網(wǎng)盤無法訪問鏈接此鏈接分享內(nèi)容無法訪問破解教程
此鏈接分享內(nèi)容因種種原因無法訪問,百度云輔助工具就可以輕松破解被屏蔽的鏈接,直接解析下載地址,下面為大家介紹下2014-12-26360云盤怎么用?360云盤使用方法圖解[附360云盤下載]
最近360在開展“免費(fèi)贈(zèng)送1T網(wǎng)絡(luò)硬盤”的活動(dòng),只需要依次安裝360云盤PC客戶端和手機(jī)客戶端就可以免費(fèi)獲得永久的1T網(wǎng)絡(luò)硬盤空間2013-08-23360云盤網(wǎng)頁版打不開怎么辦?360云盤網(wǎng)頁版無法打開解決方法
360云盤網(wǎng)頁版打不開怎么辦?接下來小編就為大家介紹360云盤網(wǎng)頁版無法打開解決方法,感興趣的朋友可以看一下2014-05-28BitTorrent Sync是什么 BitTorrent Sync安裝與使用的圖文方法步驟
BitTorrent Sync 是一款免費(fèi)的文件同步軟件!它不需第三方服務(wù)器即可讓多臺(tái)電腦之間直接互相同步和共享文件,而且全程AES加密2014-07-22editplus設(shè)置自動(dòng)換行方法 editplus自動(dòng)換行設(shè)置步驟
editplus自動(dòng)換行設(shè)置教程大家想知道嗎?下文將會(huì)告訴大家editplus設(shè)置自動(dòng)換行的操作方法,很多編程人員在使用editplus編輯工具,設(shè)置自動(dòng)換行能夠方面操作,下面就來看看2014-05-14- 木水曰批量文件重命名替換指定內(nèi)容、替換指定位置、替換擴(kuò)展名、前后綴設(shè)置、全局配置2014-11-04
多級(jí)子目錄批量重命名即成批逐級(jí)更名多級(jí)文件夾
對(duì)于成批逐級(jí)更名多級(jí)文件夾如何才能實(shí)現(xiàn),如何在多級(jí)子目錄成批重命名,下面有個(gè)實(shí)例可以為大家詳細(xì)介紹下多級(jí)子目錄批量重命名的具體實(shí)現(xiàn),需要的朋友可以看看2014-11-11- Ae怎么自定義圖層?ae制作視頻的時(shí)候會(huì)出現(xiàn)很多圖層,為了能知道哪個(gè)圖層有什么功能,一般情況我們都會(huì)以功能來命名,下面我們我們來看看Ae圖層重命名的教程,需要的朋友可2016-04-12
- XYplorer軟件不僅有文件管理功能,還可以對(duì)文件或者文件夾進(jìn)行批量重命名,本文小編就為大家具體的介紹XYplorer如何批量重命名2016-11-18