Access SQL   ›   ACCESS SORULARI VE ÖRNEK UYGULAMALARI   ›   ACCESS SORULARI   ›   Altformda Hücre Ile Değil Satır Ile Işlem Yapma Hakkında.

Altformda Hücre Ile Değil Satır Ile Işlem Yapma Hakkında.
OGUZTURKYILMAZ
Yeni Üye 1-15

*
Kayıt Tarihi: 22.01.2018
Toplam 4 konu açtı.
Toplam 9 yorum yaptı.
Toplam 0 puanı bulunmakta.
Mevcut Office Sürümü:
Office 2007 TR,
Beğeniler: 2 / 0
#1
22-04-2023, 19:36
Merhaba konuyu nasıl açacağımı bilemedim ama şöyle bir şey yapmak istiyorum. Alt formdaki ID hücresine çift tıkladığımda o satırdaki tüm verileri 2.bir forma ADO ile çekebiliyorum. Ama asıl yapmak istediğim kullanıcı ID hücresi yada başka bir hücrenin içine tıklama yapmak zorunda kalmasın, altformdaki veri bulunan hangi satıra tıklanırsa o satır komple seçilsin ve çift tıklama yada tanımlanacak yeni bir butonun tıklanması yordamına yazacağım kod çalışsın verileri diğer forma aktarsın.

Yüklediğim örnekte F_AraçListesi formunda ID hücresine çift tıklandığında açılan ARAÇTANIMLAMA formuna bilgileri alıyor ve istediğim güncelleme işlemini yapıyorum.


Eklenti Dosyaları
.zip   KT Grup - Kopya.zip (Boyut: 194,63 KB / İndirilme: 27)
.jpg   Screenshot_1.jpg (Boyut: 145,3 KB / İndirilme: 18)
.jpg   Screenshot_2.jpg (Boyut: 159,22 KB / İndirilme: 17)
.jpg   Screenshot_3.jpg (Boyut: 160,95 KB / İndirilme: 15)



  Bul
  Alıntı
Bu mesajı beğenenler:
OGUZTURKYILMAZ
Yeni Üye 1-15

*
Kayıt Tarihi: 22.01.2018
Toplam 4 konu açtı.
Toplam 9 yorum yaptı.
Toplam 0 puanı bulunmakta.
Mevcut Office Sürümü:
Office 2007 TR,
Beğeniler: 2 / 0
#2
22-04-2023, 23:48
Form üzerine alınan butona, kodu aşağıdaki gibi revize ederek tanımladığımda istediğim sonuca ulaştım. Teşekkür ederim.


Visual Basic
  1. Private Sub btn_Guncelle_Click()
  2.  
  3. DoCmd.OpenForm "F_AracTanimlama"
  4.  
  5. Dim strSQL As String
  6.  
  7. 'strSQL = "SELECT * FROM  T_Arac WHERE ID =" & Me.ID & ""
  8. strSQL = "SELECT * FROM  T_Arac WHERE ID =" & Me.Lst_AracListesi.Form.ID & ""
  9.  
  10. Set rs = CreateObject("ADODB.Recordset")
  11. rs.CursorType = adOpenKeyset
  12. rs.LockType = adLockOptimistic
  13. rs.Open strSQL, CurrentProject.Connection
  14.         
  15. If Not rs.BOF Then
  16.  
  17. Form_F_AracTanimlama.TextBox_ID = rs!ID
  18. Form_F_AracTanimlama.TextBox_AracNo = rs!ARAC_NO
  19. Form_F_AracTanimlama.TextBox_PlakaNo = rs!ARAC_PLAKA
  20. Form_F_AracTanimlama.ComboBox_AracTipi = rs!ARAC_TIPI
  21. Form_F_AracTanimlama.TextBox_MuayeneTarihi = rs!MUAYENE_BITIS_TARIHI
  22. Form_F_AracTanimlama.ComboBox_AracDurumu = rs!ARAC_DURUMU
  23.  
  24.  
  25. Form_F_AracTanimlama.btn_Kaydet.Enabled = False
  26. Form_F_AracTanimlama.btn_Guncelle.Enabled = True
  27.  
  28.  
  29. End If
  30. rs.Close
  31. Set rs = Nothing
  32.  
  33. End Sub





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


Benzer Konular...
Konu: Yazar Cevaplar: Gösterim: Son Mesaj
  Açılır Kutu Değerine Göre Tablo2'ye Değer Yazsın Veya Satır Eklesin. ŞabanTR 11 299 24-12-2023, 14:38
Son Mesaj: dsezgin
  [SORGU] Iki Tablo Arasında Sorgu Ile Güncelleme Yapma yahyamacit 2 139 10-11-2023, 13:22
Son Mesaj: yahyamacit
  Aynı Tarihli Veri Varsa Işlem Yapmasın Ve Sql Col Sayısını Arttırma snapper 9 324 20-10-2023, 00:36
Son Mesaj: dsezgin
access-sql-4 Altformda Veri Sınırı alperalper 2 162 24-03-2023, 07:59
Son Mesaj: alperalper
  Altformda Koşullu Filtreleme Ve Filtreli Raporu Açma ŞabanTR 2 324 25-01-2023, 21:31
Son Mesaj: ŞabanTR
  Altformda Kayıt Bulma Ve Tüm Kayda Metinkutusundan Veri Yazdırma ŞabanTR 4 217 15-01-2023, 18:07
Son Mesaj: ŞabanTR
  [FORM] Formda Duruma Göre Hücre Gizleme agabey_42 2 121 05-01-2023, 16:58
Son Mesaj: agabey_42
  [RAPOR] Access Raporda Rakam Olmayan Kısımların 0,00 Değil De Boş Olarak Gözükmesi. İsmail Küçükşengün 7 277 01-12-2022, 15:25
Son Mesaj: onur_can

Foruma Git:


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