Проблема с esriGeoprocessing

Question

Есть такой код

 Dim GP As Object
 On Error GoTo ErrorHandler
  Set GP = CreateObject("esriGeoprocessing.GPDispatch.1")
  GP.OverwriteOutput = True
  GP.FeatureClassToFeatureClass_conversion "Database      Connections\Editing.sde\sde.SDE.A\sde.SDE.A", "C:\", "a.shp", "#", "#", "DISABLED", "DISABLED", "#", "#"

ErrorHandler:
 MsgBox GP.GetMessages(), vbOKOnly, "GP error"

программа выполняется, фиче-класс корректно экспортируется из базы в указанное место, но после всего выскакивает окошко "GP error" (т.е. происходит вход в обработчик ошибок ), но в окне не сообщение об ошибке, а насколько могу судить, вывод результатов работы инструмента. Из-за чего такое происходит? Можно ли как-то подавить вывод этих результатов, чтобы выдавались только сообщения об ошибках?

Answer 1

Да тяжела и неказиста жисть простого программиста
А вот так не пробовали?:

Dim GP As Object
On Error GoTo ErrorHandler
Set GP = CreateObject("esriGeoprocessing.GPDispatch.1")
GP.OverwriteOutput = True
GP.FeatureClassToFeatureClass_conversion "Database      Connections\Editing.sde\sde.SDE.A\sde.SDE.A", "C:\", "a.shp", "#", "#", "DISABLED", "DISABLED", "#", "#"

Exit Sub

ErrorHandler:
MsgBox GP.GetMessages(), vbOKOnly, "GP error"

End Sub