Visual Basic & XML

Pozdrav svima ovoga sajta.
Skoro sam poceo da se bavim programiranjem(jos sam pocetnik) ali odnedavno sam cuo za ovaj sajt i mogu vam reci da pruza mnogo informacija i pomoci u vezi programiranja.
Moje pitanje koje je vezano za zadatak glasi:
Da li mogu da napravim aplikaciju u VB 6 koja bi citala dva ili vise xml fajla i spajala ih u jedan.
Npr.aplikacija bi sadrzala:jedan txtbox ili labelu(u njemu bi bila ispisana putanja do foldera datog xml fajla),
zatim tri dugmeta:npr dugme"izaberi folder" koji bi se pritiskom na njega otvorio brows for folder prozor(za odabir datog foldera),a ta putanja bi bila naravno ispisana u txtbox-u,dugme "spoji xml fajlove" bi bila glava programa,ono bi spajala sve odabrane xml fajlove u jedan i snimala ga u neki direktorijum na disku i na kraju dugme "zatvori" za kraj i izlazenje iz programa.
Eto otprilike bi tako izgledala aplikacija,ako slucajno neko zna bolje resenje kako bi aplikacija izgledala neka mi javi jer svaka pomoc je dobro dosla u bilo kom formatu,hvala unapred,pozdrav!!!

Odgovor na pitanje da li je moguce je: naravno da jeste.
Pocni realizovati to rjesenje pa gdje zapnes, objasni ovdje detaljno problem (najbolje bi bilo uz prikacen kod) i mozes ocekivati pomoc.
Pozdrav

Potpis

SELECT * FROM หน่วยงานหลัก WHERE ยสันติ LIKE 'โดย%'

Hvala ti druze na pomoci ali ne znam kako da pocnem,totalna mi je blokada nastala.
Da li mozda mozes da mi ukazes na neki sajt sa slicnim primerom,kako bi bilo sta poceo,pozdrav!!!

A sta je problem reci: ne znam.
Pocinje se tako sto se otvori novi projekat, a linkove ces naci tako sto u naseg druga google -a otkucas "read xml vb6" ;)

Potpis

SELECT * FROM หน่วยงานหลัก WHERE ยสันติ LIKE 'โดย%'

Pozdrav druze!
Evo ovako krenuo sam sa jednostavnim primerom ali mi javlja gresku



Greska je u tome sto varijabla Path nije definisana (variable not defined).
Pre toga sam podesio referencu na projektu (Microsoft XML v6.0) i napravio svoj xml fajl i ubacio ga u folder gde sam snimo projekat.Sta da radim zemljace?

Moras definisati varijablu Path.

Stavi ispod form_load:

Potpis

SELECT * FROM หน่วยงานหลัก WHERE ยสันติ LIKE 'โดย%'

Hvala druze sad sam video gde je greska(kakav sam ja glupan),hvala ziv bio!!!

e sad je na red doslo ono najteze...
uradio sam program koji spaja dva xml fajla u jedan ali ne na onaj nacin koji ja zelim...

Private Sub Form_Load()
Dim dom1
Dim Path

Set dom1 = New DOMDocument30
dom1.async = False
dom1.resolveExternals = False
Path = App.Path + "\moje.xml"
dom1.Load Path

Dim dom2 As New DOMDocument30
dom2.async = False
dom2.resolveExternals = False
Path = App.Path + "\test.xml"
dom2.Load Path

txtFile.Text = dom1.xml + dom2.xml

End Sub

resenje ovog programcica npr. izgleda odprilike ovako:
<?xml version="1.0"?>
<Faktura>
<Ustanova>
<VerFor>10.03</VerFor>
<SifUst>17669656</SifUst>
<PIB>104888494</PIB>
<VrsFak>10</VrsFak>
<PerOd>01.01.2009</PerOd>
<PerDo>31.01.2009</PerDo>
<DatFak>31.01.2009</DatFak>
<Izn>2242,88</Izn>
<StrBrDok></StrBrDok>
</Ustanova>
<Osiguranik>
<Prez>RAKIĆ</Prez>
<Ime>BRANKO</Ime>
<LBO>27100035313</LBO>
<JMBG>1404981772021</JMBG>
<BZK>10073459116</BZK>
</Osiguranik>
</Faktura>
<?xml version="1.0"?>
<Faktura>
<Ustanova>
<VerFor>10.03</VerFor>
<SifUst>17669656</SifUst>
<PIB>104888494</PIB>
<VrsFak>10</VrsFak>
<PerOd>01.01.2009</PerOd>
<PerDo>31.01.2009</PerDo>
<DatFak>31.01.2009</DatFak>
<Izn>2242,88</Izn>
<StrBrDok></StrBrDok>
</Ustanova>
<Osiguranik>
<Prez>MEKIĆ</Prez>
<Ime>MARKO</Ime>
<LBO>27100046313</LBO>
<JMBG>1406981572022</JMBG>
<BZK>10083459216</BZK>
</Osiguranik>
</Faktura>

Ono sto meni treba je da se xml objedini u jedan,na takav nacin da se samo dodaju novi podaci u tagu Osiguranik(ime,prezime,jmbg...) ali da Ustanova (podaci u njoj) ostane zajednicka za sve posto je ona jedinstvena.
Ne znam da li sam dobro objasnio ali pokusacu ponovo.Ja npr. dobijam vise xml fajlova od neke ustanove,ustanova je ista za sve ali samo se osiguranici menjaju tj njih samo treba da nadovezujem u taj jedinstveni xml fajl.
Ne znam kako to da uradim,svaka pomoc je dobro dosla,hvala unapred,pozdrav!!!