[niekv]

Dear people.

I am newby here not with vb.

I am creating for a flight simulator game a addon.

I want to read only the departure name and the destination name of the xml file.
The file is a .pln file but its structure is like an xml.

Code:

<?xml version="1.0" encoding="UTF-8"?>
<SimBase.Document Type="AceXML" version="1,0">
    <Descr>AceXML Document</Descr>
    <FlightPlan.FlightPlan>
        <Title>CZML to SAWT</Title>
        <FPType>VFR</FPType>
        <CruisingAlt>17500</CruisingAlt>
        <DepartureID>CZML</DepartureID>
        <DepartureLLA>N51° 43' 47.76",W121° 19' 48.31",+003127.00</DepartureLLA>
        <DestinationID>SAWT</DestinationID>
        <DestinationLLA>S51° 36' 39.47",W72° 13' 41.33",+000906.00</DestinationLLA>
        <Descr>CZML, SAWT</Descr>
        <DeparturePosition>32</DeparturePosition>
        <DepartureName>108 Mile</DepartureName>
        <DestinationName>28 De Noviembre</DestinationName>
        <AppVersion>
            <AppVersionMajor>10</AppVersionMajor>
            <AppVersionBuild>60905</AppVersionBuild>
        </AppVersion>
        <ATCWaypoint id="CZML">
            <ATCWaypointType>Airport</ATCWaypointType>
            <WorldPosition>N51° 43' 47.76",W121° 19' 48.31",+003127.00</WorldPosition>
            <ICAO>
                <ICAOIdent>CZML</ICAOIdent>
            </ICAO>
        </ATCWaypoint>
        <ATCWaypoint id="SAWT">
            <ATCWaypointType>Airport</ATCWaypointType>
            <WorldPosition>S51° 36' 39.47",W72° 13' 41.33",+000906.00</WorldPosition>
            <ICAO>
                <ICAOIdent>SAWT</ICAOIdent>
            </ICAO>
        </ATCWaypoint>
    </FlightPlan.FlightPlan>
</SimBase.Document>

thnx for help

[niekv]

Originally Posted by niekv

Dear people.

I am newby here not with vb.

I am creating for a flight simulator game a addon.

I want to read only the departure name and the destination name of the xml file.
The file is a .pln file but its structure is like an xml.

Code:

<?xml version="1.0" encoding="UTF-8"?>
<SimBase.Document Type="AceXML" version="1,0">
    <Descr>AceXML Document</Descr>
    <FlightPlan.FlightPlan>
        <Title>CZML to SAWT</Title>
        <FPType>VFR</FPType>
        <CruisingAlt>17500</CruisingAlt>
        <DepartureID>CZML</DepartureID>
        <DepartureLLA>N51° 43' 47.76",W121° 19' 48.31",+003127.00</DepartureLLA>
        <DestinationID>SAWT</DestinationID>
        <DestinationLLA>S51° 36' 39.47",W72° 13' 41.33",+000906.00</DestinationLLA>
        <Descr>CZML, SAWT</Descr>
        <DeparturePosition>32</DeparturePosition>
        <DepartureName>108 Mile</DepartureName>
        <DestinationName>28 De Noviembre</DestinationName>
        <AppVersion>
            <AppVersionMajor>10</AppVersionMajor>
            <AppVersionBuild>60905</AppVersionBuild>
        </AppVersion>
        <ATCWaypoint id="CZML">
            <ATCWaypointType>Airport</ATCWaypointType>
            <WorldPosition>N51° 43' 47.76",W121° 19' 48.31",+003127.00</WorldPosition>
            <ICAO>
                <ICAOIdent>CZML</ICAOIdent>
            </ICAO>
        </ATCWaypoint>
        <ATCWaypoint id="SAWT">
            <ATCWaypointType>Airport</ATCWaypointType>
            <WorldPosition>S51° 36' 39.47",W72° 13' 41.33",+000906.00</WorldPosition>
            <ICAO>
                <ICAOIdent>SAWT</ICAOIdent>
            </ICAO>
        </ATCWaypoint>
    </FlightPlan.FlightPlan>
</SimBase.Document>

thnx for help

[Resolved]
Working code i found edited.

Code:

            Dim departure, destination, xmlDoc, ElemList

            xmlDoc = CreateObject("Msxml2.DOMDocument")
            xmlDoc.load("" + flight.Value + "")

            ElemList = xmlDoc.getElementsByTagName("DepartureName")
            departure = ElemList.item(0).Text
            Label6.Text = departure

            ElemList = xmlDoc.getElementsByTagName("DestinationName")
            destination = ElemList.item(0).Text
            Label7.Text = destination

[digioz]

Thank you for posting your solution niekv.

Pete