Tælle Tælle

select count(*) from mytable where myfelt = \'test\'

Hvordan får jeg resultatet ind i en variabel?

Variable := Query1.Fields[0].AsInteger;

pellelil>> Kan du ikke prøve at skrive en hel query?

select count(*) as Antal from mytable where myfelt = \'test\'

MyVar := MyQuery.FieldByName(\'Antal\').AsInteger;

MyQuery.Close;
MyQuery.SQL.Text := \'select count(*) as Antal from mytable where myfelt = \'\'test\'\' \';
MyQuery.Open;

MyVar := MyQuery.FieldByName(\'Antal\').AsInteger;

Jeg får fejlen: Field \'antal\' not found

Så prøv :
----------

MyQuery.Close;
MyQuery.SQL.Text := \'select count(*) from mytable where myfelt = \'\'test\'\' \';
MyQuery.Open;

MyVar := MyQuery.Field[0].AsInteger;

/Martin

Uanset hvad bliver variablen 0

Martinlind >> Den siger at feltet Field ikke blev fundet!

Prøv :


MyQuery.SQL.Text := \'select count(*) from mytable where myfelt LIKE \'\'%test%\'\' \';

hvad skriver du i din SQL.Text ??

LIKE = indeholder

Her koden der ikke virker!

Query1.Close;
Query1.SQL.Text := \'select count(*) from captur where dialnr LIKE \'\'%test%\'\' \';
Query1.Open;
Resultat := Query1.Field[0].AsInteger;
label2.Caption:= inttostr(resultat);

du skal bruge \' gnyfer og ikke \"

Det er to \'er og ikke et \"

Så er det meget mærkeligt det ikke virker, det var en alm paradox du kørte på ikk\' prøv lige at køre det samme statement i dbexplorer og se hvad den siger

menu -> database -> explorer

husk at i explorer skal du kun bruge en \' rundt om %test%

Kan man ikke gøre det uden SQL??

du kan prøve med filter på en table

Forsæt...

sæt filter := dialnr = \'*test*\';
og filtered := TRUE;
og læs recordcount

jeg er ikke helt sikker på filter syntaksten kig i onlinehjælpen

Hvordan skal den se ud??
table2.Filter:= dialnr = \'*test*\';
table2.Filtered:= TRUE;

ja noget i den stil, har ikke brugt det så meget da jeg som regl bruger SQL. kig lidt i onlinehjælpen og prøv at lege lidt med det, hvis du ikke kan få det til at virke er der kun den hårde vej : løb alle records igennem og tæl selv/manuelt hvis der står test i dialnr

Kan du ikke lige skrive hvor dan man gør det!

Hvad ??
Manuelt ?

Nedenstående er taget fra et af minde første programmer (derfor de vilde navne *GG*), og gør lige det du ønsker :)

  Q_Status_L_Udlaan.Close;
  Q_Status_L_Udlaan.SQL.Clear;
  Q_Status_L_Udlaan.SQL.Add(\'SELECT COUNT(*) AS recordcount FROM intouch\');
  Q_Status_L_Udlaan.SQL.Add(\'WHERE status = :Status\');
  Q_Status_L_Udlaan.ParamByName(\'Status\').AsString := \'test\';
  Q_Status_L_Udlaan.Open;

  L_Status_Udlaan_Update.Caption := IntToStr(Q_Status_L_Udlaan.FieldByName(\'recordcount\').AsInteger);


Snowball

Snowball >> det har han prøvet, det virkede ikke sagde han :(

Ja, men så vidt jeg kan se har han ikke prøvet hvor han brugte AS recordcount !? recordcount er ikke en variable jeg har lavet, men en som er i SQL !

Snowball

AS <Variable> er da std. SQL så om du siger AS Antal eller AS RecordCount skulle være et fedt, AS fortæller bare at resultatet skal lægges ind i en col. med det navn du angiver bagefter

Whatever ;)

Det virker uden problemer hos mig ;)

Snowball

Jamen det gør det også hos mig selv jeg skriver AS Antal, det er jo det der er det mærkelige