I've got an interesting situation. We are using MapInfo's Map Marker and I've come across a bad issue with their software. When I pass in an address that it does not have instead of raising an error is throws a MsgBox. (what the?!!!) The reason this is a problem for us is that we are getting a live xml feed or addresses and the application is to be a Windows Service, so no user interaction. When this msgbox appears it log jams the process. So to fix the log jam I have thread the application. This insures that one bad xml file does not stop all the others from processing. However it would be nice to not have instance after instance of this class taking up memory until a user looks at the server (not a good technical solution)
SI created the following code to test if aborting a thread will kill a msgbox inside the called class (TestBox.vb) It does not kill the messagebox. ANY ideas?
Thanks
Dim thrTest As Threading.Thread
Dim objTestBox As New TestBox
thrTest = New Threading.Thread(AddressOf objTestBox.TestMsgbox)
Question
James Rose
Hey gang,
I've got an interesting situation. We are using MapInfo's Map Marker and I've come across a bad issue with their software. When I pass in an address that it does not have instead of raising an error is throws a MsgBox. (what the?!!!) The reason this is a problem for us is that we are getting a live xml feed or addresses and the application is to be a Windows Service, so no user interaction. When this msgbox appears it log jams the process. So to fix the log jam I have thread the application. This insures that one bad xml file does not stop all the others from processing. However it would be nice to not have instance after instance of this class taking up memory until a user looks at the server (not a good technical solution)
SI created the following code to test if aborting a thread will kill a msgbox inside the called class (TestBox.vb) It does not kill the messagebox. ANY ideas?
Thanks
Dim thrTest As Threading.Thread
Dim objTestBox As New TestBox
thrTest = New Threading.Thread(AddressOf objTestBox.TestMsgbox)
With thrTest
.IsBackground = True
.Start()
If .Join(1500) = False Then
.Abort()
objTestBox = Nothing
End If
End With
End With
Link to comment
Share on other sites
5 answers to this question
Recommended Posts