Sie sind aktuell nicht angemeldet.

Funktionen: Einloggen  |  Neu registrieren  |  Suchen

Mein Code
Autor: moonwalker
Datum: 22.10.01 10:36
Hier mal mein gesammter Code, der auf Buttonklick ausgelöst wird. Dein SQL-Befehlstext habe ich eingebaut, allerdings kommt die Fehlermeldung " Erwartet: Anweisungsende" Private Sub Command1_Click() On Error Resume Next If CDate(von.Text) > CDate(bis.Text) Then MsgBox "Bitte legen Sie einen sinnvollen Zeitraum fest.", vbExclamation, "Fehler" von.Text = "" bis.Text = "" Exit Sub End If Dim längeV, längeB As Integer Dim datum, mon, year As String längeV = Len(von.Text) längeB = Len(bis.Text) If längeV > 8 Or längeB > 8 Then MsgBox "Bitte für Tag, Monat und Jahr immer " & vbCrLf & "nur zweistellige Ziffern eingeben." & vbCrLf & "Beispiel: 01.01.01", vbInformation, "Falsche Eingabe" Exit Sub End If Set recWartung = New ADODB.Recordset '####################################################################### recWartung.Open "SELECT * FROM Abfrage1 WHERE erledigt = False And " & _ [nächsteWartung] Between #" & Format(Von,"m-d-yy") & "# And " & _ "#" & Format$(Bis, "m-d-yy") & "#),_ Verbindung , adOpenStatic, adLockOptimistic '####################################################################### Set DataGrid1.DataSource = recWartung Command2.Enabled = True End Sub

Abfrage	93	moonwalker	22.10.01 09:03
Re: Abfrage	431	Dieter	22.10.01 10:04
geht aber nicht	63	moonwalker	22.10.01 10:08
Mein Code	72	moonwalker	22.10.01 10:36
Kann es sein, dass was fehlt?	358	Dieter	22.10.01 10:40
Ehrlich gesagt habe ich keine Ahnung ....	60	moonwalker	22.10.01 10:48
Frage	60	moonwalker	22.10.01 10:54
Re: Frage	448	Dieter	22.10.01 11:17
Re: Frage	61	moonwalker	22.10.01 11:27
Ist auch klar	349	Dieter	22.10.01 11:33
AHA	139	moonwalker	22.10.01 11:36
Re: AHA	374	Dieter	22.10.01 12:37
Re: AHA	66	moonwalker	22.10.01 13:44
Dann eben so...	382	Dieter	22.10.01 14:06
Frage ????!!!!!!!	58	moonwalker	22.10.01 14:12
Klar!	384	Dieter	22.10.01 14:20
Re: Klar!	55	moonwalker	22.10.01 14:23
Gut angekommen! (oT)	325	Dieter	22.10.01 14:42
Hinweis	72	moonwalker	22.10.01 14:43
Re: AHA	50	moonwalker	22.10.01 14:05
Also, das war ein Telefonat (oT)	442	unbekannt	22.10.01 19:33

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