Access + CurrentUser

Thread View: pl.comp.bazy-danych.msaccess

2 messages

[T] Back to Threads [V] Tree View [G] Group Articles

2 total messages Started by Krzysztof Kozłowski Thu, 03 Dec 1998 07:04

#327

Author: Krzysztof Kozłowski
Date: Thu, 03 Dec 1998 07:04

8 lines
988 bytes

Czy jest jakas funkcja w VB for Access ktora zezwala na sczytanie nazwy
uzytkownika SYSTEMU Win (wpisywanego podczas logowania,a nie uzytkownika
Access (z pliku MDW)?

Prosze o odpowiedz na priva

Pozdroofko
Krzysztof Kozlowski

Re: Access + CurrentUser

#328

Author: Janusz Trąbiński
Date: Thu, 03 Dec 1998 13:51

39 lines
1832 bytes

Jest taka możliwość - oto przykład :

Function NetUserName() As String
    Dim lngReturn As Long
    Dim strBuffer As String * 255

    lngReturn = GetUserNameA(strBuffer, Len(strBuffer))
    If lngReturn Then
        NetUserName = left$(strBuffer, InStr(strBuffer, vbNullChar) - 1)
    End If

End Function


W module deklaracji umieść nastepująca deklarację :

Private Declare Function GetUserNameA Lib "advapi32.dll" (ByVal lpBuffer As
String, nSize As Long) As Long

i heja (możesz skopiować prosto do programu - to działa)


cześć !!!


Janusz  Trąbiński
if@bitstudio.com.pl



Krzysztof Kozłowski wrote in message <366645E0.66A1D634@friko.sos.com.pl>...
>Czy jest jakas funkcja w VB for Access ktora zezwala na sczytanie nazwy
>uzytkownika SYSTEMU Win (wpisywanego podczas logowania,a nie uzytkownika
>Access (z pliku MDW)?
>
>Prosze o odpowiedz na priva
>
>Pozdroofko
>Krzysztof Kozlowski

Thread Navigation

This is a paginated view of messages in the thread with full content displayed inline.

Messages are displayed in chronological order, with the original post highlighted in green.

Use pagination controls to navigate through all messages in large threads.

Back to All Threads