Şifre Değiştirme

sql1 = "select [ŞİFRE],[AD SOYAD],[SİCİL NO] from personel where [ID]='" & user & "'"

rs.Open sql1, conn, adOpenKeyset, adLockPessimistic

Burada hep hata veriyor giriş yaparken

bu haliyle girişi iptal edin girişte şifre istemesin tablo bağlamasın yani hata veren kodu devre dışı bırakın doğrudan ana formunuz açılsın oradaki bağlantıları deneyin
oradaki recordsetler şimdiye kadar çalışıyırdu değil mi?
şimdi şifreli veritabanında da çalışırlarsa -ki bende hiçbiri çalışmamıştı- sorun bahsettiğiniz koddadır
ama şimdiye kadar çalışan diğer recordsetler de eğer şimdi şifreli tabloda çalışmıyorsa sorun şifrelemenizden kaynaklanıyordur

Access şifreyi kaldırdım ve girişte sizin gönderdiğinizde hata alıyorum ama kendi bilgisayarımda duranda şuan sıkıntı yok ama grafik kısmında da hata almaya başladım çok ufak defek pürüzler kaldı ama ne yapsam düzelmiyor.

şimdi şifreyi kaldırdığınızda sizin dosyanız düzgün çalışıyor mu?

Şifreli olduğunda da açılıyor şifre değiştirme ve grafiklerde hata alıyorum şifreli olsa da olmasa da

kendi dosyanızda 2. Call connection_opendan önce rs.close eklemeyi dener misiniz?
2. olarak user değerini giris formundan almaya çalışıyor, şifre değiştirmeye çalışırken giris formu açık mı?
user adını modüllerden birine global yada public olarak tanıtıp değeri form yerine orada saklamanız daha uygun olur.

---

bu arada şifre değiştirildikten sonra herhangi bir bildirimde bulunmuyor, dolayııyla siz işlem yapılmadı sanıp tekrar butona basınca hata veriyor. şifre değiştirildi uyarısı versin