[size=medium]Merhaba ana formumda Vizesi dolan lisanlar Liste kutusunda sporcu ismine tıklandığında ilgili kaydı ekrana getirmek istiyorum. Uygulama da daha önce bu bölümü AltForm şeklinde düzenlemiş ve istenen şekilde kaydı ekrana getirmiştim. Fakat Anamenünün görüntüsü daha sadeleşsin istediğimden liste k[color=#333333][color=#333333][font=Tahoma, Verdan

Klasik bir ekle,düzenle, kaydet, kapat şeklinde tasarlanmış bir çalışmam var.
Çalışmamda ana forma bağlı bir alt form var.

İlişkisiz nesnelerle tabloya ado sisitemiyle kayıt yaparken alt formu olayın içine nasıl dahil ediyoruz. Öğrenmem gerek.

iyi günler siteye kadim zamanlarda eklenmiş güzel bir örnek var
ADO ile yapılmış güzel bir form var ekleme silme güncelleme arama listeden kayda gitme vs
ama benim takıntım yapılan değişikliği çıkmadan önce mutlaka sorması ama maalesef bu eklenmemiş 
form ilişkisiz olduğu için form_beforeupdate olayı tetiklenmiyor
ama metin kutuları ve diğer kontrollerde beforeupdate olayı tetikleniyor
dirty olayı ise hem formda hem kontrollerde tetiklenmiyor
bu durumda ADO ile hazırlanıp ilişkisiz olan fo

Arkadaşlar daha önce açtığım konuyu anlaşılır olması için örneğimi sadeleştirerek tekrar ekliyorum.
--Çalışmamın esas formu olan frm_AnaMenu den olayı seçerek  "OLAY TOPLANTI AÇ" butonuyla frm_olay_icin_toplanti_karari formuna ulaşıyorum. Bu formun kayıt kaynağı tbl_disiplinolayi tablosu (olay bilgisi, konusu vb gelmesi için)
----frm_olay_icin_toplanti_bilgileri formu frm_olay_icin_toplanti_karari formunun alt formu olması gerek. Bu formda tbl_karar_olay tablosuna bağlı (yani toplantı kararlar

iyi günler
Sqlite üzerinde veritabanınız var ve ADO ile tabloya kayıt ekleyecek iseniz.
[vb]Public Function updateLog(person As String) As Long
   
    Dim akca_conndriver, akca_conndatabasepathnw, akca_conndatabasefile, akca_conndatabaseend As String
    Dim str As String
    Dim strSQL As String
   
    Dim conn As Object, rs As Object
    Set conn = CreateObject("ADODB.Connection")
    Set rs = CreateObject("ADODB.Recordset")
   
    akca_conndriver = "Driver=SQLite3 ODBC Drive

Merhaba.
Sayfa1 deki sütun başlıklar sonuç sayfasına gelmiyor.
Ado ilepivot olayını ilk defa kullandığım için tecrübem yok.
Çözüm nedir?
Saygılar.

[vb]Private Sub CommandButton1_Click()
    Dim Con As Object, Rs As Object, Sorgu As String
    Application.ScreenUpdating = False
    With ThisWorkbook.Sheets("Sonuc")
        .Cells.ClearContents
        son = .Range("A" & Rows.Count).End(3).Row
        Set Con = CreateObject("ADODB.Connection")
        Set Rs = CreateObject("ADODB.Rec

Merhaba ekteki resimdeki gösterdiğim gibi sonuç neden hatalı geliyor?
Sayfa1 A sütununda veriler çift olunca hata veriyor sonuç olarak.
Saygılar.

[code]
Private Sub CommandButton1_Click()
    Dim con As Object
    Dim rs As Object
    Dim Sql As String
    Set con = CreateObject("Adodb.connection")
    Set rs = CreateObject("adodb.recordset")
   
    con.Open "provider=microsoft.ace.oledb.12.0;data source=" & ThisWorkbook.FullName & ";extended properties=""Excel 12.0;hdr=yes"""
 

merhaba arkadaşlar
access de birşeyler yaparken hep karşımıza yeni şeyler çıkıyor. ben ado ile form düzenleme ile ilgili bir örnek uygulama gördüm bunu incelerken aklıma takılan bir konu oldu.
1. muslistesi formundan müşteriyi çif tıklayınca musteriler formuna atması.
2. musteriler formunda kayıt yapıldığında muslistesi formunu güncellemesi.
3. ADO ile ilgili sıfırdan başlayıp bilgi alacağım sayfa önerileriniz ?

Arkadaşlar kodu aşağıdaki gibi düzenlemeye çalıştım fakat bir yerde hata veriyor ince noktası neredir bakabilir miyiz.
hata şu şekilde =  işlem, bu tür nesnede desteklenmiyor. diye uyarı veriyor. renkli alan için veriyor.
benim asıl yapmak istediğim. tablodaki id ye göre kayıtta güncelleme.

Private Sub btnDKaydet_Click()

If Me.TxİzinTuru = "Yıllık İzin" Then
    Select Case Val(Kalan - TxİzinNet)
           
            Case Is >= "0"
       
        Dim DB As DAO.Database
     

Arkadaşlar bu konuda bayağı araştırma yaptım ama örneklerin hepsi çok farklı idi, benim sorunuma hitap etmiyordu. Aşağıda yer alan sorguda 'from'dan sonra gelen sayfa değişkeni, adını hücreden alsın istiyorum, bir çok deneme yaptım bildiklerim doğrultusunda, ama hep hata verdi. bir de şunu öğrenmek istiyorum, ado ile arama yapacağım kapalı kitaptaki sayfa ismini, kitabı açmadan nasıl alıp bir değişkene atabilirim? şimdiden teşekkürler.

"select [CALISILAN_HAFTA ICI_MESAI_GUN] from [sayfa$]