-
Forum: Datenbanken
Delphi
by LuckyStrike4life,
13. Jan 2004
Nun hab ichs,
der Fehler lag schon in der Zeile - wie du meintest.
Richtig muss sie in meinem Programm in der Art geschrieben stehen:
Query2.ParamByName('iDate').asDate := DateT.DateTime;
"Date" könnte nicht ausreichen, denn die Komponente hat von mir den Namen "DateT" bekommen, warum auch immer ;).
Bedanke mich für deine Hilfe, hast mich wirklich weiter gebracht.
-
Forum: Datenbanken
Delphi
by LuckyStrike4life,
13. Jan 2004
*seufz*
hab den Code nun so geschrieben:
sSQL: string;
procedure TForm1.Button2Click(Sender: TObject);
begin
Query2.Close;
Query2.SQL.Clear;
Query2.SQL.Text :=
'SELECT *' + #10 +
-
Forum: Datenbanken
Delphi
by LuckyStrike4life,
13. Jan 2004
Danke,
es läuft hier in der Art, dass jeder Mitarbeiter der eine Dienstreise machen muss, ein Auto haben kann, solange es noch nicht vergeben ist. Dienstreisen dauern für gewöhnlich ein Tag - wenn es länger dauert, dann muss der private Wagen genommen werden (gegen Entschädigung, klar).
Daher gibt es keine Feld, wann der PKW wieder da ist, sondern nur die Uhrzeit.
D.h. man könnte (und das...
-
Forum: Datenbanken
Delphi
by LuckyStrike4life,
13. Jan 2004
Verdammt,
da gibts noch n Problem mit deinem Code.
Er schaut jetzt im Programm so aus:
var
sSQL: string;
procedure TForm1.Button2Click(Sender: TObject);
begin
Query2.Close;
Query2.SQL.Clear;
-
Forum: Datenbanken
Delphi
by LuckyStrike4life,
12. Jan 2004
Interessant,
brauch ich für prepare ein neuen Query? Weil du Query1 geschrieben hast, ich momentan für den eigentlichen Code allerdings Query 2 nutze.
Wofür steht eigentlich '+ #10 +'? Nur damit ich auch mal n wenig was lerne.
-
Forum: Datenbanken
Delphi
by LuckyStrike4life,
12. Jan 2004
@sakura
Das war wirklich nicht meine Absícht, ich hab immer nur Fehlermeldungen vom Browser erhalten, und dann auf ein neues versucht. Das es am Ende so schlimm aussah, wusste ich nicht. Sorry.
Kleines Problem gibts noch mit dem Code.
Ich hab dafür ja ein Testprogramm erstellt, nun wollte ich es übernehmen.
Das Problem liegt in den verwendeten Komponenten,
die Abfrage welcher PKW...
-
Forum: Datenbanken
Delphi
by LuckyStrike4life,
9. Jan 2004
Ja, den Thread kannte ich auch schon ;).
Der Code ist interessant, so könnte man sogar (eventuell) nach der Uhrzeit gucken lassen. Aber alles nach und nach.
Jetzt fehlt mir noch n kleines Stück Wissen, bis ich den Code auch tatsächlich verwenden kann.
Es ist ja so, ein User trägt sein Antrag ein, dass Programm schaut ob an dem Tag das Auto welches er haben möchte frei ist, wenn ja - dann...
-
Forum: Datenbanken
Delphi
by LuckyStrike4life,
8. Jan 2004
Über Alias Namen von den DBs haben wir doch schon oft gesprochen, ich werds auch noch ändern, allerdings alles zu seiner Zeit ;).
-
Forum: Datenbanken
Delphi
by LuckyStrike4life,
8. Jan 2004
Verstehe, also '' anstatt ". Ich versuchs...
Also das:
''' + Datum2.text + '''' geht auch, sieht komisch aus - aber okay.
Gleiches Ergebnis wie mit ".
-
Forum: Datenbanken
Delphi
by LuckyStrike4life,
8. Jan 2004
Also die Klammer war nur ein Fehler, so würds natürlich nicht funktionieren.
Wenn ich keine Anführungsstriche um Datum setze, dann läßt es sich nicht compilieren. Da standen im Codebeispiel von eich Klammern. Die hab ich dann halt ausgetauscht, denn mit den Klammern gings auch nicht.
So nun hab ich mal noch n wenig getestet,
es schaut jetzt so aus - wenn im Feld Datum nichts eingetragen...
-
Forum: Datenbanken
Delphi
by LuckyStrike4life,
8. Jan 2004
BluesKid:
Thx, jetzt funktioniert es soweit.
Smokey:
Dein Rat fasse ich nicht böse auf. An sich muss ich noch sehr viel lernen, Strings und SQL gehört sicher mit dazu.
Wenn ich jetzt z.B.: QuotedString(PKW.text) schreibe, sagt Delphi das QuotedString ein undefinierter Bezeichner sei. Soll ichs als String deklarieren?
Aber gut, der Code funktioniert in der Forum:
Query2.Close;
-
Forum: Datenbanken
Delphi
by LuckyStrike4life,
8. Jan 2004
Danke,
du hast das Problem richtig erkannt.
Dein Programmcode sieht auch gut aus, hab das Beispielprogramm mal so verändert, dass die Daten aus normalen Edit Feldern abgegriffen werden.
Hab dann sSQL als String deklariert, schaut nun so aus:
var
sSQL: String;
procedure TForm1.Button1Click(Sender: TObject);
-
Forum: Datenbanken
Delphi
by LuckyStrike4life,
8. Jan 2004
Morgen,
ich hab ein Code geschrieben der soweit auch funktioniert.
Es ging darum das geschaut wird, ob ein Eintrag der in eine DB gespeichert werden soll, nicht möglich ist - weil Überschneidungen in den angeforderten PKWs zu Tag XX besteht.
Das geht mit SQL und schaut so aus:
Query2.Close;
Query2.SQL.Clear;
Query2.SQL.ADD ('SELECT * FROM "mainDB" WHERE dienst_pkw="Ford DM-162" and...