+- AccessTr.neT (https://accesstr.net)
+-- Forum: Microsoft Access (https://accesstr.net/forum-microsoft-access.html)
+--- Forum: Access Cevaplanmış Soruları (https://accesstr.net/forum-access-cevaplanmis-sorulari.html)
+--- Konu Başlığı: Sorguda Kullanıcı Adını alma (/konu-sorguda-kullanici-adini-alma.html)
Sorguda Kullanıcı Adını alma - tufanbal - 07/11/2016
Herkese Merhaba;
Access sorgusu hazırlarken VB kodu kısmında kullanıcı adını almak için kullandığımız Environ("username") kalıbını sorguda kullanmak istiyorum fakat beceremedim. Sorguda böyle bir imkan var mıdır acaba?
Cvp: Sorguda Kullanıcı Adını alma - atoz112 - 07/11/2016
sayın tufanbal,
bahsettiğiniz talebinize yönelik olarak;
YÖNTEM 1
Public Function GetUserName() As String
GetUserName = CreateObject("WScript.Network").UserName
End Functionyukarıda kodları bir Modül'e ekleyip kaydediniz.sorguda
kullanici: GetUserName()ifadesini yazmak sureti ile kullanabilirsiniz.
YÖNTEM 2
Public Function getUserName() As String
getUserName = Environ("UserName")
End Functionyukarıda kodları bir Modül'e ekleyip kaydediniz.sorguda
kullanici: getUserName()ifadesini yazmak sureti ile kullanabilirsiniz.
YÖNTEM 3
Public Function Environ(Expression)
On Error GoTo Err_Environ
Environ = VBA.Environ(Expression)
Exit_Environ:
Exit Function
Err_Environ:
MsgBox Err.Number & " - " & Err.Description
Resume Exit_Environ
End Functionyukarıda kodları bir Modül'e ekleyip kaydediniz.sorguda
kullanici: Environ("USERNAME")ifadesini yazmak sureti ile kullanabilirsiniz.
bilginize...iyi çalışmalar,saygılar.
Cvp: Sorguda Kullanıcı Adını alma - tufanbal - 07/11/2016
Ellerinize sağlık. Yöntem 3 cazip geldi.
Cvp: Sorguda Kullanıcı Adını alma - atoz112 - 07/11/2016
sayın tufanbal,
her 3 yöntemde de aynı sonucu alırsınız.
elbette ki,tercih ve takdir sizindir.
3.Yöntem üzerinde ENVIRON ifadesi yazıyor diye kullanmanız şart değil.diğerleri ile de olmaktadır.
bilginize...iyi çalışmalar,saygılar.
Cvp: Sorguda Kullanıcı Adını alma - tufanbal - 08/11/2016
Paylaşımınız için teşekkürler.