Nefunguje INSERT do mdb, chyba Parameter not found

[KarlosCZ]

Dobrý den, nemůžu vyřešit přidání řádku do .mdb. Sloupec Plr_Fname v té tabulce je, příkaz select s ním normálně funguje. Přesto dostávám hlášku AdoQuery1: Parameter 'Plr_Fname' not found. Totéž to hlásilo předtím u [year of birth] / nastavil jsem paramcheck na false a ten [year of birth] už nehlásí, zato jak jsem psal začal hlásit chybu u Plr_Fname. Netuší někdo prosím čím to je? Díky předem.

datamodule1.adoQuery1.SQL.Clear;
datamodule1.adoQuery1.SQL.Add('INSERT INTO judokas (Plr_Fname, Plr_Lname, [year of birth])');
datamodule1.adoQuery1.SQL.Add('VALUES (:Plr_Fname,:Plr_Lname,:[year of birth])');   
datamodule1.adoQuery1.Parameters.ParamByName('Plr_Fname').Value:= splitted[1];
datamodule1.adoQuery1.Parameters.ParamByName('Plr_Lname').Value:= splitted[0];
datamodule1.adoQuery1.Parameters.ParamByName('[year of birth]').Value:= strtoint(splitted[2]);
datamodule1.adoQuery1.ExecSQL;
datamodule1.adoQuery1.Close;

[Stanislav Hruška]

datamodule1.adoQuery1.SQL.Add('INSERT INTO judokas (Plr_Fname, Plr_Lname, [year of birth])');
datamodule1.adoQuery1.SQL.Add('VALUES (:Plr_Fname,:Plr_Lname,:[year of birth])');

Prvý riadok predpokladám v tvare:

Kód: [Vybrat]

datamodule1.adoQuery1.SQL.Add('INSERT INTO judokas (Plr_Fname, Plr_Lname, "year of birth")');
Druhý si uprav na

Kód: [Vybrat]

datamodule1.adoQuery1.SQL.Add('VALUES (:Plr_Fname, :Plr_Lname, :YearOfBirth)');
Ak je to možné, vyhoď zo všetkých názvov v mdb medzery! To je ako by si použil diakritiku. A nebudeš mať takéto problémy.

[KarlosCZ]

Díky, problém není v tom Year of birth, tam to řeší [], klasické uvozovky nefungují. Myslím, že problém je v celé té konstrukci, protože chybu to háže u Plr_Fname. Tam není mezera ani diakritika, při select to normálně funguje, při pokusu přidat řádek do dtabáze to ale píše AdoQuery1: Parameter 'Plr_Fname' not found. S těma mezerama jsem se dost natrápil, bohužel to nejde změnit. Nevím jak:-) a i kdybych věděl, ta databáze se aktualizuje a stahuje pokaždé znovu. Toho dobráka, co ji navrhoval, bych někdy rád potkal. Každopádně ten problém je v Plr_Fname, kde by ale vůbec žádný problém být neměl.

[leste]

Když vkládáš dotaz za běhu s vypnutým paramcheckem tak ty parametry asi nezná.

[KarlosCZ]

  aha, no jasně. Tím se to ale vrací k chybě u Year of birth. Nejlepší by bylo ten sloupec přejmenovat na Year_of_Birth v celém mdb. Zkoušel jsem to googlit ale nenašel jsem řešení. Jde to nějak udělat za běhu? Zrušil bych tak všechny mezery i v ostatních sloupcích a měl bych klid. Ale nechápu, proč když SELECT bez problému funguje, když je to ve tvaru [Year of Birth] a insert tak nefunguje. Nefunguje ani s apostrofy a uvozovkami a ani yearofbirth bez mezer, což je asi logické.

[Ondřej Pokorný]

Vždyť ti to už napsal Standa. Parametr nemusí být shodný s názvem sloupce. Změň jméno parametru:

Kód: [Vybrat]

datamodule1.adoQuery1.SQL.Add('VALUES (:Plr_Fname, :Plr_Lname, :YearOfBirth)');
datamodule1.adoQuery1.Parameters.ParamByName('YearOfBirth').Value:= strtoint(splitted[2]);

Pochybuju, že Delphi umí paramtery s [], i když jsem si to neověřoval.

[pf1957]

Zkoušel jsem to googlit ale nenašel jsem řešení. Jde to nějak udělat za běhu? Zrušil bych tak všechny mezery i v ostatních sloupcích a měl bych klid.

Abys mohl neco googlit, tak to znamena, ze si nekde prectes aspon zaklady prace s databazi...

Samozrejme to jde. Nektere RDBMS umi primo prejmenovat sloupec, nekde se to musi obejit posloupnosti:

Kód: SQL [Vybrat]

1. ALTER TABLE XXX ADD COLUMN YYY .....;
2. UPDATE TABLE XXX SET YYY = "Y Y Y";
3. ALTER TABLE XXX DROP COLUMN "Y Y Y";
4.  

a pokud puvodni sloupec participoval na nejakem indexu nebo constraintu, musi se analogicky dropnout a vytvorit znovu s novym sloupcem.

Podrobnosti viz SQL DDL a referece guide konkretrniho RDBMS.

[pf1957]

Zrušil bych tak všechny mezery i v ostatních sloupcích a měl bych klid.

A kdybys to nahodou delal, tak zrus i ta priblba podtrzitka - to je na platforme Delphi cizorody prvek, tady se pouziva Camel case.

[Stanislav Hruška]

Podľa koncovky predpokladám, že sa jedná o Access. Ale ja neviem aké rozšírenie používa MS SQL , keď už si to hodil do tejto sekcie.
Jedná sa o ten Access?
Access má trochu zradu v tom, že je rozdiel kde sa ten SQL text tvorí. Má rozdielny syntax!!! A ak k tomu pridáme syntax v Delphi, tak to je občas celkom sranda
Pre Access mám múdru knihu. Takže sa môžem pozrieť.

[KarlosCZ]

tak jsem to přejmenoval a je po starostech - částečně. Každopádně díky. Teď musím ještě vyřešit, proč se sice insert provede, ale databáze zůstane nezměněná a ta data se tam nezapíšou.

[KarlosCZ]

Podľa koncovky predpokladám, že sa jedná o Access.

ano je to acces

[KarlosCZ]

Ještě "drobnost". Aby to přejmenování fungovalo, musí být uvedený typ sloupce a v druhém příkazu nesmí být TABLE....

datamodule1.ADOQuery1.sql.add ('ALTER TABLE judokas ADD COLUMN [YearOfBirth] INTEGER');
datamodule1.ADOQuery1.sql.add ('UPDATE [judokas] SET [YearOfBirth] = [Year Of Birth]');

Proč to odmítá fungovat s jakýmkoliv jiným typem než INTEGER nevím:-) a ani mě to netrápí:-)

[pf1957]

Ještě "drobnost". Aby to přejmenování fungovalo, musí být uvedený typ sloupce a v druhém příkazu nesmí být TABLE....

To jsem ti taky jenom nastinil princip, jak se to dela. Ze tam ma byt typ sloupce, to jsou ty tecky za YYY (urcite tam nejaky CHAR, VARCHAR, NVARCHAR apod. pujde taky)
a ze jsem u update pripsal TABLE - no jsem starej vul a HOSIP a primo SQL prikazy uz jsem nepsal nekolik let: dnes jen upravim definici tridy (v C#) a vetsinou jen pasivne zkouknu, co mi framework vygeneroval za evolucni skript.

[Stanislav Hruška]

Na insert, update či zmenu DB máš správne použiť TADOCommand.

[pf1957]

Na insert, update či zmenu DB máš správne použiť TADOCommand.

Clovece ja nevim, jestli je to spravne doporuceni. Predstav si, ze za nejaky ten insert/update pridas RETURNING .... ev. ho zmenis na SP a ta SP bude vracet nejaky result set...
Kdyz pouzijes Query, tak zmenis jen SQL (a Open misto Execute), ale pokud pouzijes ten command (teda je mozne, ze se pletu a ze lze na nem taky vyloudit result set), tak jeste budes muset nahrazovat command za query.

Osobne bych to pouzil snad jenom tam, kde honim vykon a delam nejake bulk inserty. Jinak bych vsude pracoval jenom s Query a to jeste za predpokladu, ze to bude nejaky light-weight widget oproti Query.

[KarlosCZ]

Poslední věc a už nebudu otravovat:-) Ten kód níž funguje ve smyslu "nevyhodí chybu", nicméně do databáze se uloží nuly ve sloupcích se jmény a rokem a nic ve sloupci membernumber. Nějak to ale pracuje, protože je tam sloupec added, kde je čas modifikace, který se tam objeví. Nevím proč se to neukládá. Poradíte?
       
        adoQuery1.SQL.Add('INSERT INTO judokas (Plr_Fname,Plr_Lname, [YearOfBirth], [MemberNumber])');
        adoQuery1.SQL.Add('VALUES (:Plr_Fname,:Plr_Lname,:yearofbirth, :membernumber)');
        adoQuery1.Parameters.ParamByName('Plr_Fname').Value:= splitted[0];
        adoQuery1.Parameters.ParamByName('Plr_Lname').Value:= splitted[1];
        adoQuery1.Parameters.ParamByName('yearofbirth').Value:= strtoint(splitted[2]);
        adoQuery1.Parameters.ParamByName('membernumber').Value:= 56886;
        datamodule1.adoQuery1.ExecSQL;
        datamodule1.adoQuery1.Close;

[Stanislav Hruška]

Predstav si, ze za nejaky ten insert/update pridas RETURNING .... ev. ho zmenis na SP a ta SP bude vracet nejaky result set...

Ako pripomienku to beriem. Takto ma to nenapadlo. Ale v Access-e si to predstaviť neviem   Neviem ako RETURNING, ale SP nemá.

Nevím proč se to neukládá.

Ťažko mi je radiť, ale mne sa niečo podobné stáva, keď Query používam opakovane a pred priradením hodnôt do parametrov som nevykonal Close. Hodnoty v parametroch sa nezmenia. Ale to tam v ukážke máš. A nemáš tam cyklus/opakovanie. Neviem ako to adoQuery1 používaš a či na viacerých miestach. Ak áno, tak tam mi na začiatku chýba

Kód: [Vybrat]

adoQuery1.SQL.Close;  // Ak to zaistíš inde, tak tu to vypadne.
adoQuery1.SQL.Clear;
...
Lenže, keby si tam už mal nejaký text, tak by to zaryčalo   Aha, v prvej ukážke to Clear máš. Prever ten Close.
Tie hranaté zátvorky [] vyhoď. Sú tam úplne zbytočne. Či robia neplechu netuším.

[KarlosCZ]

Díky, Close tam mám, celé to zavírám při vstupu na PageControl preventivně. Tím to není.

[Stanislav Hruška]

Už len špekulujem. V ostatných INSERT INTO prípadoch Ti to ide?

Ja som v minulosti používal AdoCommand a nemal som problém. Teraz už používam len FireDAC. Pokiaľ si to môžeš dovoliť, tak ho použi aj Ty. Ďalšia rada je vytvárať tieto komponenty za behu. Ja len výnimočne používam niektorý komponent na viacej účelov. Veľmi sa to mieša a program je neprehľadný. Chyba je tam raz-dva.

Hop, teraz ma napadlo, že občas niektorý ADO komponent zblbne. Ale nie keď sa vytvárajú dynamicky. Takže skús adoQuery1 zmazať a znovu ho vytvoriť.

Zo seba už viac nevydolujem.

[Stanislav Hruška]

Neviem či to pomôže. Podľa knihy som si vizuálne nadefinoval dopyt s parametrom IDmeno. A výsledok v SQL je takýto:

Kód: [Vybrat]

SELECT BytCislo.BytCislo, Byvajuci.Priezvisko, Byvajuci.Meno
FROM BytCislo INNER JOIN Byvajuci ON BytCislo.BytCisloID = Byvajuci.BytCisloID
WHERE (((Byvajuci.ByvajuciID)=[IDmeno]));