Discussion :

[Pleymo]

Salut

Je veux conserver des données d'une table tout en validant un des champs. Ma validation fonctionne bien mais je ne suis pas capable de conserver mes données. Voici ce que je fais :

Code :

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

1
2
3
4
5
6
7
8
9
Dim MaCommande As New OdbcCommand("SELECT ID,param1,param2 FROM table1 WHERE param1 = ? AND param2 = ? AND ID=" & var_id, MaConnection)
MaCommande.Parameters.Add("@param1", OdbcType.Char, 12)
MaCommande.Parameters.Add("@param2", OdbcType.Int, 8)
var_param1 = MaCommande.Parameters("@param1").Value()
var_param2 = MaCommande.Parameters("@param2").Value()
 
MaCommande.Connection.Open()
MaCommande.ExecuteNonQuery()
MaCommande.Connection.Close()

je crois seulement que je ne peux pas mettre la valeur de mon parametre dasn une string....mais sinon comment je peux récupérer mes paramètres?

Merci à tous!

[Thomas Lebrun]

J'ai pas compris ce que tu veux fire/n'arrives pas à faire

[Pleymo]

Re Bonjour!

Je dois valider le ID s'il est présent dans ma table. Mon ID vient de ma variable "var_id" qui est elle provient d'un fichier lu précédemment. Si le id est valide...je dois conserver les données nécessaires (param1 et param2) en mémoire.

J'ai donc voulu récupérer les valeur des paramètres et les mettre dans une chaine de caractere. C'est comme un bloc de retour d'information...

À la fin de tout ca, je réuni toutes mes variables contenu dans les chaines de caractere et je les envoie par email.

J'espère que tu comprend mieux mon problème à présent.
Merci!

[Pleymo]

Salut

j'ai vu quelque exemple avec un datareader...est ce une bonne idée d'utiliser ceci?

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
Dim MaCommande As New Odbc.OdbcCommand("SELECT ID,param1,param2 FROM table1 WHERE ID=" & var_id, MaConnection)
 
MaConnection.Open()
Dim MonReader As Odbc.OdbcDataReader = MaCommande.ExecuteReader(CommandBehavior.CloseConnection)
     While MonReader.Read
         Try
            var_param1 = MonReader("param1")
            var_param2 = MonReader("param2")
         Catch ex As Exception
         End Try
     While
     MonReader.Close()

cependant j'ai une erreur sur la ligne du "dim mon reader..."
l'erreur est :

ERROR[HY000][IBM][iSeries Access ODBC Driver][DB2 UDB]SQL0401 - Comparison operator = operands not compatible.

J'ai évidemment tester ma connection et il n'y pas pas de problème de ce côté...

Que faire?

Merci beaucoup!

[Thomas Lebrun]

J'espère que tu comprend mieux mon problème à présent.
Merci!

A vrai dire.... non

[Pleymo]

Salut...

J'ai l'impression de me faire niaiser moi laa...

Je vais commencer par la base....

Code :

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

Dim MaCommande As New Odbc.OdbcCommand("SELECT FAAPID,FAMCU,FANUMB FROM F1201M1 WHERE FAAPID=" & var_id, MaConnectionAS400)

1. Valider le FAAPID avec le numéro que je passe avec ma "var_id"
2. Conserver les 2 autres champs (FAMCU,FANUMB) de la même table (F1201M1) et les mettre les données correspondants au champs dans une chaine de caractère.

Dit moi ce que tu comprends pas la dedans exactement...!

Merci!