Delphi-PRAXiS
Seite 2 von 3     12 3      

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Datenbanken (https://www.delphipraxis.net/15-datenbanken/)
-   -   Delphi Zugrif Access über ADO schreiben in Tabelle (https://www.delphipraxis.net/186925-zugrif-access-ueber-ado-schreiben-tabelle.html)

matashen 13. Okt 2015 11:33

AW: Zugrif Access über ADO schreiben in Tabelle
 
also das mit den zwei Komma hab ich echt nicht gesehen und hat wohl den Fehler geworfen.
jetzt bekomm ich aber eine neue Fehlermeldung :cry:

Datentypen in Kriterienausdruck unverträglich.

Ist das jetzt ein hinweis auf falschen Datentyp?

Da die Tabelle nicht von mir selber erstellt ist und ich dazu keine Doku habe kenne ich die Felder nicht.
Kann ich irgendwie abfragen wie die Felder aufgebaut sind? also welche Datentypen erwartet werden?

p80286 13. Okt 2015 11:36

AW: Zugrif Access über ADO schreiben in Tabelle
 
Zitat:

Zitat von matashen (Beitrag 1318519)
Ist das jetzt ein hinweis auf falschen Datentyp?

Ja!

Wie wäre es die Tabelle in Access zu öffnen?
Dann kannst Du auch erfahren welche Datentypen die einzelnen Felder haben.

Gruß
K-H

matashen 13. Okt 2015 11:44

AW: Zugrif Access über ADO schreiben in Tabelle
 
ja schön wenn ich ein Access hier hätte....

ich bin nur der doofie der irgendwie auf die Tabelle soll um ein paar Werte einzutragen
O-Ton Cheffe:
"Das bekommst du schon hin - nur ein paar Werte das kann ja nicht so schwer sein".

naja - quäl -

gut das ich mich mit Ado und Access noch nie beschäftigt habe.

jobo 13. Okt 2015 11:53

AW: Zugrif Access über ADO schreiben in Tabelle
 
Zitat:

Zitat von matashen (Beitrag 1318522)
ja schön wenn ich ein Access hier hätte....
..

Ok, darauf muss man erstmal kommen.

Versuch mal diese Query zu öffnen, damit kann man angeblich die Struktur auslesen:
Code:
SELECT MSysObjects.Name, msysobjects.datecreate, msysobjects.dateupdate, GetTableDescr([Name]) AS Description
FROM MSysObjects
WHERE (((MSysObjects.Name) Not Like "~*") AND((MSysObjects.Name) Not Like "MSys*") and ((MSysObjects.Type)=1));
hier kommt das her
http://stackoverflow.com/questions/1...-through-query

Dann hast Du eine Chance, es richtig zu machen.

Perlsau 13. Okt 2015 11:54

AW: Zugrif Access über ADO schreiben in Tabelle
 
Zitat:

Zitat von matashen (Beitrag 1318522)
ja schön wenn ich ein Access hier hätte....

Ein bißchen Phantasie und eigene Überlegung darf man von dir aber schon erwarten, oder?
Access Viewer

jobo 13. Okt 2015 11:59

AW: Zugrif Access über ADO schreiben in Tabelle
 
Zitat:

Zitat von Perlsau (Beitrag 1318524)

Auch eine gute Idee, ich wusste nicht, ob der Tabellenstrukturen anzeigt.

p80286 13. Okt 2015 12:19

AW: Zugrif Access über ADO schreiben in Tabelle
 
Wenn Du schon aune funktionierende ADO-Abfrage hast, dann könntest Du hiermit die Feldtypen auslesen:
Delphi-Quellcode:
for i:=0 to q.Fieldcount-1 do begin
    fname:=q.fields[i].Fieldname;
    case q.Fields[i].Datatype of
      ftUnknown  :   Ftyp:=' Unknown or undetermined';
      ftString   :   ftyp:=' Character or string field';
      ftSmallint :   ftyp:=' 16-bit integer field    ';
      ftInteger  :   ftyp:=' 32-bit integer field    ';
      ftWord      :   ftyp:=' 16-bit unsigned integer field';
      ftBoolean  :   ftyp:=' Boolean field            ';
      ftFloat    :   ftyp:=' Floating-point numeric field';
      ftCurrency :   ftyp:=' Money field              ';
      ftBCD         :   ftyp:=' Binary-Coded Decimal field';
      ftDate       :   ftyp:=' Date field               ';
      ftTime       :   ftyp:=' Time field               ';
      ftDateTime :   ftyp:=' lDate and time field     ';
      ftBytes    :   ftyp:=' Fixed number of bytes (binary storage)';
      ftVarBytes :   ftyp:=' Variable number of bytes (binary storage)';
      ftAutoInc  :   ftyp:=' Auto-incrementing 32-bit integer counter field';
      ftBlob       :   ftyp:=' Binary Large OBject field';
      ftMemo       :   ftyp:=' Text memo field         ';
      ftGraphic     :   ftyp:=' Bitmap field            ';
      ftFmtMemo  :   ftyp:=' Formatted text memo field';
      ftParadoxOle:   ftyp:=' Paradox OLE field';
      ftDBaseOle :   ftyp:=' dBASE OLE field ';
      ftTypedBinary:ftyp:=' Typed binary field';
      ftCursor   :   ftyp:=' Output cursor from an Oracle stored procedure (TParam only)';
      ftFixedChar :   ftyp:=' Fixed character field ';
      ftWideString:   ftyp:=' Wide string field    ';
      ftLargeInt :   ftyp:=' Large integer field  ';
      ftADT         :   ftyp:=' Abstract Data Type field';
      ftArray       :   ftyp:=' Array field          ';
      ftReference :   ftyp:=' REF field            ';
      ftDataSet  :   ftyp:=' DataSet field        ';
      ftOraBlob  :   ftyp:=' BLOB fields in Oracle 8 tables';
      ftOraClob  :   ftyp:=' CLOB fields in Oracle 8 tables ';
      ftVariant  :   ftyp:=' Data of unknown or undetermined type';
      ftInterface :   ftyp:=' References to interfaces (IUnknown)';
      ftIDispatch :   ftyp:=' References to IDispatch interfaces ';
      ftGuid       :   ftyp:=' globally unique identifier (GUID) values ';
      else ftyp:='!not known!';
    end;{case---------------------------------}
Gruß
K-H

matashen 13. Okt 2015 12:39

AW: Zugrif Access über ADO schreiben in Tabelle
 
Hi,

hab rausgefunden das ein Wert als Zahl übergeben werden muss, dann geht's. :roll:

Danke an euch.

Es wird jetzt ein Eintrag erstellt, dann bekomm ich aber erneut eine Fehlermeldung
ADOQuery1: CommandText gibt keine Ergebnismenge zurück.

Der Eintrag an sich wird in der Datenbank aber erstellt.

Gruß Matthias

PS:Phantasie darf man natürlich erwarten - ihr glaubt ja gar nicht wie viel Phantasie ich haben kann :evil:

baumina 13. Okt 2015 12:48

AW: Zugrif Access über ADO schreiben in Tabelle
 
Wahrscheinlich machst du ein Open statt einem ExecSQL.

matashen 13. Okt 2015 12:53

AW: Zugrif Access über ADO schreiben in Tabelle
 
nö, mach brav ein execsql


Alle Zeitangaben in WEZ +1. Es ist jetzt 09:30 Uhr.
Seite 2 von 3     12 3      

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024-2025 by Thomas Breitkreuz