MessageBox ("Willkommen bei"+chr(9)+": "+"C/S/G"+chr(10)+ chr(10)+
"Datum"+chr(9)+chr(9)+": "+@day+" "+@mdayno+" "+@month+" "+@year+chr(10)+
"Zeit"+chr(9)+chr(9)+": "+@time+chr(10)+ chr(10)+
"User ID"+chr(9)+chr(9)+": "+@userid+chr(10)+
"Privileges"+chr(9)+chr(9)+": "+@priv+chr(10)+ chr(10)+
"Prozessor"+chr(9)+chr(9)+": "+@CPU+chr(10)+ chr(10)+
"Speed"+chr(9)+chr(9)+": "+@MHZ+" MHz"+chr(10)+
"Speicher"+chr(9)+chr(9)+": "+MemorySize()+" MB"+chr(10)+ chr(10)+
"OS-Name"+chr(9)+chr(9)+": "+@PRODUCTTYPE+chr(10)+
"OS-Version"+chr(9)+": "+@dos+chr(10)+ chr(10)+
"Terminal-Session"+chr(9)+": "+$TS+chr(10)+
"Domain"+chr(9)+chr(9)+": "+@domain+chr(10)+
"Logon Server"+chr(9)+": "+@lserver+chr(9)+chr(9)+chr(10)+
"Computername"+chr(9)+": "+@wksta+chr(10)+
"Node adress"+chr(9)+": "+@address+chr(10)+chr(10)+
$greeting, "Anmelde Information", 4160, 10)
; *********************************
; * Laufwerke Client mappen Anfang
; *********************************
use * /Delete
IF @TSSESSION <> 1
if ingroup("Mapping_R_Exchange-Archive")
use R: "\\SERVER\Exchange-Archive"
endif