en effet j'ai mal lu...
Meme dans ce cas, cela ne marche pas !
je ne sais pas pourquoi !
Alors j'ai essaye avec ca :
Set rst = dbs.OpenRecordset("SELECT * FROM [affaire info];")
p = rst.GetRows(rst.recordcount)
rst.MoveFirst
for i=0 to rst.recordcount-1
if p(0, i) <> REF then
rst.Delete <--
else ou
rst.MoveNext <--
next i
Mais cela bugg au (<--) avec message "no current record"
Merci d'aider un stagiaire dans la m... en chine...
-------------------------------
Réponse au message :
-------------------------------
> T'as mal lu c'est :
>
> Set rst = dbs.OpenRecordset("DELETE FROM [affaire info] WHERE [affaire info].[Reference number]<> " + REF + ";");
>
>
>
>
>
>
> -------------------------------
> Réponse au message :
> -------------------------------
>
> > Merci mais....
> >
> > no, cela ne fonctionne pas :
> >
> > Set rst = dbs.OpenRecordset("DELETE FROM [affaire info] WHERE [affaire info].[Reference number]<> ' " + REF + " ';")
> >
> >
> >
> >
> > -------------------------------
> > Réponse au message :
> > -------------------------------
> >
> > > Si ton reference number est un nombre tu dois faire :
> > >
> > > "DELETE FROM [affaire info] WHERE [reference number]=" + REF + ";"
> > >
> > > On ne met pas detoile devant le from
> > >
> > > @+
> > >
> > > -------------------------------
> > > Réponse au message :
> > > -------------------------------
> > >
> > > > Chluss...
> > > >
> > > > Voila, j'ai un bleme :
> > > > Je voudrais lancer une Recordset en language SQL :
> > > > "DELETE * FROM [affaire info] WHERE [reference number]='" + REF + "';"
> > > >
> > > > Cela ne morche pos...
> > > > pourquoi ?
> > > > Merci d'avance.
> > > >
> > > >
> > > >
> > > >
> > > >
> > >
> >
>