Skip to main content

AccessTr.neT

Kayıt Ol

 | Facebook ile Bağlan  | Twitter İle Bağlan | Google+ İle Bağlan

Access Sorgusu Hakkında

kanakan52
kanakan52
Excel Cevaplanmış Soruları
7
775

Access Sorgusu Hakkında

Çözüldü #1
kanakan52
Aktif Üye
kanakan52
Bul
Aktif Üye
Adı Soyadı:
Yaşı: 42
Konum:
Ofis Versiyonu:
Son Oturumu: 18/07/2022,22:02
Yorumları: 275
Konuları: 29
Kayıt Tarihi: 09/05/2013
Teşekkür Puanı: 0
Değerli üstadlar Selamlar,

Bir konuda destek ihtiyacaım doğdu.

Access veritabanındaki bir dosyadan kısa sorgu ile veri çekmek istiyorum.
Kod:
Me.txtVeri1.Value = baglan.Execute("select [Komisyon] from [PazarYeriAyar] where KategoriID =" & ID & " and [PazarYeriID]=1")
gibi bir sorgu ile veri almaya çalıştım ancak başaramadım. Değerrli yorum ve yardımlarınızı rica ederim.
Cevapla
#2
berduş
Berduş
berduş
Bul
Uzman
Adı Soyadı: ha....
Konum: -
Ofis Versiyonu: Ofis 2019 64 Bit
Son Oturumu: Bugün,22:03
Yorumları: 8.550
Konuları: 94
Kayıt Tarihi: 30/07/2014
Teşekkür Puanı: 1.051
Recordset 'ten veriyi bu şekilde alamazsınız
Önce recordseti oluşturup sonra da getstring ile almayi dener misiniz?
Me.txtVeri1.Value = rst.GetString(adClipString, , vbTab, vbCrLf)
Cevapla
#3
kanakan52
Aktif Üye
kanakan52
Bul
Aktif Üye
Adı Soyadı:
Yaşı: 42
Konum:
Ofis Versiyonu:
Son Oturumu: 18/07/2022,22:02
Yorumları: 275
Konuları: 29
Kayıt Tarihi: 09/05/2013
Teşekkür Puanı: 0
(07/07/2022, 22:17)berduş yazdı: Recordset 'ten  veriyi bu şekilde alamazsınız
Önce recordseti oluşturup sonra da getstring ile almayi dener misiniz?
Me.txtVeri1.Value = rst.GetString(adClipString, , vbTab, vbCrLf)

@berduş üstad selamlar..

bunla ilgili bir örnek dosya veya çalışma var mı elinizde. Access konusunda bilgili değilim maalesef.
Cevapla
#4
berduş
Berduş
berduş
Bul
Uzman
Adı Soyadı: ha....
Konum: -
Ofis Versiyonu: Ofis 2019 64 Bit
Son Oturumu: Bugün,22:03
Yorumları: 8.550
Konuları: 94
Kayıt Tarihi: 30/07/2014
Teşekkür Puanı: 1.051
Çalışmanızın küçük bir örneğini eklerseniz onun üzerinde gösterebilirim
Cevapla
#5
kanakan52
Aktif Üye
kanakan52
Bul
Aktif Üye
Adı Soyadı:
Yaşı: 42
Konum:
Ofis Versiyonu:
Son Oturumu: 18/07/2022,22:02
Yorumları: 275
Konuları: 29
Kayıt Tarihi: 09/05/2013
Teşekkür Puanı: 0
Üstad bulunduğum ortamda dosyalarım yok maalesef. Bilgisayarıma geçince paylaşırım bir dosya. Destek için teşekkür ederim.
Cevapla
#6
berduş
Berduş
berduş
Bul
Uzman
Adı Soyadı: ha....
Konum: -
Ofis Versiyonu: Ofis 2019 64 Bit
Son Oturumu: Bugün,22:03
Yorumları: 8.550
Konuları: 94
Kayıt Tarihi: 30/07/2014
Teşekkür Puanı: 1.051
bağlantıyı nasıl yaptığınızı bilmiyorum o nedenle önerim işe yarayamayabilir
ama 
Me.txtVeri1.Value = baglan.Execute("select [Komisyon] from [PazarYeriAyar] where KategoriID =" & ID & " and [PazarYeriID]=1")
kodunu aşağıdaki kodla değiştirip dener misiniz?
Me.txtVeri1.Value = baglan.Execute("select [Komisyon] from [PazarYeriAyar] where KategoriID =" & ID & " and [PazarYeriID]=1").GetString(, , vbTab, vbCrLf)
Cevapla

Bir hesap oluşturun veya yorum yapmak için giriş yapın

Yorum yapmak için üye olmanız gerekiyor

ya da