pro dat_to_tif
  envi = ENVI()
  dat_dir = 'F:\2020\raduation\1月\'
  tif_dir = 'F:\2020\raduation\1月\test\'
  file=file_search(dat_dir,'*dat',count = num)    ;dat文件个数存储到变量num中
  for i=0, num-1 do begin                     ;遍历所有dat文件
    raster = envi.OpenRaster(file[i])
    dat_filename = strsplit(file[i], '\' ,/EXTRACT)
    dat_filename = dat_filename[-1]
    dat_filename = strsplit(dat_filename, '.' ,/EXTRACT)
    dat_filename = dat_filename[0]
    tif_filename = dat_filename + '.tif'
    tif_path = tif_dir + tif_filename
    raster.Export, tif_path, 'TIFF'
  endfor                                      ;结束for循环
  print,'Process Over'
end

参考博文：