getinfosds.pro

来自「浏览MODIS遥感数据的HDF格式数据的IDL程序」· PRO 代码 · 共 15 行

ErrorNo = 0
Catch, ErrorNo
if (ErrorNo ne 0) then begin
	Catch, /CANCEL
	ErrArray = ['Application Error in '+pro_name+ '!', $
	'Error Number: '+strtrim(!error,2), $
	!Err_String]
	a = DIALOG_MESSAGE(ErrArray, /ERROR)
	HDF_SD_ENDACCESS,sds_id
	HDF_SD_END,sd_id
	return
 endif