title image


Smiley Re: NT-Username
Hallo





so in etwa





Sub test()

Dim UserID

UserID = LCase(Environ("Username"))

If UserID = "aston66" Then

Stop

End If





End Sub


 

Gruß UweD

Über Rückmeldungen würde ich mich freuen



geschrieben von

Login

E-Mail:
  

Passwort:
  

Beitrag anfügen

Symbol:
 
 
 
 
 
 
 
 
 
 
 
 
 

Überschrift: