Comments on: Visual Studio: How to build only the StartUp project http://www.gorancic.com/blog/net/visual-studio-how-to-build-only-the-startup-project Gorancic.com Blog Wed, 04 Jan 2012 12:40:18 +0000 hourly 1 http://wordpress.org/?v=3.3.1 By: Jeremy http://www.gorancic.com/blog/net/visual-studio-how-to-build-only-the-startup-project/comment-page-1#comment-101 Jeremy Thu, 14 May 2009 16:48:34 +0000 http://www.gorancic.com/blog/?p=44#comment-101 I was looking for something exactly like this. I found that it wouldn't necessarily build the correct Solution Platform though (e.g. x86, x64). So I hacked together a Macro that should work for the current configuration. Warning: I know nothing about Visual Basic/Macros but this is certified Works For Me: Imports System Imports EnvDTE Imports EnvDTE80 Imports EnvDTE90 Imports System.Diagnostics Public Module BuildStartupProject Sub BuildStartupProject() Dim sb2 As EnvDTE80.SolutionBuild2 = CType(DTE.Solution.SolutionBuild, EnvDTE80.SolutionBuild2) Dim config2 = CType(sb2.ActiveConfiguration, EnvDTE80.SolutionConfiguration2) Dim configName = String.Format("{0}|{1}", config2.Name, config2.PlatformName) DTE.Solution.SolutionBuild.BuildProject(configName, DTE.Solution.SolutionBuild.StartupProjects(0), False) End Sub End Module I was looking for something exactly like this. I found that it wouldn’t necessarily build the correct Solution Platform though (e.g. x86, x64). So I hacked together a Macro that should work for the current configuration. Warning: I know nothing about Visual Basic/Macros but this is certified Works For Me:

Imports System
Imports EnvDTE
Imports EnvDTE80
Imports EnvDTE90
Imports System.Diagnostics

Public Module BuildStartupProject
Sub BuildStartupProject()
Dim sb2 As EnvDTE80.SolutionBuild2 = CType(DTE.Solution.SolutionBuild, EnvDTE80.SolutionBuild2)
Dim config2 = CType(sb2.ActiveConfiguration, EnvDTE80.SolutionConfiguration2)
Dim configName = String.Format(“{0}|{1}”, config2.Name, config2.PlatformName)
DTE.Solution.SolutionBuild.BuildProject(configName, DTE.Solution.SolutionBuild.StartupProjects(0), False)
End Sub
End Module

]]>