SQL-Statement: String to Int

[barnti]

Hallo Forum,

ich möchte per ADODB eine Access-DB in einem Excelmakro abfragen:

Delphi-Quellcode:

Select
   Invoice.Kontaktaufkommen + ACQC.Kontaktaufkommen as Summe Kontaktaufkommen
FROM
...

Als Ergebnis bekomme ich zwei konkatenierte Strings, z.B.: 31 + 17 = 3117. Ich möchte aber die Summe der beiden Zahlen. Wie kann ich das in das Statement mitaufnehmen?

Danke für eure Aufmerksamkeit.

[mkinzler]

Kennt access CAST()?

[barnti]

Zitat von mkinzler:

Kennt access CAST()?

Ich habe es mit CInt versucht:

Delphi-Quellcode:

"SELECT " _
                    & "[Zeit], " _
                    & "CInt(Invoice.Kontaktaufkommen) + CInt(ACQC.Kontaktaufkommen) As Kontaktaufkommen, " _
                    & "[AHT()] As AHT, " _
                    & " FROM customer ACQC, Invoice" _
                    & " WHERE Datum = '" & FCDate & "' "

Das scheint nicht zu klappen. Auch bei Cast meckert Excell...

[hoika]

Hallo,

zeig doch mal das sql statement mit dem cast
und die "Meckermeldung" wäre auch nett


Heiko

[mkinzler]

Es gäbe noch die Alternative, die Berechnung in VBA anstatt im SQL-Statement durchzuführen.

[barnti]

Hi,

ehrlich gesagt ist mir nicht klar wie ich "Cast" benutze...

Mein Statement sieht jetzt so aus:

Delphi-Quellcode:

"SELECT " _
                    & " Invoice.Zeit, " _
                    & " Invoice.Kontaktaufkommen as IK, " _
                    & " Acquiredcustomer.Kontaktaufkommen as AK, " _
                    & " (CInt(Invoice.Kontaktaufkommen) + CInt(Acquiredcustomer.Kontaktaufkommen)) as Kontaktaufkommen " _
                    & " FROM Acquiredcustomer, Invoice" _
                    & " WHERE " _
                    & " Invoice.Zeit = Acquiredcustomer.Zeit" _
                    & " AND " _
                    & " Invoice.Datum = '" & FCDate & "' "

Danach bekomme ich folgende Werte:
IK: 10
AK: 16
Kontaktaufkommen: 26
Wobei in der Tabelle andere Werte stehen:
IK: 10
AK: 26

Das sollte also 36 für "Kontaktaufkommen" sein. Ich habe keine Ahnung warum diese Werte rauskommen...!? Kann mich jemand aufklären?

[mkinzler]

select ... cast (<feld> as <Typ>) ...

[barnti]

Mein Fehler. Es muss heißen:

Delphi-Quellcode:

"SELECT " _
                    & " Invoice.Zeit, " _
                    & " Invoice.Kontaktaufkommen as IK, " _
                    & " Acquiredcustomer.Kontaktaufkommen as AK, " _
                    & " (CInt(Invoice.Kontaktaufkommen) + CInt(Acquiredcustomer.Kontaktaufkommen)) as Kontaktaufkommen " _
                    & " FROM Acquiredcustomer, Invoice" _
                    & " WHERE " _
                    & " Invoice.Zeit = Acquiredcustomer.Zeit" _
                    & " AND " _
                    & " Invoice.Datum = '" & FCDate & "' " _
                    & " AND " _
                    & " Acquiredcustomer.Datum = '" & FCDate & "' "

Die zusätzliche Bedingung am Schluss liefert mir das Gewünschte! Danke für eure Aufmerksamkeit!

[barnti]

Zitat von mkinzler:

select ... cast (<feld> as <Typ>) ...

Danke für Deine Mühe. Ich habe mit CInt Erfolg gehabt!