给vs安装项目添加卸载快捷方式

我的编译器是vs2010

1.新建项目(控制台应用程序,NET版本同你的主程序相同)

2.右击项目》属性》应用程序》应用程序类型》更改为windows窗体应用程序（这么做的目的是为了在运行项目程序时不弹出cmd窗口）

3.修改main函数 如下面所示：

VB.NET

Imports System.Text.RegularExpressions

Module Module1

    Sub Main(args() As String)
        Try
            If args.Length = 2 AndAlso args(0) = "-uninstalled" Then
                '{5E705D88-92D1-4C0C-ADEF-836F41429E7A}
                If Regex.IsMatch(args(1), "^\{[0-9a-fA-F]{8}\-[0-9a-fA-F]{4}\-[0-9a-fA-F]{4}\-[0-9a-fA-F]{4}\-[0-9a-fA-F]{12}\}$", RegexOptions.IgnoreCase) Then
                    Using Process.Start(System.Environment.SystemDirectory & "\msiexec.exe", "/x """ & args(1) & """")

                    End Using
                End If
            End If
        Catch ex As Exception
        End Try
        Environment.Exit(0)
    End Sub

End Module

C#

using Microsoft.VisualBasic;
using System;
using System.Collections;
using System.Collections.Generic;
using System.Data;
using System.Diagnostics;
using System.Text.RegularExpressions;

static class Module1
{

	public static void Main(string[] args)
	{
		try {
			if (args.Length == 2 && args[0] == "-uninstalled") {
				//{5E705D88-92D1-4C0C-ADEF-836F41429E7A}
				if (Regex.IsMatch(args[1], "^\\{[0-9a-fA-F]{8}\\-[0-9a-fA-F]{4}\\-[0-9a-fA-F]{4}\\-[0-9a-fA-F]{4}\\-[0-9a-fA-F]{12}\\}$", RegexOptions.IgnoreCase)) {
					using (Process.Start(System.Environment.SystemDirectory + "\\msiexec.exe", "/x \"" + args[1] + "\"")) {

					}
				}
			}
		} catch (Exception ex) {
		}
		Environment.Exit(0);
	}

}

4.生成项目（ 假设生成的项目文件为Uninstalled.exe）

5.在你的vs安装项目中》文件系统？应用程序文件夹》添加文件》添加Uninstalled.exe , 如下图所示

6.右击Uninstalled.exe 》 创建快捷方式》右击新建的快捷方式》属性》将Arguments值更改为 "-uninstalled" "[ProductCode]" ,其他内容自己设置

如果你还想在程序菜单添加卸载的快捷方式，如上创建快捷方式，指向Uninstalled.exe

7.重新生成vs安装项目，安装试试吧。