[delphi/mysql] update query

[Verwijderd]

Ik wil in een delphi programma met een mysql database een update query uitvoeren, maar ik krijg steeds een foutmelding.
Ik gebruik de volgende code :

code:

q1.Sql.clear;
q1.Sql.Add('UPDATE kantinedienst');
q1.Sql.Add('SET kantinedienstNaam = '''+new_naam.Text+'''');
q1.Sql.Add('SET type = '''+new_type.Text+'''');
q1.Sql.Add('WHERE kantinedienstID = ('''+change_kid.Text+''')');
q1.execsql;
showmessage('Kantinedienst is gewijzigd');

Iemand suggesties hoe dit te moeten veranderen?

[Eskimootje]

Welke foutmelding krijg je dan?

[Erkens]

volgens mij kan je execsql alleen doen met select?
_{maar het is voor mij al zolang geleden dat ik met delphi gewerkt hebt, dus zeker weten doe ik het niet}

[ Voor 54% gewijzigd door Erkens op 28-05-2003 17:37 ]

[Helox-in-a-box]

is je SQL query wel goed? moet volgens mij een komma na de eerste 'SET kantinedienstNaam'

[drm]

Lezen
Dan even herformuleren onder de stippellijn

 

[Verwijderd]

De foutmelding gaat om een SQL syntax fout in de buurt van 'SET type = '''+new_type.Text+'''');q1.Sql.Add('WHERE kantinedienstID = ('''+change_kid.Text+''')');

maar ik zou niet weten wat hier fout is.

[Sybr_E-N]

@Erkens: De functie Open is er voor select statements en ExecSQL voor de query's waar je geen result van terug krijgt.

[ Voor 7% gewijzigd door Sybr_E-N op 28-05-2003 17:43 ]

[Erkens]

Sybr_E-N schreef op 28 May 2003 @ 17:42:
De functie Open is er voor select statements en ExecSQL voor de query's waar je geen result van terug krijgt.

ok, dat was het dus, ik wist dat er een verschil was

[Just_a_Gamer]

Verwijderd schreef op 28 May 2003 @ 17:34:
Ik wil in een delphi programma met een mysql database een update query uitvoeren, maar ik krijg steeds een foutmelding.
Ik gebruik de volgende code :

code:

q1.Sql.clear;
q1.Sql.Add('UPDATE kantinedienst');
q1.Sql.Add('SET kantinedienstNaam = '''+new_naam.Text+'''');
q1.Sql.Add('SET type = '''+new_type.Text+'''');
q1.Sql.Add('WHERE kantinedienstID = ('''+change_kid.Text+''')');
q1.execsql;
showmessage('Kantinedienst is gewijzigd');

Iemand suggesties hoe dit te moeten veranderen?

ExecSQL is wel goed. Voor select statements moet je Open of active is true zetten. Als je UPDATE, INSERT of DELETE doet dan moet je ExecSQL gebruiken.

Ik heb zo'n vermoden dat die ( ) bij je where statement onnodig is. En als kantinedienstID een integer is dan hoeft er geen quotes omheen.

[edit] je had al de foutmelding gegeven tijdens mijn posting

[ Voor 17% gewijzigd door Just_a_Gamer op 28-05-2003 17:45 ]

[whoami]

Het heeft te maken met spaties vermoed ik

Als je eens kijkt hoe jouw sql - statement eruit ziet, denk ik dat je zoiets zal krijgen:

code:

UPDATE kantinedienstSET kantinedienstnaam='....' ...

Zoals je ziet is die SET aan die kantinedienst geplakt. Zorg er eens voor dat er een spatie tussen komt. (Dit is ook het geval bij de WHERE).
Ow, ik zie ondertussen dat het al opgelost was.
Blijkbaar zorgt die Add er dus wel voor dat er spaties tussen komen. Die komma moet er idd ook staan.

Trouwens, waarom maak je geen gebruik van parameters? Zo veel veiliger en makkelijker.

code:

q1.SQL.Text := 'UPDATE klantendienst SET kantinenaam = :p_naam WHERE ID = :p_ID';
q1.ParamByName ('p_naam').AsString := new_naam.Text;
q1.ParamByName ('p_ID').AsInteger := StrToInt(id.Text);
q1.ExecSQL();

En zoals Just a Gamer al zegt, rond numerieke waardes mag je geen quotes zetten, maar als je parameters gebruikt ben je van dat ganse gedoe al af.

[ Voor 20% gewijzigd door whoami op 28-05-2003 21:07 ]

[cimbom]

q1.Sql.Add('SET kantinedienstNaam = '''+new_naam.Text+'''');
q1.Sql.Add('SET type = '''+new_type.Text+'''');
die tweede set mag weg denk ik.. en wel met komma's scheiden set kantinedienstnaam ='bdfdfd' , type ='dfgdg'