Sie sind aktuell nicht angemeldet.

Funktionen: Einloggen  |  Neu registrieren  |  Suchen

Problem mit Prozedur
Autor: Junior Proggi
Datum: 24.06.02 09:21
Private Sub Form_Load() CenterForm Me Dim sDatum As String Dim eDatum As String Dim iWeekDay As Integer sDatum = Format$(DateAdd("d", -10, Date), "dd.mm.yy") eDatum = Format$(Now, "dd.mm.yy") mSQL = "SELECT * FROM tbl_smd_angebote WHERE Eingangsdatum BETWEEN #" & sDatum & "# AND #" & eDatum & "# ORDER BY Eingangsdatum DESC" Set dyS = mdbSMD.OpenRecordset(mSQL, dbOpenDynaset) lfliste.AddItem "ID Eingang Abgabe Kurzbezeichnung Angebot Ansprechpartner Umsatz" lfliste.AddItem "-----------------------------------------------------------------------------------------------------------------------" If dyS.RecordCount > 0 Then Do 'Wochentag prüfen iWeekDay = Weekday(CDate(dyS("Eingangsdatum"))) If iWeekDay <> 1 And iWeekDay <> 7 Then lfliste.AddItem CStr(dyS("ID")) & Space(3) & dyS!eingangsdatum & Space(4) & Format(dyS!soll_abgabetermin, "!@@@@@@@@@@") & " " & Format(dyS!kurzbez_angebot, "!@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@") & " " & Format(dyS!Ansprechpartner_Kunde, "!@@@@@@@@@@@@@@@@@@@@@") & " " & Format(dyS!Umsatz_über_Laufzeit, "0.00 €") End If dyS.MoveNext Loop Until dyS.EOF End If Set dyS = mdbSMD.OpenRecordset("tbl_smd_angebote", dbOpenDynaset) bfdatum1.Caption = "Datum : " & Space(4) & Format$(Now, "dd.mm.yyyy") End Sub Hier kommt immer der Laufzeitfehler 3075, es ging aber vor einiger Zeit. Was mach ich den wieder falsch ? Gruß JP

Problem mit Prozedur	60	Junior Proggi	24.06.02 09:21
Re: Problem mit Prozedur	43	Junior Proggi	24.06.02 09:22
Re: Problem mit Prozedur	212	Dieter	24.06.02 10:33
Re: Problem mit Prozedur	37	Junior Proggi	24.06.02 10:43
Re: Problem mit Prozedur	201	Dieter	24.06.02 10:49
Re: Problem mit Prozedur	42	Junior Proggi	24.06.02 10:53
Hab den Fehler ...(ot)	33	Junior Proggi	24.06.02 11:17

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