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\david.elins\My Documents\Data\Notes\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 294 of 485)
 
Comments, flames, broken links?
Please send email to maintainer@intricate-simplicity.com