私はVS2008を探していますが、私はこのマシンにはありません。
は、VS 2010で、これは私の仕事:
Option Strict Off
Option Explicit Off
Imports System
Imports EnvDTE
Imports EnvDTE80
Imports EnvDTE90
Imports System.Diagnostics
Imports System.Windows.Forms
Imports System.IO
Public Module RecordingModule
Sub DisplayMessage()
Dim solution As Solution = DTE.Solution
Dim files As String
Dim file As ProjectItem
For Each prj As Project In solution.Projects
For Each file In prj.ProjectItems
Dim fi = New FileInfo(file.FileNames(0))
If fi.IsReadOnly = True Then
files = files & Environment.NewLine & fi.FullName
End If
Next
Next
MessageBox.Show(IIf(String.IsNullOrEmpty(files), "No files", files))
End Sub
End Module
私はNeed Visual Studio macro to add banner to all C# files
からのコードの大部分を得ました