Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
432to436
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
432to436
432to436
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

username

username
25.05.2004 21:30:08
NE
Hallo,
arrgh, wie war das bitte mit dem Username ?
thx NE ;-)
--

Sub q()
Open "c:\dummy\00.txt" For Append As #1
Print #1, Environ("UserName"), Now 'time klappt ja schonmal ;;-))
Close #1
End Sub

7
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: username
Oberschlumpf
Hi Nancy
Dein Code schreibt, genau wie er da steht, dies in die Datei C:\dummy\00.txt:
Gobi 25.05.2004 21:33:21
Gobi is mein Username :D
Ich weiß (noch) nicht, wo Du nun ein Prob siehst, freue mich aber über jedwegliche (Auf)klärung ;-)
Ciao
Thorsten
AW: username
25.05.2004 21:47:41
NE
Hi Thorsten,
huch, wie das ?
... bei mir steht da nur nur Now, und vorher nix,
also sprich nur Leerzeichen ..., Imho sollte doch da wie bei Dir Gobi
bei mir NE stehen, is aber nich, noch etwas verwirrt ... ;-)
nix 25.05.04 21:25:47
nix 25.05.04 21:27:09
nix 25.05.04 21:46:20
lg Nancy
Anzeige
AW: username
Reinhard
Hi Nancy,
Glaskugel befrag, du hast win98 oder so, Thorsten eine höhere Version.
Environ entspricht(bei win98) dem Set Befehl,
gib mal unter Dos
Set
ein, du siehst das Gleiche wie mit

Sub sett()
For n = 1 To 20
'Cells(n, 1) = Environ(n).Name
Cells(n, 1) = Environ(n)
Next n
End Sub

Und da gibts kein Userame=NE oder so...
Haha, auch mal was gewusst :-))
Gruß
Reinhard
AW: username
Ramses
Hallo
Nur zur Info: die Umgebungsvariablen gehen bis 27 ;-)
Gruss Rainer
AW: username
NE
Abend Reinhard,
thats crazy,
Nix Haha!! ;-) Muchas gracias, Bingo, Du hast recht mit win98, ich probier' das morgen nochmal unter 2k
s.u. bekomm' ich mit deinem codez,
sorry für die Glaskugel, die fehlt halt manchmal schon bei der Frage ;-)))
TMP=C:\WINDOWS\TEMP
TEMP=C:\WINDOWS\TEMP
PROMPT=$p$g
winbootdir=C:\WINDOWS
COMSPEC=C:\WINDOWS\COMMAND.COM
SOUND=C:\PROGRA~1\CREATIVE\CTSND
MIDI=SYNTH:1 MAP:E
STATION=ne
PATH=C:\Programme\Microsoft Office\Office\;C:\WINDOWS;C:\WINDOWS\COMMAND;C:\PROGRA~1\GEMEIN~1\AUTODE~1
CMDLINE=WIN
windir=C:\WINDOWS
BLASTER=A220 I10 D1 H1 P300 T6
vielen Dank Dir :-)
lg Nancy
--
ps: nicht zu ernst nehmen, aber wenn sowas geht,
kann man auch die win.ini anzeigen lassen ?
Anzeige
AW: username
26.05.2004 07:10:25
Well
So sollte es auch unter W98 gehen
Option Explicit
Private Declare

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

Sub asdf()
Dim sAnwender As String
sAnwender = String(255, Chr$(0))
GetUserName sAnwender, 255
sAnwender = Left$(sAnwender, InStr(sAnwender, Chr$(0)) - 1)
MsgBox sAnwender
End Sub

Fare Well
thx
NE
Hi Well Ness,
ich danke Dir :-)
cu NE

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige