[VBA] Xml den veri alamıyorum Vba İle nasıl alabilirim
#1
Merhaba arkadaşlar iyi akşamlar daha önce iki defa bu konu ile ilgili girişimde bulundum ancak başarılı olamadım kısaca konuyu özetlemek gerekirse internetten belli aralıklarla xml alıyorum aldığım xml kayıtlardanda access içerisine veri almam gerekiyor.İşin birinci kısmını sayın Taruzun yardımıyla kavradım ancak xml dosyadan verileri access'e almak kısmında çözüm bulamadım araştırmalarım sonucunda benim sorunuma benzeyen bir problem bu adreste buldum ancak ordaki anlatılanları ve örneğide ben uygulayamadım .

Access standart yöntemlerle veri aldığımda oluşan tablolara birbirine bağlantı sağlayacak birincil anahtar olmadığından anlamsız kalıyor verileri birleştiremiyorum. Verilerin anlamlı olabilmesi için poliçeno bilgisinin diğer tablolarada kaydedilmesi gerekiyor veya aynı kayda ait verilere yeni bir anahtar değer atamak gerekiyor.
Ekteki resimde access kendi xml al yönteminde veriler ağaç yapısında gözüküyor ama alındığında tablolar arsında biçbir bağlantı kalmıyor.

İşlem yapmak istediğim örnek xml kaydını ekliyorum yardımcı olabilirmisiniz.



Eklenti Dosyaları
.jpg   1-Access XML al.JPG (Boyut: 35,38 KB / İndirilme: 121)
.rar   POLCEK.rar (Boyut: 1,31 KB / İndirilme: 94)



  Alıntı
Bu mesajı beğenenler:
#2
Size 2 Link Tavsiye Edeyim:

Sayın Berkant'ın Yapmış Olduğu RSS OKUYUCU (Reader) Rss~Xml

İkinci tavsiyem benim hazırladığım HABER TAKİP PROGRAMI İnternetten XML adreslerindeki bilgileri toplar ve size sunar .!

Wubclub İyi GÜNLER..



  Alıntı
Bu mesajı beğenenler:
#3
Sn Furkan_68200 vermiş olduğunuz örneklerle bi bağlantı kuramadım ben zaten aşağıdaki kod ile
verileri alabiliyorum sorun bundan sonra aldığım veriler birbiri le bağlantılı tablolara almam gerek xml içindeki veriler 12 ayrı tabloya bölünüyor tablolar arası bağlantıı kurabileceğim 1.anahtar olmadığındanda veriler kopuk kalıyor.

acAppendData = 2 bu kısım sadece tablo sadece veri tablo veri birlikte olarak ayarlanabiliyor.


Visual Basic
  1. Private Sub TRANSFER_Click()
  2. User = User
  3. Pwd = Pwd
  4. Bastar = CStr(Format(ilktarihkutusu, "yyyymmdd"))
  5. BitTar = CStr(Format(sontarihkutusu, "yyyymmdd"))
  6. trz = "http://srv.hdisigorta.com.tr:1080/" _
  7. & "cgi-bin/POLCEK.pgm?AUser=" & User & "&Pwd=" & Pwd & "&BasTar=" & Bastar & "&BitTar=" & BitTar & ""
  8. ImportXML trz, acAppendData = 2
  9. End Sub






  Alıntı
Bu mesajı beğenenler:
#4
Bu konuda bir fikri olan yokmu aldığım xml verileri ekteki veritabanına ama ilişkili olarak kaydetmem gerek.



Eklenti Dosyaları
.jpg   2-Tablo İlişkileri.JPG (Boyut: 82,68 KB / İndirilme: 101)
.rar   XML-iliski.rar (Boyut: 66,95 KB / İndirilme: 103)



  Alıntı
Bu mesajı beğenenler:
#5
sayın soner dursun ;
dosyanız ektedir.. inceleyiniz..


Eklenti Dosyaları
.rar   xml_den_İligili.(iliskili)_tablolara_kayıt_jon206.rar (Boyut: 45,55 KB / İndirilme: 171)
imza; jon206
www.access-sql.com



  Alıntı
Bu mesajı beğenenler:
#6
Sn jon206 örneğin için teşekürler iki sorun çıktı ortaya birincisi her xml dosyadan yalnızca 1 kayıt
alıyor 2.sorun 1 kayıt için birdençok taksit olmasına rağmen yalnızca ilk kaydı tabloya ekliyor.



  Alıntı
Bu mesajı beğenenler:


Benzer Konular...
Konu: Yazar Cevaplar: Gösterim: Son Mesaj
  [RAPOR] Raporda Açılan Ve Kalıcıları Evet Yapınca Raporu Alamıyorum akinokrizo 3 317 27-10-2025, 18:12
Son Mesaj: akinokrizo
  Access Formu üzerinden Sql Server Tabloya Nasıl Veri Kaydı Yapılır karacahil 4 666 15-02-2024, 12:10
Son Mesaj: halily
  [VBA] Klasörden birden fazla xml,xls,xlsx nasıl toplu veri alabilirim sonerdursun 1 1.600 19-08-2017, 01:12
Son Mesaj: dsezgin
  [VBA] Posta kutusundaki xml dosyayı accesse nasıl alabilirim sonerdursun 9 3.887 17-08-2017, 17:13
Son Mesaj: sonerdursun
  [FORM] Access "Where Condition" a veri girmek sınırlı bunu nasıl arttırabilirim? Ssleyers 6 3.227 04-01-2017, 22:03
Son Mesaj: dsezgin
  [FORM] Excelden accesse sutunları eşleştirerek nasıl veri alırız. sefersanli 12 4.749 02-01-2017, 18:04
Son Mesaj: sefersanli
  [VBA] excel vba da access veri tabanını nasıl kullanabilirim. sefersanli 2 1.967 11-05-2015, 13:02
Son Mesaj: onur_can
  [RAPOR] RAPOR KISMINI OLUŞTURAMADIM VE ÇIKTI ALAMIYORUM Yuzarsif Self İron 3 1.687 08-01-2015, 14:34
Son Mesaj: dsezgin

Foruma Git:


Bu konuyu görüntüleyen kullanıcı(lar):