FATAL ERROR: Unhandled Access Violation Readin 0x0008 Exception at 25944c7ah

[Anonymous]

Okay... shot in the dark, but I'll try. 

I'm running my Cad Extractor and it crashes on this procedure always on a certain drawing. 

But I don't think it has anything to do with the procedure, but I could be wrong. 

Any ideas anyone? 

 Private Shared Function DetectLineNumberPattern(ByVal s_AcadText As String) As SFR_LineNumber_Pattern
                'Debug.Print("Running: GetLineNumberPattern")

                'Catch Exceptions 
                If s_AcadText.Length = 0 Or String.IsNullOrEmpty(s_AcadText) Then
                    'Debug.Print("Caught LineNumber Null Exception")
                    Return SFR_LineNumber_Pattern.Pattern00_Other
                    Exit Function
                End If

   

                '----------------------------------------<START PATTERN MATCHING>----------------------------------------------'

                'Debug.Print("Checking Patterns")

                '<<PATERN 1>>
                If Regex.IsMatch(s_AcadText, _
                                 "(^[A-Za-z]{1,4}\d{1,6}-{1}[A-Za-z]{1,6}\d{0,3}[A-Za-z]{0,5}-{1}\d{1}\s{1}\d{1,2}/{1}\d{1,2}\x22)|" & _
                                 "(^[A-Za-z]{1,4}\d{1,6}-{1}[A-Za-z]{1,6}\d{0,3}[A-Za-z]{0,5}-{1}\s{0,2}\d{1}/{0,1}\d{0,1}\x22)|" & _
                                 "(^[A-Za-z]{1,4}\d{1,6}-{1}\d{3}\35{1}[A-Za-z]{0,5}-{1}\d{1,2}\x22)|" & _
                                 "(^[A-Za-z]{1,4}\d{1,6}-{1}\d{3}\35{1}[A-Za-z]{0,5}-{1}\d{1,2}\s{1}\d{1,2}/{1}\d{1,2}\x22)|" & _
                                 "(^[A-Za-z]{1,4}\d{1,6}-{1}[A-Za-z]{1,6}-\d{0,3}\d{1,2}\x22)") Then

                    'Debug.Print("Checked matches Pattern 1")
                    Return SFR_LineNumber_Pattern.Pattern01_Com_Num_Spec_Size_Ins

                    '<<PATTERN 2>>           
                ElseIf Regex.IsMatch(s_AcadText, "^([A-Za-z]{1,4}-{1}\d{1,6}-{1}[A-Za-z]{1,4}\d{0,3}[A-Za-z]{0,2}-{1}\d{1,2}\x22)|" & _
                                     "^([A-Za-z]{1,4}-{1}\d{1,6}-{1}[A-Za-z]{1,4}\d{0,3}[A-Za-z]{0,2}-{1}\s{0,1}\d{1,2}\s{0,2}/{1}\d{1,2}\x22)") Then

                    'Debug.Print("Checked matches Pattern 2")
                    Return SFR_LineNumber_Pattern.Pattern02_Com_Dash_Num_Spec_Size

                    '<<PATTERN 3>>                
                ElseIf Regex.IsMatch(s_AcadText, "^([A-Za-z]{1,4}-{1}\d{1,6}-{1}\d{1,2}\x22-{1}[A-Za-z]{1,4}\d{0,3}[A-Za-z]{0,2})|" & _
                                     "^([A-Za-z]{1,4}-{1}\d{1,6}-{1}\d{1,2}\s{1}\d{1,2}/{1}\d{1,2}\x22-{1}[A-Za-z]{1,4}\d{0,3}[A-Za-z]{0,2})") Then

                    'Debug.Print("Checked matches Pattern 3")
                    Return SFR_LineNumber_Pattern.Pattern03_Com_Dash_Num_Size_Spec_Ins

.... etc   End If 

[StephenPreston]

Which line does it crash on?

[chiefbraincloud]

My only thought is that you have much more patience than I have with setting up regular expressions 😉

[Anonymous]

Lol! Thanks cheifbraincloud ha ha ...
Yah I'll keep hacking away at it. 🙂
Let you know what I find out.