arcEngine classic code(2)
摘要：
1 新建shp文件 Public Sub CreatShapeFile(ByVal sFilePath As String, ByVal sFileName As String) '创建shapefile层文件 On Error GoTo Errhandle: Dim pWorkspaceFactory As IWorkspaceFactory Dim pFeatureWo... 阅读全文
posted @ 2008-05-11 16:35 风过 无痕 阅读(458) 评论(0) 推荐(0) 编辑
