Discussion :

[IdrilElendil]

Bonjour,
je suis débutante en Windev. J'aimerais savoir comment il faut faire pour exécuter une requête INSERT INTO vers une base de données SQL Server 2000. J'utilise WinDev 11. Ma table est structurée ainsi:
VilleId -> Clé primaire (int) avec auto-incrément
VilNom -> varchar

Voici le code que j'ai essayé:
txtVille est une boîte de saisie
sRequeteSql est une chaîne contenant ma requête SQL
sdSource est une Source de données
sCnxSource est une chaîne contenant ma chaîne de connexion à la bd

Code :

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

1
2
sRequeteSql = "INSERT INTO Villes(VilleNom) VALUES(" + txtVille + ")"
HExécuteRequêteSQL(sdSource, sCnxSource, hRequêteSansCorrection, sRequeteSql)

Comme ça n'a pas fonctionné, j'ai essayé ceci que j'ai trouvé dans l'aide en ligne:

Code :

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

1
2
3
4
HPrépareRequêteSQL(sdSource, sCnxSource, hRequêteSansCorrection, 
       "INSERT INTO VILLES(VilleNom) VALUES(:nom )")
sdSource.nom = txtVille
HExécuteRequêteSQL(sdSource)

ça n'a pas plus fonctionné

Mais je suis capable d'obtenir les informations (que j'ai entrées directement dans ma table) contenues dans ma table et de les afficher dans une table et ça fonctionne:

Code :

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

1
2
3
4
5
6
7
8
sRequeteSql = "select * from dbo.Villes"
HExécuteRequêteSQL(sdSource, sCnxSource, hRequêteSansCorrection, sRequeteSql)
TableSupprimeTout(tabTable)
HLitPremier(sdSource)
TANTQUE HTrouve(sdSource)
       TableAjouteLigne(tabTable, sdSource.VilleId, sdSource.VilleNom)
       HLitSuivant(sdSource)
FIN

J'aimerais donc savoir ce que je fais d'incorrect,

Merci d'avance,
Idril Elendil

[nath-0-0]

je sais pas si tu tiens a tout prix de faire ta requete avec ton code sql , mais sinon il y'a un autre moyen d'inserer des donnes dans ta table.
voici un exemple:

Code :

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

1
2
3
 
nomDeTaTable.nomdeTonchamps = "valeur a inserer"
hajoute(nomDeTaTable)

tu utillises quoi comme bdd?hyperfile?

[VincentRoy]

Bonsoir,

De simples cotes marcheraient peut etre mieux ?
sRequeteSql = "INSERT INTO Villes(VilleNom) VALUES('" + txtVille + "')"
Sinon, montrez nous votre message d erreur en utilisant hErreurInfo().
Bonne soiée

[IdrilElendil]

Bonjour,
j'utilise une base de données SQL Server 2000.

Pour ce qui est d'utiliser des apostrophes, je vais essayer demain, je suis présentement à la maison et mon projet se trouve à mon lieu de stage. C'est la première chose que je vais essayer demain matin avec hErreurInfo()

Si ça ne fonctionne pas, je vais essayer avec la table et les différents champs:

Code :

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

1
2
nomDeTaTable.nomdeTonchamps = "valeur a inserer"
hajoute(nomDeTaTable)

Merci pour vos réponses, je vais vous en donner des nouvelles demain,
Bonne soirée,
Idril Elendil

[IdrilElendil]

Bonjour,
je viens tout juste d'essayer avec les apostrophes dans ma requête et ça fonctionne!!

Code :

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

sRequeteSql = "INSERT INTO Villes(VilleNom) VALUES('" + txtVille + "')"

Merci beaucoup VincentRoy pour l'aide.

Idril Elendil