Skip to main content

AccessTr.neT


Webbrowserda (input Type Disable) Olan Alandan Veri Almak

Webbrowserda (input Type Disable) Olan Alandan Veri Almak

Çözüldü #1
İyi çalışmalar arkadaşlar.
Ekteki örneğimde webbrowserde ki  Html tablodan normalde veri alabiliyorum ancak ; alcacağım alanların bu sefer pasif olduğundan alamıyorum.
Yardımlarınız için Teşekkürler.
.rar site.rar (Dosya Boyutu: 273,24 KB | İndirme Sayısı: 5)
mustinba, 11-01-2010 tarihinden beri AccessTr.neT üyesidir.
Cevapla
#2
Eklediğiniz örnekte veri alımı ile ilgili kod yok. Hangi kod ile veri alıyorsanız örneğinize ekleyiniz.
Cevapla
#3
Private Sub Komut3_Click()
On Error Resume Next
For X = 0 To 10
   
      nesneadi = "dgListem_txtY1_0" & X
      Me.Liste1.AddItem (WebBrowser9.Document.getElementByID(nesneadi).innerText + "test")
    Next X
End Sub
mustinba, 11-01-2010 tarihinden beri AccessTr.neT üyesidir.
Cevapla
#4
Merhaba, koda on error resume next kodu ile başlarsanız hataları göremezsiniz.

additem ile liste kutusuna veri aktaracaksanız liste kutusunun Satır Kaynak Türü "Deger Listesi" olması gerekli.
Birleştirme işleminde + işleci vbada kullanılmaz, 

Web sayfasındaki input etiketinin id değeri "dgListem_txtY1_0", 
Kod:
nesneadi = "dgListem_txtY1_0" & X
kodu çalışmaz, 
Kod:
nesneadi = "dgListem_txtY1_" & X
olmalı ki dgListem_txtY1_0, dgListem_txtY1_1, dgListem_txtY1_2 şeklinde devam ederek veri alsın. 

WebBrowser0.Document.getElementByID(nesneadi).innertext kodunu inputta çalıştıramazsın, kod WebBrowser0.Document.getElementByID(nesneadi).Value şeklinde olmalı.

Kod:
For X = 0 To 10
     
      nesneadi = "dgListem_txtY1_" & X
      Me.Liste1.AddItem (WebBrowser0.Document.getElementByID(nesneadi).Value)
Next X

Cevapla
#5
(03/07/2019, 09:13)ozanakkaya yazdı: Merhaba, koda on error resume next kodu ile başlarsanız hataları göremezsiniz.

additem ile liste kutusuna veri aktaracaksanız liste kutusunun Satır Kaynak Türü "Deger Listesi" olması gerekli.
Birleştirme işleminde + işleci vbada kullanılmaz, 

Web sayfasındaki input etiketinin id değeri "dgListem_txtY1_0", 
nesneadi = "dgListem_txtY1_0" & X kodu çalışmaz, nesneadi = "dgListem_txtY1_" & X olmalı ki dgListem_txtY1_0, dgListem_txtY1_1, dgListem_txtY1_2 şeklinde devam ederek veri alsın. 

WebBrowser0.Document.getElementByID(nesneadi).innertext kodunu inputta çalıştıramazsın, kod WebBrowser0.Document.getElementByID(nesneadi).Value şeklinde olmalı.

Kod:
For X = 0 To 10
     
      nesneadi = "dgListem_txtY1_" & X
      Me.Liste1.AddItem (WebBrowser0.Document.getElementByID(nesneadi).Value)
Next X

Teşekkürler value yapınca oldu.
mustinba, 11-01-2010 tarihinden beri AccessTr.neT üyesidir.
Cevapla

Bir hesap oluşturun veya yorum yapmak için giriş yapın

Yorum yapmak için üye olmanız gerekiyor

ya da
Task