系统网络分功能模块的实现.doc

《系统网络分功能模块的实现.doc》由会员上传分享，免费在线阅读，更多相关内容在行业资料-天天文库。

1、1.1系统网络分析功能模块的实现1.1.1最优路径查询的实现本模块是对最短路径的求解,给定的两个点之间找到一个最短路径,下拉框里列出了用于分析的街道名称，供用户来选择起点和终点.下面是最优查询的主程序:try{//取得网络分析服务using(NAServerProxynaServer=NAServerProxy.Create(SERVER_NAME,ROUTE_SERVICE_NAME,null)){if(naServer==null)throw(newSystem.Exception("Couldnotfindthewebs

2、ervice."));//取得网络分析参数string[]naLayers=naServer.GetNALayerNames(esriNAServerLayerType.esriNAServerRouteLayer);NAServerSolverParamssolverParams=naServer.GetSolverParameters(naLayers[0])asNAServerSolverParams;//设置网络分析路径参数NAServerRouteParamsrouteParams=solverParamsasNAS

3、erverRouteParams;……………//对起点和终点地理编码LoadLocations(solverParams);//自定义函数//解决问题NAServerSolverResultssolverResults;solverResults=naServer.Solve(solverParams);//显示结果OutputResults(solverResults);//自定义函数}}路径及明细情况1.1.1设置障碍点的实现在GIS网络分析中,如何寻找避开障碍点而到达目的地最近或最快的道路.如下是核心代码:private

4、voidSolvebarriers(){try{//取得网络分析服务using(NAServerProxynaServer=NAServerProxy.Create(SERVER_NAME,ROUTE_SERVICE_NAME,null)){if(naServer==null)throw(newSystem.Exception("Couldnotfindthewebservice."));//取得网络分析参数string[]naLayers=naServer.GetNALayerNames(esriNAServerLayerT

5、ype.esriNAServerRouteLayer);NAServerSolverParamssolverParams=naServer.GetSolverParameters(naLayers[0])asNAServerSolverParams;//设置网络分析路径参数NAServerRouteParamsrouteParams=solverParamsasNAServerRouteParams;……………LoadLocationsbarriers(solverParams);//与最优路径最大的不同//解决问题-查找路径

6、NAServerSolverResultssolverResults;solverResults=naServer.Solve(solverParams);//显示结果OutputResults(solverResults);}}增加障碍点前的分析结果增加障碍点后分析的结果请与最优路径的结果图对比,便可发现路线不同.1.1.1通达性分析的实现本系统的通达性分析是分析两个地点之间的通达，如果两点之间是通达的那么分析最短路径的时候会返回一系列的路径方向，这个方向是让用户明白怎样走，如果不能够通达，那么就不能返回，或者返回的为空,根

7、据这一思路,设计程序如下:privatevoidSolveArrive(){try{//取得网络分析服务using(NAServerProxynaServer=NAServerProxy.Create(SERVER_NAME,ROUTE_SERVICE_NAME,null)){if(naServer==null)throw(newSystem.Exception("Couldnotfindthewebservice."));//取得网络分析参数string[]naLayers=naServer.GetNALayerNames(

8、esriNAServerLayerType.esriNAServerRouteLayer);NAServerSolverParamssolverParams=naServer.GetSolverParameters(naLayers[0])asNAServerSolverPa