ERROR: SYNTAX occurred at line:480 
Content of line: 
 geobj = .OleObject~New('GoogleEarth.ApplicationGE',"WITHEVENTS",1) 
ERRORTEXT:OLE error