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

Derecelendirme: 0/5 - 0 oy
Kullanici Avatari

serayhefe


 10
 3
 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.


Ek Dosyalar
.rar   dolar_megamehmet.rar(Dosya Boyutu: 44,7 KB / İndirme Sayısı: 26)
serayhefe, 21-08-2009 tarihinden beri AccessTr.neT üyesidir.

Kullanici Avatari

ozanakkaya


OZ.... AK....
 41
 11.386
 466
 29/01/2008
 Denizli
 Memur
 Ofis 2010 32 Bit
 Bugün,03:05
Çö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


 10
 3
 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


OZ.... AK....
 41
 11.386
 466
 29/01/2008
 Denizli
 Memur
 Ofis 2010 32 Bit
 Bugün,03:05
Çö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


 10
 3
 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


OZ.... AK....
 41
 11.386
 466
 29/01/2008
 Denizli
 Memur
 Ofis 2010 32 Bit
 Bugün,03:05
Çö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 550 17/08/2017, 01:06
Son Yorum: Makrovba
Çözüldü Recordset hatasını çözemedim sefer1975 2 752 23/02/2015, 18:41
Son Yorum: atoz112
Çözüldü Recordset Kullanamıyorum sebo19gs 6 2.167 04/07/2012, 14:16
Son Yorum: sebo19gs
Çözüldü recordset mahircinar01 23 5.965 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.872 30/04/2010, 18:06
Son Yorum: myAccess

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