Convert XML Melalui Access Ke Visual Foxpro

naa kali ini saya mencoba memberikan pencerahan hehe bagaimana caranya metadata XML dirubah ke Cursor/tabel DBF(Foxpro) kalau standar penggunaan function di foxpro yaitu xmltocursor klo tidak salah hasilnya cuma 1 tabel aja, dan juga harus XML yg dipake menggunakan struktur yg bisa tertentu dengan tag <DataVFP> jika ini tidak ada maka convert XML akan gagal, pahal tidak semua hasil XML dari Web menggunakan tag seprti itu kecuali .Net masih bisa di terima ama foxpro bagaimana klo struktur XMLnya berbeda terus terdapat beberapa tabel dalam XML itu, pasti susah menggunakan standar xmltocursor tenang saya punya solusi hehe yaitu dengan trik XML > Access(2000/2003) > VFP berikut sample XML, simpelnya copas punya orang hehe xml Kemudian buat database access, misal kasih nama dbxml.mdb, selanjutnya koding foxpro pastinya


LOCAL acAppendData
acAppendData = 2

objAccess = CreateObject("Access.Application")
objAccess.OpenCurrentDatabase("C:\dbxml.mdb")

objAccess.ImportXML("C:\Contoh Xml.xml", acAppendData)

lcconn="Driver={Microsoft Access Driver (*.mdb)};Dbq=C:\dbxml.mdb;Uid='';Pwd=;"

nch=SQLSTRINGCONNECT(lcconn)
SQLEXEC(nch,"select * from peserta","cdata")

select cdata
brow

dan hasilnya xml   xml   Ok selanjutnya bagaimana melihat tabel dalam database access, yaitu mengunakan tabel MsysObjects, naa bagi pengguna access 2010 tabel tersebut terhidden dan hak aksesnya belum di pilih jadi ga bisa di select tabel tersebut bagaimana cara opennya berikut cara mudahnya pertama buka database access > File > Options > muncul kotak dialog access options pilih current database, cari button Navigation options.. dan click maka akan muncul kotak dialog navigation option dan ceklist Show System Obejcts dan OK OK maka secara otomatis akan muncul tabel MsysObject, ups jangan buru buru belum bisa di select, ganti Permissions dulu, cara File > Info liat menunya Users and Permissions ada tanda panah kecil kebawah click deh maka akan muncul submenu pilih User and Group Permissions, naa muncul kotak dialognya pada kotak Object name cari MsysObjects klik dan pada kolom Permission ceklis dah semuanya hehe, apply dan Ok, kembali ke tabels liat deh xml Gimana ngertikan he, OK moga sukses selalu yaa dan sehat lahir batin, selama koding😀

Tinggalkan Balasan

Isikan data di bawah atau klik salah satu ikon untuk log in:

Logo WordPress.com

You are commenting using your WordPress.com account. Logout / Ubah )

Gambar Twitter

You are commenting using your Twitter account. Logout / Ubah )

Foto Facebook

You are commenting using your Facebook account. Logout / Ubah )

Foto Google+

You are commenting using your Google+ account. Logout / Ubah )

Connecting to %s

%d blogger menyukai ini: