如何将TAB_MIF转换成SHP.docVIP

通过MapInfo Professional来转，具体操作：Tools/Universal Translator/Universal 可以选上源文件和目标文件夹，可以直接选Tab文件，Mapinfo会自动把图层上的元素转换成arcgis的点、线、面图层。这个比较简单，笔者已经成功。我是参考了一下的介绍： MIF是mapinfo的数据文件,SHP是arcGIS的数据文件, 由MIF格式转成SHP格式,需要注意一点: MI格式文件所在的目录不能太深,否则mapinfo9.5说转换不正确: 具体错误信息为: Unbalanced quotation marks encountered on line 1 of file G:\DOCUME~1\mao\LOCALS~1\Temp\ut_parm.txt -- line was `CFGenerate MIF SHAPE C:\Temp\11\MapInfo交换格式\园分布图\ G:\DOCUME~1\mao\LOCALS~1\Temp\fme72.tmp LOG_STANDARDOUT YES +ID 队界 另外,有的MIF文件,特别的数据量大的线条文件被破坏掉, 不知是什么原因, 如线条文件,出现怪字符,这时需要手工将它们清掉,或采用程序, 后面附了其IDL程序,来读取MIF文件(注意, 只对线条文件pline arc region等,其它未做过多测试),并转换成正确的MIF文件,再准备由mapinfo9.5转; 打开mapinfo9.5,选择工具/通用转换工具/通用转换工具, 英文是Tools/Universal Translator/Universal Translator,弹出如下菜单,source选择mapinfo mid/mif,Destination选择ESRI.就OKIDL程序 pro mif_2_mif?files = DIALOG_PICKFILE(/READ, FILTER = *.mif,/MULTIPLE_FILES,/MUST_EXIST) ?for j=0,n_elements(files)-1 do begin??file=files[j]??v=str_sep(file,.)??nv=n_elements(v)??if nv eq 1 then return??midfile=strjoin(v[0:nv-2],.)+.mid ??fileshp=strjoin(v[0:nv-2],.)+_a.mif??filemid=strjoin(v[0:nv-2],.)+_a.mid ??openr,fp,file,/get_lun??openr,midin,midfile,/get_lun??version=??readf,fp,version??v=str_sep(version, )??if v[1] ne 450 then begin???prom=dialog_message(MIF格式不是450版,title=转换出错)???return??endif??openw,lun,fileshp,/get_lun??openw,mid,filemid,/get_lun??printf,lun,Version 300??str=??str1=??readf,fp,str?;Charset??printf,lun,str??readf,fp,str?;Delimiter??printf,lun,str??for k=0,4 do begin???readf,fp,str???printf,lun,str??endfor?;?printf,lun,strmid(str,1)??;坐标系统CoordSys??readf,fp,str?;Columns??printf,lun,str??v=str_sep(str,string(9b))??ncol=fix(v[1])??for k=0,ncol-1 do begin???readf,fp,str???printf,lun,str??endfor??readf,fp,str?;Data??printf,lun,str??readf,fp,str?;??printf,lun,??ID=0L??sum=0L??err_num=0L??while not eof(fp) do begin???readf,fp,str?;Pline? 186markpline:???u=str_sep(str, )???if n_elements(u) eq 1 then u=str_sep(str,string(9b)) ???in