[MySQL]Aide à un débutant

**Truebison** · 17/08/2007, 16h23

Bonjour, étant débutant en Delphi, et pas très doué en programmation, après avoir silloné le net, je me rabat sur vous.

Je dois développer sous Delphi for PHP, et déjà au départ j'ai quelque problème pour mes requêtes. J'ai installé EasyPhp afin de m'entrainer et d'avoir un serveur apache et une base Mysql sous la main.

J'essaye de créer un "insert" en utilisant le "query" (je ne connais même pas le mot pour désigner le navigateur à côté, pour vous dire à quel point je suis une cloche) mais quand je met cette requête dans le champ:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

insert into hihi('id','name') values (9, 'hoho')

j'ai une erreur qui me donne:

Application raised an exception class ADODB_Exception with message 'mysql error: [1064: Erreur de syntaxe près de ''id','name') values (9, 'hoho') LIMIT 0,10' à la ligne 1] in EXECUTE("insert into hihi('id','name') values (9, 'hoho') LIMIT 0,10")
'
Callstack #0 File: C:\Documents and Settings\Treunet\Mes documents\Delphi for PHP Projects\training\Last\unit_datamodule.php Line: 28
|_Callstack #1 File: C:\program files\CodeGear\delphi for php\1.0\vcl\classes.inc.php Line: 1213
|_Callstack #2 File: C:\program files\CodeGear\delphi for php\1.0\vcl\classes.inc.php Line: 1243
|_Callstack #3 File: C:\program files\CodeGear\delphi for php\1.0\vcl\classes.inc.php Line: 489
|_Callstack #4 File: Line:
|_Callstack #5 File: C:\program files\CodeGear\delphi for php\1.0\vcl\classes.inc.php Line: 415
|_Callstack #6 File: C:\program files\CodeGear\delphi for php\1.0\vcl\classes.inc.php Line: 846
|_Callstack #7 File: C:\program files\CodeGear\delphi for php\1.0\vcl\dbtables.inc.php Line: 510
|_Callstack #8 File: C:\program files\CodeGear\delphi for php\1.0\vcl\db.inc.php Line: 1117
|_Callstack #9 File: C:\program files\CodeGear\delphi for php\1.0\vcl\dbtables.inc.php Line: 693
|_Callstack #10 File: C:\program files\CodeGear\delphi for php\1.0\vcl\system.inc.php Line: 190
|_Callstack #11 File: C:\program files\CodeGear\delphi for php\1.0\vcl\dbtables.inc.php Line: 1089
|_Callstack #12 File: C:\program files\CodeGear\delphi for php\1.0\vcl\db.inc.php Line: 1136
|_Callstack #13 File: C:\program files\CodeGear\delphi for php\1.0\vcl\db.inc.php Line: 933
|_Callstack #14 File: C:\program files\CodeGear\delphi for php\1.0\vcl\db.inc.php Line: 924
|_Callstack #15 File: C:\program files\CodeGear\delphi for php\1.0\vcl\dbtables.inc.php Line: 576
|_Callstack #16 File: C:\program files\CodeGear\delphi for php\1.0\vcl\dbtables.inc.php Line: 179
|_Callstack #17 File: C:\program files\CodeGear\delphi for php\1.0\vcl\adodb\drivers\adodb-mysql.inc.php Line: 490
|_Callstack #18 File: C:\program files\CodeGear\delphi for php\1.0\vcl\adodb\adodb.inc.php Line: 882
|_Callstack #19 File: C:\program files\CodeGear\delphi for php\1.0\vcl\adodb\adodb.inc.php Line: 907

Et si je retire les ' pour les paramètres, j'ai:

hihi

Application raised an exception class ADODB_Exception with message 'mysql error: [1064: Erreur de syntaxe près de 'LIMIT 0,10' à la ligne 1] in EXECUTE("insert into hihi(id,name) values (9, hoho) LIMIT 0,10")
'
Callstack #0 File: C:\Documents and Settings\Treunet\Mes documents\Delphi for PHP Projects\training\2\unit6.php Line: 35
|_Callstack #1 File: C:\program files\CodeGear\delphi for php\1.0\vcl\classes.inc.php Line: 1213
|_Callstack #2 File: C:\program files\CodeGear\delphi for php\1.0\vcl\classes.inc.php Line: 1243
|_Callstack #3 File: C:\program files\CodeGear\delphi for php\1.0\vcl\classes.inc.php Line: 489
|_Callstack #4 File: Line:
|_Callstack #5 File: C:\program files\CodeGear\delphi for php\1.0\vcl\classes.inc.php Line: 415
|_Callstack #6 File: C:\program files\CodeGear\delphi for php\1.0\vcl\classes.inc.php Line: 846
|_Callstack #7 File: C:\program files\CodeGear\delphi for php\1.0\vcl\dbtables.inc.php Line: 510
|_Callstack #8 File: C:\program files\CodeGear\delphi for php\1.0\vcl\db.inc.php Line: 1117
|_Callstack #9 File: C:\program files\CodeGear\delphi for php\1.0\vcl\dbtables.inc.php Line: 693
|_Callstack #10 File: C:\program files\CodeGear\delphi for php\1.0\vcl\system.inc.php Line: 190
|_Callstack #11 File: C:\program files\CodeGear\delphi for php\1.0\vcl\dbtables.inc.php Line: 1089
|_Callstack #12 File: C:\program files\CodeGear\delphi for php\1.0\vcl\db.inc.php Line: 1136
|_Callstack #13 File: C:\program files\CodeGear\delphi for php\1.0\vcl\db.inc.php Line: 933
|_Callstack #14 File: C:\program files\CodeGear\delphi for php\1.0\vcl\db.inc.php Line: 924
|_Callstack #15 File: C:\program files\CodeGear\delphi for php\1.0\vcl\dbtables.inc.php Line: 576
|_Callstack #16 File: C:\program files\CodeGear\delphi for php\1.0\vcl\dbtables.inc.php Line: 179
|_Callstack #17 File: C:\program files\CodeGear\delphi for php\1.0\vcl\adodb\drivers\adodb-mysql.inc.php Line: 490
|_Callstack #18 File: C:\program files\CodeGear\delphi for php\1.0\vcl\adodb\adodb.inc.php Line: 882
|_Callstack #19 File: C:\program files\CodeGear\delphi for php\1.0\vcl\adodb\adodb.inc.php Line: 907

Pouvez-vous m'aider svp à me dire où est mon erreur?

**AL1986** · 17/08/2007, 19h16

Envoyé par truebison

Et si je retire les ' pour les paramètres, j'ai:

C'est à dire ça :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

insert into hihi(id,name) values (9, 'hoho')

ou ça :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

insert into hihi(id,name) values (9, hoho)

parce que ton erreur suggèrerait plutôt la deuxième écriture que j'estime être erronée.

**Truebison** · 20/08/2007, 06h37

En fait, je sais que la 2e proposition n'est pas correct, mais ce relevé d'erreur fait partie d'une série de test que j'ai effectué à un moment car ça me précisais qu'il y avait une erreur à chaque fois avant les guillemets. Mais j'ai essayé toutes les écritures possibles, comprenant ou pas les '.

**AL1986** · 20/08/2007, 12h22

Peux-tu envoyer le code Delphi que tu exécutes ?

**Truebison** · 20/08/2007, 15h23

j'imagine qu'il faut que je mette également le fichier xml, sinon ça n'aura pas grand sens (du moins, je le pense, j'ai remarqué que c'est là que se trouve toutes les données)

Pour la fiche principale:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
<?php
        //Includes
        require_once("vcl/vcl.inc.php");
        require_once("unit_datamodule.php");
        use_unit("dbgrids.inc.php");
        use_unit("forms.inc.php");
        use_unit("extctrls.inc.php");
        use_unit("stdctrls.inc.php");
 
        //Class definition
        class Unit1 extends Page
        {
               public $DBGrid1 = null;
        }
 
        global $application;
 
        global $Unit1;
 
        //Creates the form
        $Unit1=new Unit1($application);
 
        //Read from resource file
        $Unit1->loadResource(__FILE__);
 
        //Shows the form
        $Unit1->show();
 
?>

Le fichier xml de la fiche principale:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
<?php
<object class="Unit1" name="Unit1" baseclass="page">
  <property name="Background"></property>
  <property name="Caption">Unit1</property>
  <property name="DocType">dtNone</property>
  <property name="Font">
    <property name="Align">taNone</property>
    <property name="Case"></property>
    <property name="Color"></property>
    <property name="Family">Verdana</property>
    <property name="LineHeight"></property>
    <property name="Size">10px</property>
    <property name="Style"></property>
    <property name="Variant"></property>
    <property name="Weight"></property>
  </property>
  <property name="Height">600</property>
  <property name="IsMaster">0</property>
  <property name="Layout">
    <property name="Cols">5</property>
    <property name="Rows">5</property>
    <property name="Type">ABS_XY_LAYOUT</property>
  </property>
  <property name="Name">Unit1</property>
  <property name="Width">800</property>
  <property name="OnAfterShow"></property>
  <property name="OnAfterShowFooter"></property>
  <property name="OnBeforeShow"></property>
  <property name="OnBeforeShowHeader"></property>
  <property name="OnCreate"></property>
  <property name="OnShow"></property>
  <property name="OnShowHeader"></property>
  <property name="OnStartBody"></property>
  <property name="OnTemplate"></property>
  <object class="DBGrid" name="DBGrid1" >
    <property name="DataSource">Unit2.dshihi1</property>
    <property name="Font">
        <property name="Align">taNone</property>
        <property name="Case"></property>
        <property name="Color"></property>
        <property name="Family">Verdana</property>
        <property name="LineHeight"></property>
        <property name="Size">10px</property>
        <property name="Style"></property>
        <property name="Variant"></property>
        <property name="Weight"></property>
    </property>
    <property name="Height">200</property>
    <property name="Left">254</property>
    <property name="Name">DBGrid1</property>
    <property name="Top">373</property>
    <property name="Width">400</property>
    <property name="OnAfterShow"></property>
    <property name="OnBeforeShow"></property>
    <property name="OnShow"></property>
    <property name="jsOnRowChanged"></property>
    <property name="jsOnRowSaved"></property>
  </object>
</object>
?>

Le data module:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
<?php
        require_once("vcl/vcl.inc.php");
        //Includes
        require_once("fiche_princ.php");
        use_unit("db.inc.php");
        use_unit("dbtables.inc.php");
        use_unit("forms.inc.php");
        use_unit("extctrls.inc.php");
        use_unit("stdctrls.inc.php");
 
        //Class definition
        class Unit2 extends DataModule
        {
               public $Query1 = null;
               public $dshihi1 = null;
               public $dbmysql1 = null;
        }
 
        global $application;
 
        global $Unit2;
 
        //Creates the form
        $Unit2=new Unit2($application);
 
        //Read from resource file
        $Unit2->loadResource(__FILE__);
 
?>

Le fichier xml du module:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
<?php
<object class="Unit2" name="Unit2" baseclass="datamodule">
  <property name="Height">600</property>
  <property name="Name">Unit2</property>
  <property name="Width">800</property>
  <property name="OnAfterShow"></property>
  <property name="OnBeforeShow"></property>
  <property name="OnShow"></property>
  <object class="Table" name="tbhihi1" >
        <property name="Left">392</property>
        <property name="Top">222</property>
    <property name="Database">dbmysql1</property>
    <property name="MasterFields">a:0:{}</property>
    <property name="MasterSource"></property>
    <property name="Name">tbhihi1</property>
    <property name="TableName">hihi</property>
    <property name="OnAfterCancel"></property>
    <property name="OnAfterClose"></property>
    <property name="OnAfterDelete"></property>
    <property name="OnAfterEdit"></property>
    <property name="OnAfterInsert"></property>
    <property name="OnAfterOpen"></property>
    <property name="OnAfterPost"></property>
    <property name="OnBeforeCancel"></property>
    <property name="OnBeforeClose"></property>
    <property name="OnBeforeDelete"></property>
    <property name="OnBeforeEdit"></property>
    <property name="OnBeforeInsert"></property>
    <property name="OnBeforeOpen"></property>
    <property name="OnBeforePost"></property>
    <property name="OnDeleteError"></property>
  </object>
  <object class="Database" name="dbmysql1" >
        <property name="Left">64</property>
        <property name="Top">222</property>
    <property name="Connected">1</property>
    <property name="DatabaseName">mysql</property>
    <property name="Dictionary"></property>
    <property name="DriverName">mysql</property>
    <property name="Host">localhost:3306</property>
    <property name="Name">dbmysql1</property>
    <property name="UserName">testeur</property>
    <property name="UserPassword">test</property>
    <property name="OnAfterConnect"></property>
    <property name="OnAfterDisconnect"></property>
    <property name="OnBeforeConnect"></property>
    <property name="OnBeforeDisconnect"></property>
  </object>
  <object class="Datasource" name="dshihi1" >
        <property name="Left">256</property>
        <property name="Top">238</property>
    <property name="Dataset">Query1</property>
    <property name="Name">dshihi1</property>
  </object>
  <object class="Query" name="Query1" >
        <property name="Left">147</property>
        <property name="Top">233</property>
    <property name="Active">1</property>
    <property name="Database">dbmysql1</property>
    <property name="Name">Query1</property>
    <property name="Params">a:0:{}</property>
    <property name="SQL"><![CDATA[a:1:{i:0;s:44:&quot;insert into hihi(id,name) values (9, 'hoho')&quot;;}]]></property>
    <property name="TableName">hihi</property>
  </object>
</object>
?>

En espérant que ça puisse te servir

Encore, je serais dans un univers entièrement PHP, j'aurais pus me débrouiller mais là, j'ai passé tout le week end dessus, et je ne trouve pas

Ah oui, il faut que je précise qu'une requête du style "select" passe sans prob.

**AL1986** · 20/08/2007, 16h07

Je ne m'y connais pas en xml

. Mais il me semble que le problème vient des quotes, as tu essayé avec des guillemets pour hoho ou en utilisant des fonctions pour les quotes ?
En disant d'envoyer le code Delphi, je voulais juste voir comment tu fomulais ta requête (avec des query, execute,...)

**Truebison** · 20/08/2007, 16h21

Oups, désolé, je n'avais pas compris

J'utilise des query

J'ai essayé avec les guillemets, même résultat. Pour la fonction, peut-tu me dire comment le faire ainsi?

**AL1986** · 20/08/2007, 16h51

Envoyé par Truebison

Pour la fonction, peut-tu me dire comment le faire ainsi?

Je ne sais même pas s'il existe des fonctions comme ça sous Delphi. Je sais qu'il en exsite dans d'autres langages que je ne connais pas (mais on me la déjà dit). Je ne peux t'aider sur ce coup

.
Sinon, les types de id et name, c'est bien int et varchar ?

**AL1986** · 20/08/2007, 16h57

T'as essayer de faire l'insert avec une autre syntaxe:

Code SQL :

Sélectionner tout - Visualiser dans une fenêtre à part

insert into hihi set id=9, name='hoho';

**Truebison** · 20/08/2007, 17h13

Envoyé par AL1986

Sinon, les types de id et name, c'est bien int et varchar ?

Oui, il s'agit bien d'un int et d'un Varchar.

**Truebison** · 20/08/2007, 17h13

Envoyé par AL1986

T'as essayer de faire l'insert avec une autre syntaxe:

Code SQL :

Sélectionner tout - Visualiser dans une fenêtre à part

insert into hihi set id=9, name='hoho';

Je viens d'essayer à l'instant, ça retourne la même erreur.

**cmen76** · 20/08/2007, 17h20

La définition de la requête me paraît suspecte :
Active 1 (j'imagine que ça correspond à true)
SQL = 'insert...'
Il m'apparaît donc que vous essayez d'ouvrir une requête qui ne soit pas un select... alors que manifestement c'est ce qui est attendu (puisqu'il est ajouté à la fin la clause LIMIT)
Donc, mettre 0 pour Active, et créer un événement sur lequel lancer la méthode ExecSQL de l'objet Query.

**Truebison** · 20/08/2007, 17h37

Si je désactive la requête, avec quel fonction pourrais-je l'exécuter?
De même, si je retire les limites (en les laissant null) ça revient par défaut, et j'imagine que de tout mettre à zéro n'arrangera rien

**AL1986** · 20/08/2007, 18h23

Est-ce que ton code ressemble à peu près à ça ? :

Code Delphi :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
.....
var
.....
   q : TQuery;
.....
begin
.....
   q := TQuery.Create(nil);
   q.DatabaseName := 'LeNomDeTaBase';
   q.Active := true;
   q.SQL.Add('TaRequête');
   q.ExecSQL;
.....
   q.free;
.....
end;

**cmen76** · 20/08/2007, 18h29

Voir http://forums.delphi-php.net/showthr...t=insert+query
Je dirais a priori dans le code du datamodule

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

this->Query1->ExecuteSQL();

Mais je ne connais pas Delphi4php

**Truebison** · 21/08/2007, 11h02

En fait, Delphi4PHP n'utilise pas du tout de code Delphi mais du PHP. Il s'agit d'une interface RAD basé sur lIDE Delphi pour du PHP, donc je ne suis peut être pas dans la bonne partie du forum.

Je vais regarder sur le site que tu m'as donné, cmen76.

**Truebison** · 22/08/2007, 10h55

Bon, ben la réponse est venus d'elle-même.
Pour MySQl, l'insert ne fonctionne toujours pas mais sur SQL Server, la même requête fonctionne. Vus que je dois utiliser un serveur SQL Server à la base et qu'EasyPHP était pour m'entrainer avec Delphi4PHP, donc je n'ai plus besoin de l'utiliser.
Merci encore à vous deux pour avoir essayer de m'aider, bonne continuation

[MySQL]Aide à un débutant

Bases de données Delphi

Discussions similaires

Partager

Partager