Konu Araçları | Seçenekler: | Gösterim Stili
Tarih
18/10/2011 16:55
Konu Sahibi
muradoglu
Yorumlar
2
Okunma
1147
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.883
29/01/2008
Denizli
Memur
Ofis 2010 32 Bit
Bugün,19:18
Çözüldü 
cevap yazabilmem için malesef iki adet öğrenci bilgisini özel mesajla göndermeniz gerekiyor.


Cevapla

esrefigit

Aktif Üye
Kullanici Avatari
Aktif Üye
598
30/10/2008
359
Konya
Ofis 2003
03/08/2017,11:47
Çö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 1.177 14/12/2015, 00:54 moskovic
Çözüldü Form için Web Browser Scroll Ayarları Hk. rknbrlz 5 1.235 27/07/2015, 03:07 rknbrlz
Çözüldü Web Browser Buton Tıklama ceminsay 2 1.942 29/06/2015, 19:55 ceminsay
Çözüldü web.browser ates2014 4 1.002 18/04/2015, 12:16 ates2014
Çözüldü web browser ie uyarısı aliyorga 6 1.524 03/03/2015, 17:00 atoz112

Türkçe Çeviri: MCTR, Yazılım: MyBB, © 2002-2017 MyBB Group.
Forum use Krzysztof "Supryk" Supryczynski addons.