Sub SaveBP()
        Dim oFile As System.IO.File
        Dim oWrite As System.IO.StreamWriter
        Dim bps As Breakpoints
        Dim bp As Breakpoint

        oWrite = oFile.CreateText("C:\Documents and Settings\delins\My Documents\Data\VS\bp.txt")
        bps = DTE.Debugger.Breakpoints
        If (bps.Count() > 0) Then
                For Each bp In bps
                    oWrite.WriteLine(bp.Name)
                Next
        Else
                oWrite.WriteLine("No Breakpoints are set")
        End If

        oWrite.Close()
End Sub

























































































Previous  |  Next ]     [ Up  |  First  |  Last ]     (Article 303 of 485)
 
Comments, flames, broken links?
Please send email to maintainer@intricate-simplicity.com