Google Groups no longer supports new Usenet posts or subscriptions. Historical content remains viewable.
Dismiss

CurrentUser als Standardwert in Tabelle

136 views
Skip to first unread message

Reinhard Papp

unread,
Oct 1, 2008, 7:20:00 AM10/1/08
to
Hallo !
Ich möchte den CurrentUser als Standardwert in Tabelle eintragen. Beim
Verspeichern der Tabelle wird der CurrentUser() brav in AktuellerBenutzer()
umgewandelt, aber dann bekomme ich die Fehlermeldung "Unbekannte Funktion
'CurrentUser' im Gültigkeitsausdruck oder Standardwert in 'TabName.FeldName'
Was fehlt da ?
Ich habe schon in den verfügbaren Newsgroup-Beiträgen gesucht udn auch
Donkarl 2.24 angesehen.. Ich glaube nicht dass es so kompliziert ist das
Problem zu lösen.
Danke für Rat und Hilfe,
reinhard

Jens Schilling

unread,
Oct 1, 2008, 7:30:22 AM10/1/08
to
Hallo, Reinhard

Mir kam das auch bekannt vor ;-)

http://groups.google.de/group/microsoft.public.de.access/browse_thread/thread/e26111c2c27f46f

--
Gruss
Jens
______________________________
11. AEK - Oktober 2008 ( www.donkarl.com/?AEK )
FAQ: http://www.donkarl.com


Karl Donaubauer

unread,
Oct 1, 2008, 7:36:59 AM10/1/08
to

Funktion im Standardwert
www.donkarl.com?FAQ3.3

--
HTH
Karl
********* Ich beantworte keine Access-Fragen per Email. *********
Access-FAQ: http://www.donkarl.com
Access-Entwickler-Konferenz: www.donkarl.com/?AEK
SQL Server-Entwickler-Konferenz: www.donkarl.com/?SEK

Gunter Avenius

unread,
Oct 1, 2008, 7:37:11 AM10/1/08
to
Hallo Reinhard,

Reinhard Papp schrieb folgendes:

CurrentUser kannst Du in einer Tabelle nicht als Standardwert
verwenden. Siehe auch: www.donkarl.com?FAQ3.3

Gruß
Gunter
--
__________________________________________________________
Access FAQ: http://www.donkarl.com
11. Access-Entwickler-Konferenz http://donkarl.com/?AEK
Nürnberg, 11./12.10. + 18./19.10. + 25./26.10.2008

home: http://www.avenius.com - http://www.AccessRibbon.de
http://www.ribboncreator.de

Raimo Becker

unread,
Oct 1, 2008, 7:37:01 AM10/1/08
to
Hallo Reinhard,

ich mach das mit einer Funktion, die den Windows Anmeldenamen ausliest.

Public Function WindowsName_anzeigen()
Dim EnvString, Indx, PathLen
Indx = 1
Do
EnvString = Environ(Indx)
If Left(EnvString, 9) = "USERNAME=" Then
' Get length.
PathLen = Len(Environ("USERNAME"))
Exit Do
Else
Indx = Indx + 1
End If
Loop Until EnvString = ""
If PathLen > 0 Then
WindowsName_anzeigen = Right(Environ("USERNAME"), PathLen)
Else
WindowsName_anzeigen = "unbekannt"
End If
End Function

Dann mit rs![Anmeldename]=WindowsName_anzeigen()
in die Backendtabelle eingetragen

Grüße
Raimo

Reinhard Papp

unread,
Oct 1, 2008, 10:49:01 AM10/1/08
to
Danke an alle die geholfen haben: dass ich diese DB auf Formulare umstellen
muss (ich habe sie geerbt) ist mir klar, es gibt auch einige sehr hässliche
nachschlage-felder.
Die Funktion von Raimo habe ich eingebaut: auch die geht wunderbar. Sie hat
auch den Vorteil dass sie den Windows namen anzeigt was ptäziser ist als der
currentUser.

"Gunter Avenius" wrote:

> Hallo Reinhard,
>
> Reinhard Papp schrieb folgendes:
> > Ich möchte den CurrentUser als Standardwert in Tabelle eintragen. Beim
>
>

0 new messages