AGB  ·  Datenschutz  ·  Impressum  







Anmelden
Nützliche Links
Registrieren
Zurück Delphi-PRAXiS Programmierung allgemein Datenbanken Delphi Create SQL und fülle sie mit Werten

Create SQL und fülle sie mit Werten

Offene Frage von "joachimd"
Ein Thema von nwns · begonnen am 15. Nov 2017 · letzter Beitrag vom 16. Nov 2017
Antwort Antwort
nwns

Registriert seit: 11. Okt 2017
2 Beiträge
 
#1

Create SQL und fülle sie mit Werten

  Alt 15. Nov 2017, 16:36
Datenbank: ADS • Version: 10 • Zugriff über: ADS Query
Hallo erstmal,
ich habe ein problem mit der erstellung einer SQL Tabelle.
Ich möchte gerne eine Tabelle mit 4 Rows füllen, mit Name, Datum, Uhrzeit, ID
wie mache ich dies ich möchte diese Procedure mit einem Button click ausführen.
Bin neuling.
Danke im Voraus
  Mit Zitat antworten Zitat
hoika

Registriert seit: 5. Jul 2006
Ort: Magdeburg
7.993 Beiträge
 
Delphi XE4 Professional
 
#2

AW: Create SQL und fülle sie mit Werten

  Alt 15. Nov 2017, 20:25
Hallo,
auch als Neuling gibt es Google

http://www.delphipraxis.net/73214-ad...e-per-sql.html
Heiko
  Mit Zitat antworten Zitat
Benutzerbild von himitsu
himitsu

Registriert seit: 11. Okt 2003
Ort: Elbflorenz
38.603 Beiträge
 
Delphi 10.4 Sydney
 
#3

AW: Create SQL und fülle sie mit Werten

  Alt 15. Nov 2017, 21:23
Er will doch kein CREATE TABLE sondern blos ein INSERT machen, oder klingt das nur so?

Also das INSERT-Statement manuell füllen und wegschicken (am Besten mit Parametern)
oder "SELECT * FROM ...", DataSet.Open, DataSet.Insert, DataSet.FieldByName().Value/.AsIrgendwas:=... und dann DataSet.Post.
Garbage Collector ... Delphianer erzeugen keinen Müll, also brauchen sie auch keinen Müllsucher.
Delphi-Tage 2005-2014
  Mit Zitat antworten Zitat
Benutzerbild von p80286
p80286

Registriert seit: 28. Apr 2008
Ort: Stolberg (Rhl)
6.658 Beiträge
 
Delphi 7 Personal
 
#4

AW: Create SQL und fülle sie mit Werten

  Alt 15. Nov 2017, 22:59
Da ich ADS nicht näher kenne, hier nur der prinzipielle Aufbau

Delphi-Quellcode:
procedure InsertinDB;
begin
  adsquery.sql:='insert into mytable (id,name,datum,uhrzeit) values(123,'willi wichtig','2017-01-01','23:12');
adsquery.execsql;
end;

procedure irgendwas.onclick;
begin
InsertinDB;
end;
Die Syntax ist nicht vollständig und korrekt!
Das soll nur den ungefähren Weg aufzeigen;

Gruß
K-H
Programme gehorchen nicht Deinen Absichten sondern Deinen Anweisungen
R.E.D retired error detector
  Mit Zitat antworten Zitat
Benutzerbild von joachimd
joachimd

Registriert seit: 17. Feb 2005
Ort: Weitingen
631 Beiträge
 
Delphi 10.4 Sydney
 
#5

AW: Create SQL und fülle sie mit Werten

  Alt 16. Nov 2017, 08:43
K-Hs Beispiel etwas verbessert:
Code:
procedure InsertinDB;
begin
  adsquery.close; //zur Sicherheit
  adsquery.sql:='insert into mytable (id,name,datum,uhrzeit) ';
  adsquery.sql.add(' values(:id, :name, :datum, :uhrzeit); ');

  //Werte
  adsquery.ParamByName('id').AsInteger := 123;
  adsquery.ParamByName('name').AsString := 'Willi Wichtig';
  adsquery.ParamByName('datum').AsDate := '1.1.2017'; //hier kann locale verwendet werden
  adsquery.ParamByName('uhrzeit').AsTime := '23:12';
  adsquery.execsql;

  // dann den Block ab "Werte" sooft, wie Daten kommen
  adsquery.ParamByName('id').AsInteger := 456;
  adsquery.ParamByName('name').AsString := 'Lisa Simson';
  adsquery.ParamByName('datum').AsDate := '1.10.2017'; //hier kann locale verwendet werden
  adsquery.ParamByName('uhrzeit').AsTime := '01:17';
  adsquery.execsql;

end;

procedure irgendwas.onclick;
begin
  InsertinDB;
end;
Joachim Dürr
Joachim Dürr Softwareengineering
http://www.jd-engineering.de
  Mit Zitat antworten Zitat
Themen-Optionen Thema durchsuchen
Thema durchsuchen:

Erweiterte Suche
Ansicht

Forumregeln

Es ist dir nicht erlaubt, neue Themen zu verfassen.
Es ist dir nicht erlaubt, auf Beiträge zu antworten.
Es ist dir nicht erlaubt, Anhänge hochzuladen.
Es ist dir nicht erlaubt, deine Beiträge zu bearbeiten.

BB-Code ist an.
Smileys sind an.
[IMG] Code ist an.
HTML-Code ist aus.
Trackbacks are an
Pingbacks are an
Refbacks are aus

Gehe zu:

Impressum · AGB · Datenschutz · Nach oben
Alle Zeitangaben in WEZ +2. Es ist jetzt 04:24 Uhr.
Powered by vBulletin® Copyright ©2000 - 2021, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2021 by Daniel R. Wolf