Konu Araçları | Konu Seçenekleri | Gösterim Stili
Tarih
17/06/2010 16:28
Konu Sahibi
kadirdursun
Yorumlar
60
Okunma
17445
Konuyu Oyla:
  • Derecelendirme: 0/5 - 0 oy
  • 1
  • 2
  • 3
  • 4
  • 5
kadirdursun

kadirdursun

Aktif Üye*
2014
Ka.... DU....
 39
 104
 1.291
 12/01/2009
86
 İstanbul
 İnşaat Mühendisi
 Ofis 2010 32 Bit
 19/01/2018,15:01
Çözüldü 
sayınsledgeab;
yeni konu açıyorum.
aşağıdkai linkte konunun öncesi var.
https://accesstr.net/konu-web-uzerinden-...0#pid47510


Private Sub WebBrowser1_ProgressChange(ByVal Progress As Long, ByVal ProgressMax As Long)
On Error Resume Next
Dim IE As Object
Set IE = Me.WebBrowser1
Me.Metin29 = IE.Document.All.tags("table").Item(9).Rows(0).Cells(1).innerText
Me.Metin31 = IE.Document.All.tags("table").Item(9).Rows(1).Cells(1).innerText
Me.Metin33 = IE.Document.All.tags("table").Item(9).Rows(2).Cells(1).innerText
Me.Metin35 = IE.Document.All.tags("table").Item(9).Rows(3).Cells(1).innerText
WebBrowser3.Navigate2 "http://iski.gov.tr/Web/Swfs/BarajDolu_Oran.swf"
Call ResimGetir
End Sub


buradaki Item rows cells kısımlarını nerden buldunuz. kaynak kodlara bakıyorum bulamadım.



Hayat bu
ölsende yaşamaya mecbursun!
UNUTMA!!!



(hafta sonu mesai olmadığından mesajlardaki çözümleri ancak hafta içi uygulayabiliyorum)

ozanakkaya

ozanakkaya

Kurucu
1
Oz.... Ak....
 39
 482
 12.139
 29/01/2008
 Denizli
 Memur
 Ofis 2010 32 Bit
Çözüldü 
web sayfasından veri çektiğimiz alan aşağıdaki resimdeki gibi tablo şeklinde.
Resme row ve cell değerlerini gösterdim.
item değerini bulmak için sayfa kaynağını aç, yukarıdan aşağıya kaçıncı "<table" olduğunu say.

[Resim: ekranalntsjb.jpg]


"Boş Örnek Eklerim, Yapıp Verirler" demeyin, örneğinizi hazırlayın.
Komplike kod talebiniz var ise İletişim bağlantısından bize ulaşın. 
Cebelleşmezsen Öğrenemezsin. 

...........
kadirdursun

kadirdursun

Aktif Üye*
2014
Ka.... DU....
 39
 104
 1.291
 12/01/2009
86
 İstanbul
 İnşaat Mühendisi
 Ofis 2010 32 Bit
 19/01/2018,15:01
Çözüldü 
ilgilendiğiniz için teşekkür ederim. uğraşıp sonuç almaya çalışacağım.


Hayat bu
ölsende yaşamaya mecbursun!
UNUTMA!!!



(hafta sonu mesai olmadığından mesajlardaki çözümleri ancak hafta içi uygulayabiliyorum)

ozanakkaya

ozanakkaya

Kurucu
1
Oz.... Ak....
 39
 482
 12.139
 29/01/2008
 Denizli
 Memur
 Ofis 2010 32 Bit
Çözüldü 
ben hala sizin iyiliğiniz için ısrar etmek zorundayım. Uzak duruun Img-grin



"Boş Örnek Eklerim, Yapıp Verirler" demeyin, örneğinizi hazırlayın.
Komplike kod talebiniz var ise İletişim bağlantısından bize ulaşın. 
Cebelleşmezsen Öğrenemezsin. 

...........
kadirdursun

kadirdursun

Aktif Üye*
2014
Ka.... DU....
 39
 104
 1.291
 12/01/2009
86
 İstanbul
 İnşaat Mühendisi
 Ofis 2010 32 Bit
 19/01/2018,15:01
Çözüldü 
uzak durun deme sebebiniz nedir?


Hayat bu
ölsende yaşamaya mecbursun!
UNUTMA!!!



(hafta sonu mesai olmadığından mesajlardaki çözümleri ancak hafta içi uygulayabiliyorum)

jon206

jon206

Üye
226
 43
 2
 17
 04/11/2008
0
 Ankara
 
 Ofis 2007
 25/05/2018,16:20
Çözüldü 
sayın sledgeab;

peki kendi formumuzdan bir checbox ve komut tuşuyla sogulatmayı nasıl yaparız, internetten otomatik bir şekilde..


diyelim bu sayfatan,
http://www.diyanet.gov.tr/turkish/dy/Diy...ri-80.aspx


örnek dosya ektedir..
tek satırlık bilgi alsakta olur
öğrenmemiz açısından..

teşekkür ederim bilgi ve paylaşımınızdan dolayı..



...........

Konuyu Okuyanlar: 1 Ziyaretçi

Konu ile Alakalı Benzer Konular
Konular Yazar Yorumlar Okunma Son Yorum
Çözüldü Docmd.openreport 'a Veri Alma yakanic 3 133 03/08/2019, 16:40
Son Yorum: berduş
Çözüldü Belli Bir Karaktere Kadar Parça Alma hbal09 6 266 24/05/2019, 14:02
Son Yorum: berduş
Çözüldü Ara Toplam Alma edacan19 14 429 09/05/2019, 14:37
Son Yorum: edacan19
Çözüldü Web Sitesinden Tabloya Veri Alma aliyuzen 3 410 10/04/2019, 15:43
Son Yorum: ozanakkaya
Çözüldü Kapalı Olan Access Tablosundan Bilgi Çekme cozum 3 262 11/03/2019, 13:58
Son Yorum: cozum

Türkçe Çeviri: MCTR, Yazılım: MyBB, © 2002-2019 MyBB Group.