skyline 简单的Vbscript代码示意

//获得工程文件名称
//获得数据存储路径    
flname() flname()
             dim project
             set project=SGWorld.Project
                 msgbox project.Name    
                 msgbox SGWorld.Application.DataPath        
             end function    

//获得坐标信息的 sub过程
sub Button1_onclick
             dim IWindow
             dim worldinfo
             set IWindow=SGWorld.Window
             set worldinfo=IWindow.CenterPixelToWorld(0)
                    msgbox worldinfo.Position.X            
             end sub