vb.net做安裝包，安裝后自動運行程序

1 新建安裝部署項目

創(chuàng)新互聯(lián)建站是網(wǎng)站建設(shè)技術(shù)企業(yè)，為成都企業(yè)提供專業(yè)的網(wǎng)站設(shè)計制作、成都網(wǎng)站制作，網(wǎng)站設(shè)計，網(wǎng)站制作，網(wǎng)站改版等技術(shù)服務。擁有十余年豐富建站經(jīng)驗和眾多成功案例，為您定制適合企業(yè)的網(wǎng)站。十余年品質(zhì)，值得信賴！

打開VS2005，點擊新建項目，選擇：其他項目類型-安裝與部署-安裝向?qū)?安裝項目)，然后點擊確定。

2 安裝向?qū)?/p>

關(guān)閉后打開安裝向?qū)?，點擊下一步，或者直接點擊完成。

3 開始制作

安裝向?qū)瓿珊蠹纯蛇M入項目文件夾：

雙擊"應用程序文件夾"在右邊的空白處右擊，選擇添加-文件，將你的做的應用程序的可執(zhí)行文件和相應的類庫和組件添加進來。然后右擊你的文件，創(chuàng)建快捷方式，然后把快捷方式分別復制或剪切到左邊的"用戶的'程序'菜單"和"用戶桌面"中。這樣安裝程序安裝完成后會在 "開始-所有程序"和"桌面"上生成程序的快捷方式。也可以直接在"用戶的'程序'菜單"和"用戶桌面"相應目錄下新建快捷方式，然后定位到你的文件。

然后右擊左邊的"應用程序文件夾"打開屬性對話框：將屬性中的"DefaultLocation"的路徑中的"[Manufacturer]"去掉，不然的話做好的安裝程序默認安裝目錄會是"C:\Program Files\你的用戶名\安裝解決方案名稱"；

然后打開解決方案管理器，右擊你的解決方案名稱，選擇屬性：打開的屬性頁中，選擇"系統(tǒng)必備"， 在打開的系統(tǒng)必備頁中，在"指定系統(tǒng)必備安裝組件的位置"中選中如下選擇項：從與我的應用程序相同的位置下載系統(tǒng)必備組件。選上以后，在生成的安裝文件包中包含.NetFramework組件 。好了，這樣就完成99%了，然后點擊"生成-生成解決方案"，生成成功!

我以前參考過的，希望對你有幫助。

安裝完成后自動啟動程序

1.新建一個空的項目InstallCompenent,步驟為:解決方案-右鍵添加-新建項目-選擇"空項目"-輸入名稱"InstallCompenent"-確定,完成項目的添加.

2.在InstallCompenent項目中右鍵-添加-新建項-選擇安裝程序類-輸入名稱"Installer",完成installer類的添加.

修改代碼為:

/// summary

/// 功能是做安裝項目主項目輸出

/// 實現(xiàn)安裝過程中的一些操作

/// 如:安裝完成后啟動項目

/// /summary

[RunInstaller(true)]

public partial class Installer : Installer

{

/// summary

/// 應用程序入口

/// /summary

public static void Main()

{

}

/// summary

/// 構(gòu)造函數(shù)

/// /summary

public ECSuitsInstaller()

{

InitializeComponent();

}

/// summary

/// 重寫安裝完成后函數(shù)

/// 實現(xiàn)安裝完成后自動啟動已安裝的程序

/// /summary

/// param name="savedState"/param

protected override void OnAfterInstall(IDictionary savedState)

{

base.OnAfterInstall(savedState);

Assembly asm = Assembly.GetExecutingAssembly();

string path = asm.Location.Remove(asm.Location.LastIndexOf("\\")) + "\\";

System.Diagnostics.Process.Start(path + "\\ECSuits.exe");

}

/// summary

/// 重寫安裝過程方法

/// /summary

/// param name="stateSaver"/param

public override void Install(IDictionary stateSaver)

{

base.Install(stateSaver);

}

/// summary

/// 重寫安裝之前方法

/// /summary

/// param name="savedState"/param

protected override void OnBeforeInstall(IDictionary savedState)

{

base.OnBeforeInstall(savedState);

}

/// summary

/// 重寫卸載方法

/// /summary

/// param name="savedState"/param

public override void Uninstall(IDictionary savedState)

{

base.Uninstall(savedState);

}

/// summary

/// 重寫回滾方法

/// /summary

/// param name="savedState"/param

public override void Rollback(IDictionary savedState)

{

base.Rollback(savedState);

}

}

3.在安裝項目中右鍵-添加項目輸出-選擇"項目"-InstallCompenent.

完成主輸出項目的添加.

4.打開自定義操作編輯器,在安裝-右鍵-添加自定義操作-選擇"應用程序文件夾"-選擇"主輸出來自InstallCompenent",完成添加.

VB.NET怎么安裝

VB.NET安裝部署一).創(chuàng)建部署項目

1. 在“文件”菜單上指向“添加項目”，然后選擇“新建項目”。

2. 在“添加新項目”對話框中，選擇“項目類型”窗格中的“安裝和部署項目”，然后選擇“模板”窗格中的“安裝項目”。在“名稱”框中鍵入 setup1。

3. 單擊“確定”關(guān)閉對話框。

4. 項目被添加到解決方案資源管理器中，并且文件系統(tǒng)編輯器打開。

5. 在“屬性”窗口中，選擇 ProductName 屬性，并鍵入 信息管理系統(tǒng) 。

VB.NET安裝部署二).將 主程序 項目的輸出添加到部署項目中

1. 在“文件系統(tǒng)編輯器”中，選擇“應用程序文件夾”。在“操作”菜單上，指向“添加”，然后選擇“項目輸出”。

2. 在“添加項目輸出組”對話框中，選擇“項目”下拉列表中的“你的程序”。

3. 單擊“確定”關(guān)閉對話框。

4. 從列表中選擇“主輸出”和“內(nèi)容文件”組，然后單擊“確定”。

VB.NET安裝部署三).創(chuàng)建安裝程序類

1. 在“文件”菜單上指向“新建”，然后選擇“項目”。

2. 在“新建項目”對話框中，選擇“項目類型”窗格中的“Visual Basic 項目”，然后選擇“模板”窗格中的“類庫”。在“名稱”框中鍵入 installDB。

3. 單擊“打開”關(guān)閉對話框。

4. 從“項目”菜單中選擇“添加新項”。

5. 在“添加新項”對話框中選擇“安裝程序類”。在“名稱”框中鍵入 installDB。

6. 單擊“確定”關(guān)閉對話框。

7. 詳細代碼附后。

VB.NET安裝部署四).創(chuàng)建自定義安裝對話框

1. 在解決方案資源管理器中選擇“setup1”項目。在“視圖”菜單上指向“編輯器”，然后選擇“用戶界面”。

2. 在用戶界面編輯器中，選擇“安裝”下的“啟動”節(jié)點。在“操作”菜單上，選擇“添加對話框”。

3. 在“添加對話框”對話框中，選擇“許可協(xié)議”對話框，然后單擊“確定”關(guān)閉對話框。

4. 在“添加對話框”對話框中，選擇“文本框 (A)”對話框，然后單擊“確定”關(guān)閉對話框。

5. 在“操作”菜單上，選擇“上移”。重復此步驟，直到“文本框 (A)”對話框位于“安裝文件夾”節(jié)點之上。

6. 在“屬性”窗口中，選擇 BannerText 屬性并鍵入：安裝數(shù)據(jù)庫.

7. 選擇 BodyText 屬性并鍵入：安裝程序?qū)⒃谀繕藱C器上安裝數(shù)據(jù)庫

8. 選擇 Edit1Label 屬性并鍵入：數(shù)據(jù)庫名稱:

9. 選擇 Edit1Property 屬性并鍵入 CUSTOMTEXTA1

10. 選擇 Edit1Value 屬性并鍵入：dbservers

11. 選擇 Edit2Label 屬性并鍵入：服務器名:

12. 選擇 Edit2Property 屬性并鍵入 CUSTOMTEXTA2

13. 選擇 Edit2Value 屬性并鍵入：(local)

14. 選擇 Edit3Label 屬性并鍵入：用戶名:

15. 選擇 Edit3Value 屬性并鍵入：sa

16. 選擇 Edit3Property 屬性并鍵入 CUSTOMTEXTA3

17. 選擇 Edit4Label 屬性并鍵入：密碼:

18. 選擇 Edit4Property 屬性并鍵入 CUSTOMTEXTA4

19. 選擇 Edit2Visible、Edit3Visible 和 Edit4Visible 屬性，并將它們設(shè)置為 true

VB.NET安裝部署五).創(chuàng)建自定義操作

1. 在解決方案資源管理器中選擇“setup1”項目。在“視圖”菜單上指向“編輯器”，然后選擇“自定義操作”。

2. 在自定義操作編輯器中選擇“安裝”節(jié)點。在“操作”菜單上，選擇“添加自定義操作”。

3. 在“選擇項目中的項”對話框中，雙擊“應用程序文件夾”。

4. 選擇“主輸出來自 installDB（活動）”項，然后單擊“確定”關(guān)閉對話框。

5. 在“屬性”窗口中，選擇 CustomActionData 屬性并鍵入“/dbname=[CUSTOMTEXTA1] /server=[CUSTOMTEXTA2] /user=[CUSTOMTEXTA3] /pwd=[CUSTOMTEXTA4] /targetdir="[TARGETDIR]/"”。

附:/targetdir="[TARGETDIR]/"是安裝后的目標路徑，為了在installDB類中獲得安裝后的路徑，我們設(shè)置此參數(shù)。

VB.NET安裝部署六).添加文件

1. 將SQL Server備份成文件DB.dat添加到“setup1”項目(在企業(yè)管理器中右擊數(shù)據(jù)庫-所有工作-備份數(shù)據(jù)庫,備份成一個文件，取名為DB.dat)

2. 將安裝文件LisenceFile.rtf添加到“setup1”項目

3. 在用戶界面編輯器中，選擇許可協(xié)議，設(shè)置LisenceFile屬性為LisenceFile.rtf文件

4.一般會自動將依賴項添加到“檢測到的依賴項”，如果沒有，那么我們要手動將其加入步驟5）

Crystal_Managed2003.msm

（如果有水晶報表）

dotnetfxredist_x86.msm

（.net一定是必須的）

... （如果有引用其他的dll）

5.如果使用了水晶報表，手動加入要包含的文件：項目--添加--合并模塊（添加你的程序文件） (包括dotNetFramework和MDAC27)，位于：C:/Program Files/Common Files/Merge Modules/ 下，*為必要的

具體功能如下：

（托管組件 MSM 處理所有托管組件的分發(fā)，其中包括 Windows 窗體查看器、Web 窗體查看器和所有 Crystal Decisions 命名空間）

* Crystal_Managed2003.msm

Crystal_Managed2003_chs.msm

（對于使報表運行所需的所有其他文件，由數(shù)據(jù)庫訪問 MSM 處理其分發(fā)。其中包括數(shù)據(jù)庫、導出和圖表驅(qū)動程序。）

* Crystal_Database_access2003.msm

Crystal_Database_access2003_chs.msm

（KeyCode MSM 處理 Crystal Decisions 密鑰號碼的安裝,注意是添加合并模塊，否則沒有“MergeMouduleProperties”屬性）

* Crystal_regwiz2003.msm

（如果報表文件使用了 ADO.NET 的 dataset 數(shù)據(jù)集對象，那么 VC_User_CRT71_RTL_X86_---.msm 和 VC_User_STL71_RTL_X86_---.msm 模塊也必須包含在安裝工程中。而且這兩個模塊的文件安裝屬性的"Module Retargetable Folder"項必須修改成為系統(tǒng)目錄）

VC_User_CRT71_RTL_X86_---.msm VC_User_STL71_RTL_X86_---.msm

(很多人經(jīng)常出現(xiàn)查詢錯誤，不妨加上這個)

6.打開解決方案--右鍵點擊Crystal_regwiz2003.msm的屬性，在“MergeMouduleProperties”里的“License Key”填入：AAP5GKS0000GDE100DS（這個是你生成Crystal Report是用到的注冊號的密碼?。?/p>

VB.NET安裝部署七).打包時加入卸載功能：

方法一:

1.在打包項目中添加文件msiexec.exe(一般可在c:/windows/system32/下找到)

2.在文件系統(tǒng)視圖中選擇應用程序文件夾,在msiexec.exe上按右鍵,選擇創(chuàng)建快捷方式,重命名快捷方式為"卸載".

3.更改此快捷方式的Arguments 為"/x {產(chǎn)品id}",產(chǎn)品id的值為打包項目的ProductCode屬性值.

方法二:(推薦)

1.先生成安裝包，記下ProductCode(選擇解決方案資源管理器根目錄如setup1,再查看屬性標簽,不是右鍵中的屬性),下面要用到

2.用VS.net建立一個新的控制臺程序uninst.exe文件

'power by: landlordh

'for 2000,xp,2003

Module uninstall

Sub Main()

Dim myProcess As Process =

New Process

If System.Environment.OSVersion.

ToString.IndexOf("NT 5") Then

myProcess.Start("msiexec", "/X

{2B65D4A9-C146-4808-AB4B-321F

B0779559}") '改為自己的ProductCode

End If

myProcess.Close()

End Sub

End Module

3.將控制臺程序BIN目錄的exe文件加入到打包程序文件中,在程序組創(chuàng)建uninst.exe的快捷方式

VB.NET安裝部署八).打包時加入.net環(huán)境和MDAC功能：

把MS的PluginInstaller.msi插件裝上后,用vb.net的自帶的打包工具打包,就會自動把.net framework環(huán)境打進去,再下面的步驟進行設(shè)置,就可以把MDAC也打包.使用 Setup 項目安裝 MDAC

1.確保 Visual Studio .NET 框架引導程序插件已安裝。

2.在 Solution Explorer 中選擇 Setup 項目。從 View 菜單指向 Editor，并選擇 Launch Conditions（啟動條件）。

3.選擇 Requirements on Target Machine（搜索目標計算機） 節(jié)點。從 Action 菜單，選擇 Add Registry Launch Condition（添加注冊表搜索）。

4.選擇 Search for RegistryEntry1 節(jié)點。在 Properties 窗口中，選擇 RegKey 屬性，并鍵入 Software/Microsoft/DataAccess。

5.選擇 Root 屬性，并選擇 vsdrrHKLM。

6.選擇 Value 屬性，并鍵入 FullInstallVer。

7.選擇 Property 屬性，并鍵入 MDACSEARCH。

8.在 Launch Conditions Editor（啟動條件） 中，添加Condition1 節(jié)點。選擇 Condition1 節(jié)點，在 Properties 窗口中，選擇 Condition 屬性，并選擇 MDACSEARCH="2.6"。

9.在 Solution Explorer 中選擇 Setup 項目。在 Project 菜單上，選擇 Properties。

10.將 Bootstrapper 屬性設(shè)置為 Windows Installer Bootstrapper（Windows 安裝引導程序）。

vb.net怎樣打包？

打包的具體操作步驟：

1）新建“安裝和部署項目”-- “安裝向?qū)А?/p>

2）選擇菜單中 項目-- 添加-- 文件（這里選“創(chuàng)建用于windows應用程序.exe你的數(shù)據(jù)庫文件”）-- 打開

3）一般會自動將依賴項添加到“檢測到的依賴項”，如果沒有，那么我們要手動將其加入4）

Crystal_Managed2003.msm （如果有水晶報表）

dotnetfxredist_x86.msm （.net一定是必須的）

... （如果有引用其他的dll）

4）手動加入要包含的文件：項目-- 添加-- 合并模塊（添加你的程序文件） (包括dotNetFramework和MDAC27)

位于：C:\Program Files\Common Files\Merge Modules\ 下

具體功能如下：

（托管組件 MSM 處理所有托管組件的分發(fā)，其中包括 Windows 窗體查看器、Web 窗體查看器和所有 Crystal Decisions 命名空間）

* Crystal_Managed2003.msm、

Crystal_Managed2003_chs.msm、

（對于使報表運行所需的所有其他文件，由數(shù)據(jù)庫訪問 MSM 處理其分發(fā)。其中包括數(shù)據(jù)庫、導出和圖表驅(qū)動程序。）

* Crystal_Database_access2003.msm、

Crystal_Database_access2003_chs.msm、

（KeyCode MSM 處理 Crystal Decisions 密鑰號碼的安裝,注意是添加合并模塊，否則沒有“MergeMouduleProperties”屬性）

* Crystal_regwiz2003.msm、

（是vc的運行庫，估計是Crystal Report或涉及到的某些程序是用vc寫的，所以需要它?。?/p>

VC_User_CRT71_RTL_X86_---.msm、

VC_User_STL71_RTL_X86_---.msm、

5）打開解決方案-- 右鍵點擊Crystal_regwiz2003.msm的屬性，在“MergeMouduleProperties”里的“License Key”填入：AAP5GKS0000GDE100DS（這個是你生成Crystal Report是用到的注冊號的密碼！）

6）生成解決方案（或直接按Ctrl+Shift+B）

至此整個分發(fā)程序已經(jīng)做好，再把剛才做的那個安裝程序雙擊一下……

-----------------------------------------------------------------------

打包時加入卸載功能：

方法一:

1.在打包項目中添加文件msiexec.exe(一般可在c:\windows\system32\下找到)

2.在文件系統(tǒng)視圖中選擇應用程序文件夾,在msiexec.exe上按右鍵,選擇創(chuàng)建快捷方式,重命名快捷方式為 "卸載 ".

3.更改此快捷方式的Arguments 為 "/x {產(chǎn)品id} ",產(chǎn)品id的值為打包項目的ProductCode屬性值.

方法二:(推薦)

1.先生成安裝包，記下ProductCode,下面要用到

2.用VS.net建立一個新的控制臺程序uninst.exe文件

'power by: landlordh

'for 2000,xp,2003

Module uninstall

Sub Main()

Dim myProcess As Process = New Process

If System.Environment.OSVersion.ToString.IndexOf( "NT 5 ") Then

myProcess.Start( "msiexec ", "/X{2B65D4A9-C146-4808-AB4B-321FB0779559} ") '改為自己的ProductCode

End If

myProcess.Close()

End Sub

End Module

3.將控制臺程序BIN目錄的exe文件加入到打包程序文件中,在程序組創(chuàng)建uninst.exe的快捷方式

如果裝個ms的控件的話，則直接把framework和msac打在包里。

vs2013/vb.net2013。。制作安裝包。。十分感謝

VB:

1、先打開你的項目，即你編寫的程序。

2、文件 - 添加 -新建項目

3、在“已安裝模版”中選擇“其他項目類型” - 安裝和部署 - (這里面隨便選一個) - 右側(cè)欄里選擇安裝項目、安裝向?qū)裁吹亩夹?。然后確定。

4、看到setup1沒，設(shè)置好他的屬性，左側(cè)目標計算機上的文件系統(tǒng)，就是指你即將要將程序安裝到的電腦，你可以添加一些文件在這里，它將來可以直接被安裝到目標電腦中，當然你也可以什么都不加，一般只是在桌面上加個快捷方式。

5、右鍵setup1，點擊生成，然后就到你源程序所在文件夾里：Setup1\Setup1\Debug中去找安裝包吧。

6、把安裝包發(fā)到其它電腦，直接安裝就行了。注意一下，安裝程序需要考慮目標的系統(tǒng)環(huán)境和你自己的是否一樣。

VB.net 制作安裝包的問題，支持覆蓋安裝

這個是覆蓋不了的，你必須要將原來安裝的程序卸載掉，就像我以前安裝SQL 2000的時候，只要第一次出錯，第二次安裝就安裝不上，只有去注冊表里面將你所安裝的原來的程序卸載掉。

分享文章：vb.net安裝包制作,vbs安裝包
當前鏈接：http://chinadenli.net/article16/hegidg.html

成都網(wǎng)站建設(shè)公司_創(chuàng)新互聯(lián)，為您提供品牌網(wǎng)站設(shè)計、外貿(mào)建站、企業(yè)網(wǎng)站制作、域名注冊、自適應網(wǎng)站、動態(tài)網(wǎng)站

廣告

聲明：本網(wǎng)站發(fā)布的內(nèi)容（圖片、視頻和文字）以用戶投稿、用戶轉(zhuǎn)載內(nèi)容為主，如果涉及侵權(quán)請盡快告知，我們將會在第一時間刪除。文章觀點不代表本網(wǎng)站立場，如需處理請聯(lián)系客服。電話：028-86922220；郵箱：631063699@qq.com。內(nèi)容未經(jīng)允許不得轉(zhuǎn)載，或轉(zhuǎn)載時需注明來源： 創(chuàng)新互聯(lián)