gpt4 book ai didi

asp.net - 是否有宏/扩展将 Visual Studio 中的所有 Web 项目设置为 "Don' t 打开页面”?

转载 作者:行者123 更新时间:2023-12-03 23:11:26 25 4
gpt4 key购买 nike

有时,我正在调试发生在我们的几个后端 Web 服务中的问题,并且我将它们全部设置为启动项目;当我按下 F5 键时,它们都会在我当时设置为默认的任何浏览器中启动新选项卡——能够单击一个按钮并拥有所有 Project > Properties > Web 对我来说很有用> 启动操作 设置设置为“不打开页面”。有人知道可以帮助我的宏或扩展程序吗?

最佳答案

我为您编写了大部分解决方案,但我不确定如何检查项目是否为 ASP.NET 项目。一种方法是检查 Project.ExtenderNames 是否包含字符串“WebApplication”,但我不确定这是最好的解决方案。

Sub ChangeAllWebProjectsStartActionToDontStartWebPage()
Dim project As EnvDTE.Project
If DTE.Solution.IsOpen Then
For Each project In DTE.Solution.Projects
NavProj(project)
Next
End If
End Sub

Sub NavProj(ByVal project As Project)
Dim outputPathProperty As EnvDTE.Property
Dim outputPath As String

If Not (project.ConfigurationManager Is Nothing) Then
' It's a project!
Dim extenderNames As String()
extenderNames = project.ExtenderNames
If (Array.IndexOf(extenderNames, "WebApplication") >= 0) Then
project.Properties.Item("WebApplication.DebugStartAction").Value = 4 ' WebStartAction.NoStartPage
End If
Else
NavProjItems(project.ProjectItems)
End If
End Sub

Sub NavProjItems(ByVal projItems As ProjectItems)
Dim projectItem As EnvDTE.ProjectItem

If Not (projItems Is Nothing) Then
For Each projectItem In projItems
If Not (projectItem.SubProject Is Nothing) Then
' Recurse, can be an Enterprise project in
' Visual Studio .NET 2002/2003 or a solution folder in VS 2005+
NavProj(projectItem.SubProject)
End If
Next
End If
End Sub

这基于定义为的 WebStartAction:

    enum WebStartAction
{
CurrentPage = 0,
SpecificPage = 1,
Program = 2,
URL = 3,
NoStartPage = 4
}

关于asp.net - 是否有宏/扩展将 Visual Studio 中的所有 Web 项目设置为 "Don' t 打开页面”?,我们在Stack Overflow上找到一个类似的问题: https://stackoverflow.com/questions/8275134/

25 4 0
Copyright 2021 - 2024 cfsdn All Rights Reserved 蜀ICP备2022000587号
广告合作:1813099741@qq.com 6ren.com