这个是很久以前就在用的，今天突然发觉家里的机器上居然没装。一下忘了怎么弄，搞了半天才搞好。特此记录背忘。
实现效果：在文件夹上右键，选择“Open as Visual Studio Website”，VS自动打开并加载此文件夹为一个Website项目
步骤：
1。在VS2005中选择 Toos/Macros/Macros IDE
2。选中MyMacros项目，并添加一个一个module，命名为“Website”
3。代码
5。将以下内容存成“OpenWebsite.reg”并运行
实现效果：在文件夹上右键，选择“Open as Visual Studio Website”，VS自动打开并加载此文件夹为一个Website项目
步骤：
1。在VS2005中选择 Toos/Macros/Macros IDE
2。选中MyMacros项目，并添加一个一个module，命名为“Website”
3。代码
Public Module Website
Sub OpenWebsite(Optional ByVal path As String = "")
If (String.Compare(path, String.Empty) = 0) Then
MsgBox("Must supply a folder path to the OpenWebsite macro", MsgBoxStyle.OkOnly)
Else
Dim webPkg As VsWebSite.VSWebPackage
webPkg = DTE.GetObject("WebPackage")
webPkg.OpenWebSite(path, VsWebSite.OpenWebsiteOptions.OpenWebsiteOption_None, False)
End If
End Sub
End Module
4。在References中添加“VsWebSite.Interop.dll”Sub OpenWebsite(Optional ByVal path As String = "")
If (String.Compare(path, String.Empty) = 0) Then
MsgBox("Must supply a folder path to the OpenWebsite macro", MsgBoxStyle.OkOnly)
Else
Dim webPkg As VsWebSite.VSWebPackage
webPkg = DTE.GetObject("WebPackage")
webPkg.OpenWebSite(path, VsWebSite.OpenWebsiteOptions.OpenWebsiteOption_None, False)
End If
End Sub
End Module
5。将以下内容存成“OpenWebsite.reg”并运行
Windows Registry Editor Version 5.00
[HKEY_LOCAL_MACHINE\SOFTWARE\Classes\Folder\shell\OpenVSWeb]
@="Open as Visual Studio Website"
[HKEY_LOCAL_MACHINE\SOFTWARE\Classes\Folder\shell\OpenVSWeb\command]
@="devenv.exe /command \\\"Macros.MyMacros.Website.OpenWebsite %1\\\""