Skip to main content

AccessTr.neT


Public rstkayit As ADODB.Recordset hatası

Public rstkayit As ADODB.Recordset hatası

Çözüldü #1
Arkadaşlar,
update kısmında takıldım, bana yardımcı olabilirmisiniz, örneği ekleymiyorum aşağıdaki komutu çalıştıramıyorum, formun olayına

Option Compare Database
Public rstkayit As ADODB.Recordset
Dim strSQL As String
bunu yazdığımda aşğıdaki hatayı veriyor,


This error occurs when an event has failed to run because Microsoft Office Access cannot evaluate the location of the logic for the event. For example, if the OnOpen property of a form is set to =[Field], this error occurs because Access expects a macro or event name to run when the event is fired.

Sub şifreupdate()

strSQL = "SELECT * FROM KULLANICILAR "
Set rstkayit = New ADODB.Recordset
rstkayit.Open strSQL, CurrentProject.Connection, adOpenKeyset, adLockOptimistic

With rstkayit
.Find "[ID]=" & Me.Kullanıcı.Column1()
.Fields("KULLANICIŞİFRESİ") = Me.Yenişifre
.Update
End With



End Sub
Cevapla
Çözüldü #2
değişken tanımlamalarını Formun Open veya Load olay yordamlarında denediniz mi? (uygulamada Vba ile VB arasında bazı farklılıklar var)
Cevapla
Çözüldü #3
kodunuzda bir problem yok büyük ihtimalle ya ado referansı eksik yada açmaya çalıştığınız tablo bir başka kod tarafından açılmış ve kullanılıyor demektir.
meşhur çin atasözü  "ACCESS İLE YAPABİLECEKLERİNİZ HAYAL EDEBİLECEKLERİNİZ İLE SINIRLIDIR" siz ne kadar hayal edebiliyorsunuz
Cevapla
Çözüldü #4
Herşey normal gibi görünüyor ancak sizin gözünüzden şeyler olabilir.
Örneğinizi görmeden bu sorunu çözebilmek zor.
Sadece sorunlu formu ve gerekli tablo ve kayıtları içeren bir örnek gönderirseniz, daha kolay yardımcı olabiliriz.
Bildiğini bilenin arkasından git, bildiğini bilmeyeni uyar, bilmediğini bilene öğret, bilmediğini bilmeyenden kaç.
Konfüçyüs
Cevapla
Çözüldü #5
Docmd.runsql "update KULLANICILAR SET KULLANICISIFRESI=" & me.yenisifre & " where ID="& Me.Kullanıcı.Column1()
Bana işe yarayan bir müdür göster,sana dünyayı yerinden oynatayım.
                                                                                        Descartes


Cevapla
Çözüldü #6
Dim strSQL As String
dim yerine public kullanarak denermisin.
İyiki Varsın Access Img-grin
Cevapla

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

Yorum yapmak için üye olmanız gerekiyor

ya da