ADODB.Recordset
Tarih
11/12/2009 01:48
Konu Sahibi
serayhefe
Yorumlar
9
Okunma
2963
Konuyu Oyla:
  • Derecelendirme: 0/5 - 0 oy
  • 5
  • 4
  • 3
  • 2
  • 1

Derecelendirme: 0/5 - 0 oy



serayhefe
Üye
Kullanici Avatari
Üye
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.
Cevapla


ozanakkaya
sledgeab
Kullanici Avatari
Kurucu
O.... A....
9.023
29/01/2008
Denizli
Memur
Ofis 2010 32 Bit
Bugün,06:11
Çözüldü 
vb penceresini aç, referanslara "Microsoft Ado Ext. 2.8 for DDL and Security"i ekle, düzelmez ise örneğini ekle
Cevapla


serayhefe
Üye
Kullanici Avatari
Üye
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.
Cevapla


ozanakkaya
sledgeab
Kullanici Avatari
Kurucu
O.... A....
9.023
29/01/2008
Denizli
Memur
Ofis 2010 32 Bit
Bugün,06:11
Çö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.
Cevapla


serayhefe
Üye
Kullanici Avatari
Üye
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.
Cevapla


ozanakkaya
sledgeab
Kullanici Avatari
Kurucu
O.... A....
9.023
29/01/2008
Denizli
Memur
Ofis 2010 32 Bit
Bugün,06:11
Çözüldü 
Bende onu diyorum, olmayan başka yer olarak bahsettiğin örneği ekle. Bakıp çözüm bulmaya çalışalım.
Cevapla







Konuyu Okuyanlar: 1 Ziyaretçi


Konu ile Alakalı Benzer Konular
Konular Yazar Yorumlar Okunma Tarih Son Yorum
  Recordset hatasını çözemedim sefer1975 2 448 23/02/2015, 18:41 atoz112
Çözüldü Recordset Kullanamıyorum sebo19gs 6 1.753 04/07/2012, 14:16 sebo19gs
Çözüldü recordset mahircinar01 23 4.283 28/06/2012, 22:17 iscinar
Çözüldü ADODB.Recordset hatası (sütun sayısına göre değiştirme) myAccess 7 2.907 30/04/2010, 18:06 myAccess
Çözüldü "Set rs = Me.recordset.Clone" hatası derebeyi 4 1.145 26/08/2009, 21:12 mehmetdemiral


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