Geoprocess Execute出错原因？Vb+AE9.2

Private Sub Command2_Click()
'//Initialize the Geoprocessor
Dim GP As IGeoProcessor
Set GP = New GeoProcessor
'//Multiple input feature classes
GP.SetEnvironmentValue "workspace", "G:\2008-2-21"
Dim parameters As IVariantArray
Set parameters = New VarArray
'//There are three input feature classes, they are delimited by ;
parameters.Add ("DLJX.shp; XZQJX.shp")
'//But only one output feature class
parameters.Add ("redlands_union.shp")
GP.Execute "Union", parameters, Nothing
End Sub
VB6+AE9.2 上述代码运行出错，如图。
何故？？？
注：问题已经解决。
关键点：
1、指定输出可被覆盖，GP.OverwriteOutput = True
2、运行AE的程序时最好关闭ArcGIS软件，因为文件操作经常会被先访问的软件加锁。
3、AE的程序调试出错时提示极其不友好，可尝试把关键代码在Arcmap中用VBA测试。
4、注意数据类型要求，有些tool只能针对特定类型进行。
[ 本帖最后由 flyingfish 于 2008-2-22 18:36 编辑 ]

附件

2008-2-22 14:28

截屏000.png (6.24 KB)