Sub LoadBP()
   Dim iFile As System.IO.File
   Dim iRead As System.IO.StreamReader
   Dim bps As Breakpoints
   Dim Line As String

   If (False) Then
        bps = DTE.Debugger.Breakpoints
        If (bps.Count() > 0) Then
            DTE.ExecuteCommand("Debug.ClearAllBreakpoints")
        End If
   End If


   iRead = iFile.OpenText("C:\Documents and Settings\david.elins\My Documents\Data\Notes\bp.txt")
   While iRead.Peek <> -1
        Line = iRead.ReadLine()
        DTE.Debugger.Breakpoints.Add(Line)
   End While

   iRead.Close()
End Sub
End Module
































































































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