如何把这个代码修改成可以获取图片经纬度高程的

永不言弃

请教一下大神们，这个代码可以获取图片的长宽，我现在想获取其他的信息，比如经纬度，需要怎么改写，谢谢

1. (setq @IMAGEPATH "C:\\Users\\Administrator\\Desktop\\A.JPG")
   
2.   (setq Imageobj (vlax-get-or-create-object "WIA.ImageFile"))
   
3.   (vlax-invoke-method Imageobj 'LoadFile @imagepath)
   
4.   (mapcar '(lambda (x) (vlax-get-property Imageobj x))
   
5.       (list            'Width
   
6.         'Height
   
7.            )
   
8.   )

(setq @IMAGEPATH "C:\\Users\\Administrator\\Desktop\\A.JPG")<br />   (setq Imageobj (vlax-get-or-create-object "WIA.ImageFile"))<br />   (vlax-invoke-method Imageobj 'LoadFile @imagepath)<br />   (mapcar '(lambda (x) (vlax-get-property Imageobj x))<br />       (list            'Width<br />         'Height<br />            )<br />   )