Sie sind aktuell nicht angemeldet.

Funktionen: Einloggen  |  Neu registrieren  |  Suchen

Die Umsetzung:
Autor: berd01
Datum: 26.02.02 11:26
'Aktuellen Datensatz suchen Tabelle.FindFirst "Pos = " & CStr(lngPos) 'Abfragen ob Feld "Locked" auf Wahr od. Falsch steht If Tabelle.Fields(1) = False Then Tabelle.Edit Tabelle.Fields(1) = True Tabelle.Update 'Datenbank mit Lese-Schreibzugriff öffnen OpendatabaseReadAndWrite Else 'Textausgabe und anschließender abbruch MsgBox "Dieser Datensatz wird z.Zt. bearbeitet!" & vbCrLf & " Aktualisieren Sie Ihre Datenbank," & vbCrLf & " und versuchen Sie es zu einem Späteren Zeitpunkt nocheinmal", vbOKOnly + vbInformation, "Hinweis" Unload Me Exit Sub End If nach dem Speichern des datensatzes setze ich dann einfach Locked wieder auf False. cya Marcel

Idee----Mehrbenutzer...?	70	berd01	26.02.02 09:18
Re: Idee----Mehrbenutzer...?	200	Dieter	26.02.02 09:40
ha! geniale Idee........	49	berd01	26.02.02 09:47
QDieter: Anpassungsschwierigkeiten!	50	berd01	26.02.02 11:23
Die Umsetzung:	57	berd01	26.02.02 11:26

Sie sind nicht angemeldet! Um auf diesen Beitrag zu antworten oder neue Beiträge schreiben zu können, müssen Sie sich zunächst anmelden. Einloggen  |  Neu registrieren

Funktionen:  Zum Thema  |  Gesamtübersicht

Suchen