Discussion :

[js8bleu]

Bonjour,

je programme sous vb6 et access. Je n'arrive pas à mettre à jour les deux champs date (mais de type texte) de ma table contrat. En fait, je voudrai insérer du vide dans ces champs dates au cas où il s'agirai d'un contrat à durée indéterminée. la structure de ma table est :

numcontrat, type texte
datedebutcontrat, type texte
datefincontrat, type texte
numtypecontrat, type numérique
numemp, type texte

Voici ma première requête

cn.Execute "update tablecontrat set numcontrat = '" & txtnumcontrat & "',datedebutcontrat='""',datefincontrat='""',numtypecontrat=" & x & " where numemp = " & txtcodeemp & ""

Mais j'ai l'erreur suivante : "Type de données incompatible dans l'expression du critère"

Ma deuxième requête est :

cn.Execute "update tablecontrat set numcontrat = '" & txtnumcontrat & "',null,null,numtypecontrat=" & x & " where numemp = " & txtcodeemp & ""

et là j'ai l'erreur "Erreur de syntaxe dans l'instruction UPDATE"
Quelqu'un pourrait-il m'aider s'il vous plaît?

Merci d'avance.

Cordialement.

[jnore]

Bonjour


Pour ta première requete,il semblerait que ce soit le champ "numtypecontrat" qui doit être confronté à une variable qui n'est pas de type numérique.
Ton "x" ne doit pas en être une.

Quant à ta seconde requete, la syntaxe est fausse.
Pour un update, on écrit de cette façon:

Code :

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

1
2
3
 
UPDATE table set champ1=valeur1, champ2=valeur2, champ3=valeur3 
WHERE champx=critere_de_filtrage.

Regarde bien l'insertion de tes "null", n'est pas correcte.

Autre chose, pourquoi ne paramètres-tu pas tes champs date par un type date?
Tu les mets en format texte!!!

[js8bleu]

Salut jnore,

Merci pour ton aide, j'ai essayé le datedebutcontrat=null mais j'ai toujours l'erreur 1.
En fait, j'ai mis les dates de type texte parce que je pensais que le traitement serait plus facile et de plus je ne sais pas comment formater les dates en vb (pour ignorer l'heure,les minutes et les secondes) en jj/mm/aaaa uniquement et les insérer dans la table. Pourrais-tu m'aider en ce sens s'il te plaît? Merci d'avance.

Cordialement

[jnore]

Bonsoir

Essaie d'épurer ta chaine de caractère.
Pourquoi mets-tu des quotes entre tes guillemets?

cela pourrait donner ceci:

Code :

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

1
2
3
4
 
 
cn.Execute "update tablecontrat set numcontrat = " & txtnumcontrat & ",datedebutcontrat=" & variable_date_debut & ",datefincontrat=null,
numtypecontrat=" & x & " where numemp = " & txtcodeemp

Essaie aussi de mettre ta requete dans une variable string et de faire un debug.print, cela te permettra de voir si ta syntaxe est bonne.

[js8bleu]

Salut jnore,

j'ai enfin pu régler le problème en fait je n'avais pas de '' à la fin de la requête car en effet le type du " & txtnumemp & " ne correspondait pas. Je te remercie beaucoup pour ton aide. Par contre un problème demeure celui de l'incrémentation automatique. Voici ce que j'aimerai faire :

vérifier dans ma table employe s'il y a au moins un enregistrement
si non alors
numemp = 1
sinon
numemp = dernier numemp + 1
fin si

NB:Avec numemp à présent de type numérique.

J'ai déjà posté dans le forum sans trouver de solution adéquate. Merci d'avance de m'aider.

Cordialement

[jnore]

Salut,

Il existe sous Access les "numéro auto", ne peux-tu pas te servir de cela?
A chaque insertion, un numéro incrémenté de 1 se génère sur un champ clé. Est-cela que tu veux?

[js8bleu]

Salut jnore,

je sais que sous access il y a la numérotation automatique, mais j'aimerai le faire manuellement, ça me fera croire que je suis intelligent . Non en fait, c'est pour mieux maîtriser ma programmation parce que j'ai un logiciel en projet où j'aimerai fusionner des bases de données et pour cela j'aurai besoin de concaténer des chaînes de caractère et des numéros incrémentés comme clés de ma table dans la base de données principale. Peux-tu m'aider s'il te plaît? Merci d'avance.

Cordialement

[jnore]

Avec Access, tu ne pourras le faire qu'avec VB.
1) faire un test avant insertion pour connaitre la valeur de la clé précédente.
2) insérér les données avec la nouvelle clé.

Idéalement, il aurait fallu gérer cela avec un trigger(événement sur table), mais je crois que cela n'est pas possible avec l'extension .mdb.

Sur un projet Access (adp) c'est possible mais il faut MSDE ou SQL server.