web browser döngüsü
Tarih
18/10/2011 16:55
Konu Sahibi
muradoglu
Yorumlar
2
Okunma
1009
Konuyu Oyla:
  • Derecelendirme: 0/5 - 0 oy
  • 5
  • 4
  • 3
  • 2
  • 1

Derecelendirme: 0/5 - 0 oy



muradoglu
Aktif Üye
Kullanici Avatari
Aktif Üye
53
28/04/2010
0
Belirtilmemiş
Belirtilmemiş
30/01/2013,11:09
Çözüldü 
başlık garip olabilir ama yapmaya çalıştığım tam olarak şu

bir kurumda görevliyim kurumumuz öğrencilerinin ders notlarını tek seferde almak için böyle bir çalışma gereksinimi duydum.

bu yüzden uygulamanın içindeki bilgiler tablosunda kaç tane kayıt varise o kadar kayıt adedince web browseri (veri yollama) adlı formdaki şekle göre çoğaltmasını istiyorum. bu sayede güvenlik kodlarını tek tek elimle girip komut düğmesine basarak bazı bilgiler çekmek istiyorum (bilgi çekmek için başka bir konu açma düşüncesindeyim. )

ikinci olarak tablolardaki tc kimlik nolarının ve okul numaralarnın otomatik olarak kutulara eklenmesini temin ederseniz ayrıca minnet duyarım. (güvenlik kodlarını tekl tek kendi elimle yazacağım )

formunuzdan çok istifade ediyorum. fakat hala öğrenme aşamasındayım. yardımlarınız için şimdiden teşekkür ederim.

bu arada tc kimlik numarasının 11 haneli yapabilmek için alan özelliği "metin" yaptım bilgilerinize


Ek Dosyalar
.rar   veriçekimi.rar (Dosya Boyutu: 17,37 KB / İndirme Sayısı: 22)
muradoglu, 28-04-2010 tarihinden beri AccessTr.neT üyesidir.
Cevapla


ozanakkaya
sledgeab
Kullanici Avatari
Kurucu
O.... A....
9.030
29/01/2008
Denizli
Polis Memuru
Ofis 2010 32 Bit
Bugün,22:46
Çözüldü 
cevap yazabilmem için malesef iki adet öğrenci bilgisini özel mesajla göndermeniz gerekiyor.
Cevapla


esrefigit

Kullanici Avatari
Onursal
598
30/10/2008
356
Konya
Ofis 2003
06/11/2015,13:38
Çözüldü 
Dim rstkayit As ADODB.Recordset
Dim lR As Long
Dim lR1 As Long
Dim ObjElement As HTMLObjectElement
Set rstkayit = New ADODB.Recordset
rstkayit.Open "SELECT * FROM ogrenciler", CurrentProject.Connection, adOpenStatic, adLockOptimistic
Set ObjElement = WebBrowser1.Document.all().tags("table").Item(35)
lR = ObjElement.rows.length - 1
For lR1 = 1 To lR
With rstkayit
.AddNew
.Fields("tckimlik") = ObjElement.rows(lR1).cells(1).innerText
.Fields("adı") = ObjElement.rows(lR1).cells(2).innerText
.Fields("soyadı") = ObjElement.rows(lR1).cells(3).innerText
.Fields("okulno") = ObjElement.rows(lR1).cells(4).innerText
.Fields("sınıfı") = ObjElement.rows(lR1).cells(5).innerText
.Fields("durumu") = ObjElement.rows(lR1).cells(6).innerText
.Fields("kurumkodu") = Mid(Right(WebBrowser1.Document.all.Item("IOMPageHeader1_lblKurumIlIlce").innerText, 8), 1, 6)
.Update
End With
Next lR1

ben bu şekilde öğrenci listelerini alıyorum ancak toplu not veren Html sayfası varsa bu işe yarar kodun çalışabilmesi için referanslardan microsoft Html object seçmen gerekiyor
meşhur çin atasözü  "ACCESS İLE YAPABİLECEKLERİNİZ HAYAL EDEBİLECEKLERİNİZ İLE SINIRLIDIR" siz ne kadar hayal edebiliyorsunuz
Cevapla







Konuyu Okuyanlar: 1 Ziyaretçi


Konu ile Alakalı Benzer Konular
Konular Yazar Yorumlar Okunma Tarih Son Yorum
Çözüldü Web Browser daki imputa deger atama moskovic 6 634 14/12/2015, 00:54 moskovic
Çözüldü Form için Web Browser Scroll Ayarları Hk. rknbrlz 5 831 27/07/2015, 03:07 rknbrlz
Çözüldü Web Browser Buton Tıklama ceminsay 2 1.450 29/06/2015, 19:55 ceminsay
Çözüldü web.browser ates2014 4 757 18/04/2015, 12:16 ates2014
  web browser ie uyarısı aliyorga 6 1.040 03/03/2015, 17:00 atoz112


Türkçe Çeviri: MCTR, Forum Yazılımı: MyBB, © 2002-2016 MyBB Group.
DMCA.com Protection Status
© Desing by XSTYLED| Develops by ozanakkaya