Access SQL   ›   ACCESS SORULARI VE ÖRNEK UYGULAMALARI   ›   ACCESS SORULARI   ›   docmd.runsql hakkında

docmd.runsql hakkında
Tornado
Access Takımı

*
Kayıt Tarihi: 25.11.2010
Toplam 41 konu açtı.
Toplam 240 yorum yaptı.
Toplam 0 puanı bulunmakta.
Beğeniler: 0 / 0
#1
07-05-2011, 15:38
merhaba
visual basic düzenleyicide
docmd.runsql ile select sorgusu çalıştırıp sonuçları değişkenlere almak ve kullanmak mümkünmü veya bu tür bir ihtiyacı karşılamak için nasıl bir yapı kullanabilrim



  Bul
  Alıntı
Bu mesajı beğenenler:
Taruz
Forum Yöneticisi

*
Kayıt Tarihi: 04.03.2008
Toplam 371 konu açtı.
Toplam 7.540 yorum yaptı.
Toplam 236 puanı bulunmakta.
Mevcut Office Sürümü:
Office 2010, Office 2019,
Beğeniler: 55 / 56
#2
08-05-2011, 02:29
Merhaba sn. Tornado..

VBA da oluşturduğunuz sorgu deyimlerini sonuçlarını ADO ile alabiliriz.. runsql komutu ile olmaz..

Bununla ilgili AccessCage kod bankasında daha önce bir paylaşımım olmuştu.. Aynı yapıyı kullanabiliriz..



Kod:
Dim rs As New ADODB.Recordset
    Dim sorgu As String
    Dim kriter
    kriter = [Forms]![Fatura]![Cari Hesap Kodu]
    sorgu = "SELECT [Kartlar Cari].[Cari Adı Soyadı/Ünvanı], [Kartlar Cari].[Cari Hesap Kodu] " & _
            "FROM [Kartlar Cari] " & _
            "WHERE [Kartlar Cari].[Cari Hesap Kodu]=" & kriter & ""
    [Cari Adı Soyadı/Ünvanı].RowSource = sorgu
    rs.Open sorgu, CurrentProject.Connection, adOpenKeyset, adLockOptimistic
    MsgBox rs(0)
    MsgBox rs(1)

    Set rs = Nothing
Bulunamayan yerleri bulmak için önce kaybolmak gerekir.
Kaptan Hector Barbossa


SORU SORMA KILAVUZU
Giriş | Sormadan Önce | İlgili Forumu dikkatlice seçin | Anlamlı ve duruma uygun konu başlıkları kullanın | Anlamsız soru cümleleri kurmayın | Açık, dilbilgisi kurallarına uygun ve sözdizimlerine dikkate ederek yazın | Sorunuz sizin için çok acil olsa bile, çok acil diye yazmayın | Sorununuz hakkında tam ve aydınlatıcı iletiler yazın | Amacınızı belirtin | Problemin belirtilerini tanımlayın, kendi tahminlerinizi değil | Sorunuz hakkında açık olun | Nezaket asla yaralamaz ve bazen oldukça yararlıdır | Boyut her şey değildir! | Kabalıkla ilgilenmek | Cevabı E-Posta ile istemeyin | İnsanlardan özel mesajla cevap vermelerini istemeyin | Eğer cevabı anlamadıysanız | Şayet bir cevap alamazsanız | Sorununuz çözüldükten sonra küçük bir not ile bildirin | Sorulmaması gereken türde sorular | İyi ve kötü sorular

Sorulara nasıl doğru düzgün cevap verilir



  Website   Bul
  Alıntı
Bu mesajı beğenenler: Vuslat46
Tornado
Access Takımı

*
Kayıt Tarihi: 25.11.2010
Toplam 41 konu açtı.
Toplam 240 yorum yaptı.
Toplam 0 puanı bulunmakta.
Beğeniler: 0 / 0
#3
08-05-2011, 02:52
nasıl yapılacağını bilmeyince baya uğraştırıyor insanı
Allahtanki sizin gibi yol göstericilerimiz var
çok teşekkür ederim Taruz hocam elinize sağlık



  Bul
  Alıntı
Bu mesajı beğenenler:
assenucler
Kıdemli Üye >1000

*
Kayıt Tarihi: 21.03.2008
Toplam 154 konu açtı.
Toplam 2.119 yorum yaptı.
Toplam 11 puanı bulunmakta.
Mevcut Office Sürümü:
Office 2019,
Beğeniler: 0 / 4
#4
08-05-2011, 08:04
Sayın Taruz;

Gününüz aydınlık, neşeniz sağlığınız yerinde ve kazancınız bol olsun.

İyi pazarlar.. Katkınız için teşekkürler..

Selam ve sevgiler..



  Bul
  Alıntı
Bu mesajı beğenenler:
modalı
Access Uzmanları

*
Kayıt Tarihi: 19.06.2009
Toplam 13 konu açtı.
Toplam 690 yorum yaptı.
Toplam 7 puanı bulunmakta.
Mevcut Office Sürümü:
Office 2007 TR,
Beğeniler: 0 / 4
#5
08-05-2011, 10:55
Sayın Tornado,

Karışıklığa sebep vermemek için
Visual Basic
  1. DoCmd.RunSQL


deyimi ile Select (Seçme) türü sorguları çalıştıramazsınız.

Ancak, UPDATE(Güncelleme), INSERT (Ekleme) ve DELETE (Silme) türü sorguları çalıştırabilirsiniz.

Kullanım şekli:

Visual Basic
  1. DoCmd.RunSQL "UPDATE titles SET price = price * 1.10



şeklinde olacağı gibi,

Visual Basic
  1. sSQL = "UPDATE titles SET price = price * 1.10
  2.      DoCmd.RunSQL sSQL



şeklinde de kullanılabilir.

İyi çalışmalar



  Bul
  Alıntı
Bu mesajı beğenenler:
Tornado
Access Takımı

*
Kayıt Tarihi: 25.11.2010
Toplam 41 konu açtı.
Toplam 240 yorum yaptı.
Toplam 0 puanı bulunmakta.
Beğeniler: 0 / 0
#6
08-05-2011, 13:20
daha önce dediğiniz gibi docmd ile seçim haricinde ki sql sorgularını çalıştırmıştım,
ado ile seçim sorgularının kullanıldığı örneklerde gördüm
belki docmd ile bu işlemi yapmanın kolay bir yolu vardır diye siz değerli üstadlarıma danışayım dedim
Sayın Taruz ve sizin cevaplarınız aradığımı bulmamı sağladı
her ikinizede teşekkür ediyorum



  Bul
  Alıntı
Bu mesajı beğenenler:


Benzer Konular...
Konu: Yazar Cevaplar: Gösterim: Son Mesaj
  Docmd.gotorecord,,newrec Sonrası Otomatik Dolu Metin Kutusu meceka 6 764 10-11-2022, 15:45
Son Mesaj: meceka
  Docmd.sendobeject Hakkında Mr.Midnight 6 1.029 23-03-2021, 08:47
Son Mesaj: Mr.Midnight
access-sql-18 [VBA] runsql currentdb kayıt hatası metocan 6 2.147 20-05-2019, 01:44
Son Mesaj: metocan
  [VBA] Docmd Komutunun Çok Alanlı Yapıya Uygulanması fatihsipahi 2 1.051 08-09-2018, 11:12
Son Mesaj: fatihsipahi
  [RAPOR] Docmd.openreport/whereCondition Elif Karabina 13 3.578 22-04-2017, 23:36
Son Mesaj: Elif Karabina
  [FORM] alt form docmd go to newe record koruyucu 5 2.139 09-02-2017, 08:40
Son Mesaj: EminA
  DoCmd.TransferText msonusali 0 1.586 01-07-2014, 21:14
Son Mesaj: msonusali
  [FORM] docmd. ile dosya import msonusali 1 1.473 24-06-2014, 17:11
Son Mesaj: dsezgin

Foruma Git:


Bu konuyu görüntüleyen kullanıcı(lar): 1 Ziyaretçi