AccessTr.neT

Tam Versiyon: Değişken Hatası
Şu anda arşiv modunu görüntülemektesiniz. Tam versiyonu görüntülemek için buraya tıklayınız.
Sayfalar: 1 2
Şu kodu çalıştırdığımda

Visual Basic Code
Private Sub Komut39_Click()
    Dim strSQL As New ADODB.Connection
    Dim rstkayit As New ADODB.Recordset
    krkSQL = "SELECT *FROM tbl_kasa"
            
            rstkayit.Open strSQL, CurrentProject.Connection, adOpenKeyset, adLockOptimistic
                With rstkayit
                    .Find "[CariBilgisi]=" & Me.CariBilgisi
                        DoCmd.RunCommand acCmdSaveRecord
                        .AddNew
                        .Fields("CariBilgisi") = Me.CariBilgisi
                        .Fields("ktarihi") = Me.Tarih
                        .Fields("giris") = Me.fatTopla
                        .Update
                        End With
                                              
                        
                   
                            
                            
End Sub



Şu hatayı alıyorum

[Resim: do.php?imgf=152241367919051.jpg]

Merhaba,

strSQL şeklinde tanımlama yapılmış ancak kod içerisinde krkSQL olarak kullanılıyor. 

Hatanın sebebi bu olabilir. Örnek uygulamayı inceleyebilirsek net fikir üretebiliriz.
(30/03/2018, 15:49)ozanakkaya Adlı Kullanıcıdan Alıntı: [ -> ]Merhaba,

strSQL şeklinde tanımlama yapılmış ancak kod içerisinde krkSQL olarak kullanılıyor. 

Hatanın sebebi bu olabilir. Örnek uygulamayı inceleyebilirsek net fikir üretebiliriz.

Teşekkürler ama olmuyor ondan değil yani
Birde, kod yapısına göre strSQL'un New ADODB.Connection değil de string olması lazım gibi.
(30/03/2018, 15:52)ozanakkaya Adlı Kullanıcıdan Alıntı: [ -> ]Birde, kod yapısına göre strSQL'un New ADODB.Connection değil de string olması lazım gibi.
Img-cray
 
Çok teşekkür ederim  string olayı düzeltti.  +rep

her zaman ki gibi  muhteşemsiniz
Bir şey daha sorsam formdaki verilerin 2 tabloya da kayıt edilip edilmediğini nasıl check edebilirim ? örnek var mıdır elinizde bununla ilgili
Sayfalar: 1 2