Konu Araçları | Konu Seçenekleri | Gösterim Stili
Tarih
11/12/2009 01:48
Konu Sahibi
serayhefe
Yorumlar
9
Okunma
3704
Konuyu Oyla:
  • Derecelendirme: 0/5 - 0 oy
  • 5
  • 4
  • 3
  • 2
  • 1

Derecelendirme: 0/5 - 0 oy
Kullanici Avatari

serayhefe

Üye
 3
 10
 21/08/2009
0
 Ankara
 
 Ofis 2007
 24/11/2010,17:02
Çözüldü 

Kod:
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
Option Compare Database
Private Sub Komut32_Click()

DoCmd.DeleteObject acTable, "Currency"
Application.ImportXML DataSource:="http://www.tcmb.gov.tr/kurlar/today.xml", ImportOptions:=acStructureAndData

Dim rst As ADODB.Recordset
Set rst = New ADODB.Recordset

    rst.Open "SELECT Isim, DövizAlış , DövizSatış, EfektifAlış , EfektifSatış from qryTCMB where Isim = 'AMERİKAN DOLARI'", _
    CurrentProject.Connection, adOpenKeyset, adLockOptimistic
    Me.usdal.Value = rst.Fields("EfektifAlış")
    Me.usdsat.Value = rst.Fields("EfektifSatış")
   
    Set rst = Nothing
            
    Metin15 = usdal
    Metin17 = usdsat

End Sub


2007 kullanıyorum. İndirdiğim örnek çalışıyor ama kendi programına uyarlamaya çalıştığımda hata veriyor. "rst As ADODB.Recordset" seçiyor ve User-defined type not defined hatası veriyor. Kendi dosyamı yükleyemiyorm oldukça büyük. Şimdiden sağolun.

Not: Kendime uyarladığım değil indirdiğim dosyayı gönderbiliyorum.


serayhefe, 21-08-2009 tarihinden beri AccessTr.neT üyesidir.

Kullanici Avatari

ozanakkaya

Kurucu
Oz.... Ak....
 39
 477
 11.738
 29/01/2008
 Denizli
 Memur
 Ofis 2010 32 Bit
 Dün,20:46
Çözüldü 
vb penceresini aç, referanslara "Microsoft Ado Ext. 2.8 for DDL and Security"i ekle, düzelmez ise örneğini ekle


"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. 

Kullanici Avatari

serayhefe

Üye
 3
 10
 21/08/2009
0
 Ankara
 
 Ofis 2007
 24/11/2010,17:02
Çözüldü 
İlgin için sağol ama yine yapıyor


serayhefe, 21-08-2009 tarihinden beri AccessTr.neT üyesidir.

Kullanici Avatari

ozanakkaya

Kurucu
Oz.... Ak....
 39
 477
 11.738
 29/01/2008
 Denizli
 Memur
 Ofis 2010 32 Bit
 Dün,20:46
Çözüldü 
örneğini "Araçlar / Veritabanı Hizmet Programları / Veritabanı Sıkıştır ve Onar" ile onarıp sıkıştırma programıyla sıkıştırdıktan sonra

http://www.4shared.com veya http://www.rapidshare.com 'a ekleyip indirme linkini konuya yaz. Örneğin üzerinden düzenleme yapalım.


"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. 

Kullanici Avatari

serayhefe

Üye
 3
 10
 21/08/2009
0
 Ankara
 
 Ofis 2007
 24/11/2010,17:02
Çözüldü 
http://rapidshare.com/files/319148853/Kur_Getir.zip

ilk verdiğim dosyayı bu haliyle çalıştırabiliyorum başka yerde yaptığımda olmuyor maalesef


serayhefe, 21-08-2009 tarihinden beri AccessTr.neT üyesidir.

Kullanici Avatari

ozanakkaya

Kurucu
Oz.... Ak....
 39
 477
 11.738
 29/01/2008
 Denizli
 Memur
 Ofis 2010 32 Bit
 Dün,20:46
Çözüldü 
Bende onu diyorum, olmayan başka yer olarak bahsettiğin örneği ekle. Bakıp çözüm bulmaya çalışalım.


"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. 


Konuyu Okuyanlar: 1 Ziyaretçi

Konu ile Alakalı Benzer Konular
Konular Yazar Yorumlar Okunma Son Yorum
Çözüldü Form.recordset Kodunda Hata Almaktayım. Makrovba 6 652 17/08/2017, 01:06
Son Yorum: Makrovba
Çözüldü Recordset hatasını çözemedim sefer1975 2 790 23/02/2015, 18:41
Son Yorum: atoz112
Çözüldü Recordset Kullanamıyorum sebo19gs 6 2.227 04/07/2012, 14:16
Son Yorum: sebo19gs
Çözüldü recordset mahircinar01 23 6.095 28/06/2012, 22:17
Son Yorum: iscinar
Çözüldü ADODB.Recordset hatası (sütun sayısına göre değiştirme) myAccess 7 3.957 30/04/2010, 18:06
Son Yorum: myAccess

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