ArcGIS網络分析最短路径分析源代码(VB6.0).doc

ArcGIS网络分析最短路径分析源代码(VB6.0) ??1??2?Copyright?1995-2005?ESRI??3??4?All?rights?reserved?under?the?copyright?laws?of?the?United?States.??5??6?You?may?freely?redistribute?and?use?this?sample?code,?with?or?without?modification.??7??8?Disclaimer:?THE?SAMPLE?CODE?IS?PROVIDED?AS?IS?AND?ANY?EXPRESS?OR?IMPLIED??9?WARRANTIES,?INCLUDING?THE?IMPLIED?WARRANTIES?OF?MERCHANTABILITY?AND?FITNESS?10?FOR?A?PARTICULAR?PURPOSE?ARE?DISCLAIMED.?IN?NO?EVENT?SHALL?ESRI?OR?11?CONTRIBUTORS?BE?LIABLE?FOR?ANY?DIRECT,?INDIRECT,?INCIDENTAL,?SPECIAL,?EXEMPLARY,?12?OR?CONSEQUENTIAL?DAMAGES?(INCLUDING,?BUT?NOT?LIMITED?TO,?PROCUREMENT?OF?13?SUBSTITUTE?GOODS?OR?SERVICES;?LOSS?OF?USE,?DATA,?OR?PROFITS;?OR?BUSINESS?14?INTERRUPTION)?SUSTAINED?BY?YOU?OR?A?THIRD?PARTY,?HOWEVER?CAUSED?AND?ON?ANY?15?THEORY?OF?LIABILITY,?WHETHER?IN?CONTRACT,?STRICT?LIABILITY,?OR?TORT?ARISING?IN?ANY?16?WAY?OUT?OF?THE?USE?OF?THIS?SAMPLE?CODE,?EVEN?IF?ADVISED?OF?THE?POSSIBILITY?OF?17?SUCH?DAMAGE.?18?19?For?additional?information?contact:?Environmental?Systems?Research?Institute,?Inc.?20?21?Attn:?Contracts?Dept.?22?23?380?New?York?Street?24?25?Redlands,?California,?U.S.A.?92373?26?27?Email:?contracts@?28?29Option?Explicit?30?31?vb?version?of?the?PathFinder?object?32?33?本地变量?34Private?m_ipGeometricNetwork?As?esriGeoDatabase.IGeometricNetwork?35Private?m_ipMap?As?esriCarto.IMap?36Private?m_ipPoints?As?esriGeometry.IPointCollection?37Private?m_ipPointToEID?As?esriNetworkAnalysis.IPointToEID?38?返回结果变量??39Private?m_dblPathCost?As?Double?40Private?m_ipEnumNetEID_Junctions?As?esriGeoDatabase.IEnumNetEID?41Private?m_ipEnumNetEID_Edges?As?esriGeoDatabase.IEnumNetEID?42Private?m_ipPolyline?As?esriGeometry.IPolyline?43?44?45?Optionally?set?the?Map?(e.g.?the?current?map?in?ArcMap),?46?otherwise?a?default?map?will?be?made?(for?IPointToEID).?47?48Public?Property?Set?Map(Map?As?esriCarto.IMap)?49??Set?m_ipMap?=?Map?50End?Property?51?52Public?Property?Get?Map()?As?esriCarto.IMap?53??Set?Map?=?m_i