Erreur de Syntax

Question

Salut, il me dit qu'il y a une erreur de synthaxe au niveau du Insert into


Dim var As String
Dim sql As String
Dim cnx As New ADODB.Connection

Open "c:	est3.txt " For Input As #1

cnx.Mode = 3 'pour pouvoir inserer des données
cnx.Provider = "Microsoft.Jet.Oledb.3.51"
'Définition de la chaîne de connexion
cnx.ConnectionString = "C:\bd.mdb"
'Ouverture de la base de données
cnx.Open
Do While Not (EOF(1) = True)
            
    Line Input #1, var
    strTab = Split(var, ",") 'Attention! Ceci écrase le contenu de strTab
    sql = "INSERT INTO Table(DATE,HEURE,POSTE,NUMCOMPO,annu,DUREE,DUREECOM) values ('strtab')"
    cnx.Execute (sql)
Loop
cnx.Close
Set cnx = Nothing


PS: c'est pour inserer un fichier texte dans une base de donnée.

Merci

BasicInstinct · Answer

values (' & strtab(0) & "','" & strtab(1) & "','" .....

@++

 :clown)  BasicInstinct  :clown)

crocmorts · Answer

Merci mais toujours pas, il me souligne en jaune

cnx.Execute (sql)


et me dit toujours qu il y a une erreur de synthaxe.

Merci d'avance

BasicInstinct · Answer

certainement parceque si t'as une dae, il faut l'encadrer par des # a la place de '

et si c'est un nombre, pas de ' du tout.

Ca depends du type des champs...

@++

 :clown)  BasicInstinct  :clown)

crocmorts · Answer

Mon fichier texte: 

" DATE ","HEURE"," POSTE","NU.COMPOSE","DUREE DE C" 
"04/05/02","13:01 ","201 ","260 "," 0:00:11" 

Comment je doit faire avec Insert Into? 

Je sais je suis nul, j'ai commandé un livre mais il n'arrive que jeudi, et bon, je ne peux me tourner les pouces, merci de m'aider 

sql = "INSERT INTO table (DATUM, HEURE , POSTE, NUMCOMPO, annu, DUREE, DUREECOM) values ( " & strtab & " )"

BasicInstinct · Answer

deja il te faut autant de champs que de valeurs a inserer :

"04/05/02","13:01 ","201 ","260 "," 0:00:11" =  5 champs

DATUM, HEURE , POSTE, NUMCOMPO, annu, DUREE, DUREECOM = 7 champs

il manque 2 champs d'un coté ou il y en a 2 de trop dans l'autre

sql = "INSERT INTO table (DATUM, HEURE , POSTE, NUMCOMPO, annu, DUREE, DUREECOM) values (#" & strtab(0) & "#,#" & strtab(1) & #," & strtab(2) & ",'" & strtab(3) & "'",....

 :clown)  BasicInstinct  :clown)

crocmorts · Answer

Merci Basic Instinct, mais normalement dans ma Base de données, je peux definir tous mes champs en text, ainsi il reconnait aussi bien les dates que les heures ou bien les nombres, non

crocmorts · Answer

Merci Basic Instinct, mais normalement dans ma Base de données, je peux definir tous mes champs en text, ainsi il reconnait aussi bien les dates que les heures ou bien les nombres, non

BasicInstinct · Answer

si tous tes chamsp sont de type texte dans ta base, il faut que tu encadres des valeurs par des '

mais tu dois qd meme avoir autant de champs du coté du insert into que du coté Values. Et dans le meme ordre evidement.

 :clown)  BasicInstinct  :clown)

crocmorts · Answer

Thank you very much Basic Instinct, mais now,  :blush) , il m'affiche une erreur sur la ligne 

    cnx.Execute (sql)

Il me dit erreur de synthaxe dans l'instruction Insert INTO,

C'est soit un probleme de connexion avec ma base de données, ce qui m'etonne qd meme car sinon il me dirait, enfin je crois, soit un proleme de synthaxe au point de vue de cette ligne là.

Merci encor pr tt

BasicInstinct · Answer

ta syntaxe doit etre du type:

"insert into Table (Champs1, Champ2, Champ3) values ('" & Valeur1 & "','" & Valeur2 & "','" & valeur3 & "')"

si tu y arrives pas, envoie moi la structure de ta table ainsi qu'1 bout de ton fichier txt

villissina@wanadoo.fr

@++

 :clown)  BasicInstinct  :clown)

crocmorts · Answer

Je t'ai envoyé un mail, encore merci

Erreur de Syntax

11 réponses

Discussions similaires