Discussion :

[bestmoroco]

Salut,

Merci pour l’aide j’ai réussi à réaliser la connexion, J’ai exécuté une commande SQL avec succès mais une autre qui a la condition (where) prise d’une donnée enregistré à la table je n’ai pas le réussi.
Ce code à bien marché pour l’essai:

Code :

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

1
2
3
4
5
6
7
8
9
10
aaa is boolean
// Run the query and assign the controls
aaa = SQLExec("SELECT AS_QTESTO FROM F_ARTSTOCK WHERE AR_Ref= ‘A1001’”,"QRY1")
IF aaa THEN
	SQLFetch("QRY1")
	COL_Column4=SQLGetCol("QRY1",1)
ELSE
	Error("aaaaa")
END
SQLClose("QRY2")

Maintenant je veux entrer la référencé depuis les colonnes de la table. J’ai réalisé une boucle pour mais le résultat me donne une faute sous l’exécution de la commande.

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
aaa is boolean
i est un entier
POUR i=1 A TableOccurrence(Tab)
	// Run the query and assign the controls
aaa = SQLExec("SELECT AS_QTESTO FROM F_ARTSTOCK WHERE AR_Ref= " +Tab.colonne1[i],"QRY1")
IF aaa THEN
	SQLFetch("QRY1")
	Tab.colonne3[i]=SQLGetCol("QRY1",1)
ELSE
	Error("aaaaa")
END
FIN
SQLClose("QRY2")

Merci pour toutes vos collaborations.

[tatayo]

Bonjour,
Si tu avais renvoyé l'erreur au lieu de 'aaaaa', tu aurais trouvé tout seul...
Il manque des cotes dans la requête.

Je te suggère aussi d'utiliser ChaineConstruit() pour ce genre de requête, ça rend le code plus lisible, et surtout ça fait bien ressortir ce genre d'erreur.

Tatayo.

[L.nico]

Bonjour,

il semblerait qu'il manque les apostrophes avant et après:

Code :

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

aaa = SQLExec("SELECT AS_QTESTO FROM F_ARTSTOCK WHERE AR_Ref= '" +Tab.colonne1[i] + "'","QRY1")

Bonne journée,

Nicolas

[EDIT] : Grillé par Tatayo

[bestmoroco]

Merci, pour vous tous les développeurs pour votre collaboration. Vous m’avez aidé même si c’est une faute bête.
Merci autre fois.