AccessTr.neTMicrosoft AccessAccess Cevaplanmış Soruları

aktif kullanıcı görüntüleme hakkında

1 2 3 4
16/07/2009, 12:15

Aykay

Sayın Celoyce ve Mehmetdemiral;
Teşekkürler
18/07/2009, 12:28

kanlitoprak

COK TEŞEKKÜRLER AYRINTILI ANLATIMINIZ İÇİN AYRICA PROGRAMI YUKLERKEN BAZI DURUMLARI KALDIRMADIGIM ICIN ÖZUR TESEKKURLER
12/09/2009, 15:17

echoes

(15/07/2009, 20:28)mehmetdemiral yazdı: Sizdeki bazı referanslar bende hata verdiği için referanstaki "missing" durumundaki dosyaları kaldırdım. Bu yüzden gönderdiğim dosyada sadece metodu inceleyin ve kendi orjinal dosyanıza ekleyin. Bunu onun yerine koymayın yani.

1- Modül açtık, içine

public kullanici as string

yazıp kaydettik. Sonra giriş ekranında kullanıcı adının kabul edildiği if şartundaki else satırının üstünde bir yerde, formu kapatmadan önce

kullanici= me.USER

yazdık. Sonra açılan formda (hangisini istiyorsanız farketmez) açıldığında olayına AKULLANICI adındaki (yani aktif kullanıcı) metin kutusuna değişkeni yapıştıralım

me.AKULLANICI = kullanici


Bu kadar. Örneğe bakın. nerde hata yapmışsınız?

sayın mehmet demiral
söylediğiniz gibi kayıtlı kullanıcıyı formlarımda gösteriyorum. yalnızca şifre ekranımdan ana formuma geçtiğim zamanda kayıtlı kullanıcı ismini göstermiyor. fakat ana formdan herhangi bir forma geçip tekrar ana forma geldiğimde busefer kayıtlı kullanıcı gösteriyor. yani bi refresh yapılması gerekiyor. fakat ana form form open olayına refresh yaptığım halde göstermiyor. sebebi neolabilir?
12/09/2009, 16:02

mehmetdemiral

Sayın echoes
Sanırım farklı bir çalışmadan bahsediyorsunuz. Örnek eklerseniz mutlaka çözüm alırsınız.
12/09/2009, 16:39

echoes

(12/09/2009, 16:02)mehmetdemiral yazdı: Sayın echoes
Sanırım farklı bir çalışmadan bahsediyorsunuz. Örnek eklerseniz mutlaka çözüm alırsınız.

sayın mehmet demiral,
örneği ekledim. refresh yaptığım halde bi türlü güncelleyemiyor.
12/09/2009, 21:51

mehmetdemiral

Problem şu:
Değişkene bilgi göndermeden önce form2 açılıyor. KULLANICI= olarak başlayan satırınız docmd.openform satırının üstünde olmalı. Yani şöyle:

Kod:
Private Sub Komut4_Click()
If Me.w = Me.q.Column(1) Then
KULLANICI = Me.q.Column(0)

DoCmd.OpenForm "form2"

DoCmd.Close acForm, "form1"
End If

End Sub

Kolay gelsin..
1 2 3 4