acces à deux tables access en meme tempsRésolu

Question

bj. jveu testerl'existance de deux codes de deux tables differentes sous access avec vb6 mé g pa arriver à le faire.svp aider moi. mon code est:

Set DBComar = OpenDatabase(App.Path & "\comar1.mdb")
Set RScomar = DBComar.OpenRecordset("Select * from immeuble, contrat")
Set SNcomar = DBComar.OpenRecordset("Select codim from immeuble")
Set SNcomar = DBComar.OpenRecordset("Select numcont from contrat")

RScomar.FindFirst "codim ='" & Text2.Text & "'"
If RScomar.NoMatch = False Then
RScomar.FindFirst "numcont =" & Text1.Text
 If RScomar.NoMatch = False Then
 MsgBox " Ce numero existe déjà. tapez un autre", vbInformation, "Information"

zen69 · Accepted Answer

Set SNcomar = DBComar.OpenRecordset("Select codim from immeuble")
Set SNcomar = DBComar.OpenRecordset("Select numcont from contrat")

Quel et le type de cette variable SNcomar ?

Si c'est un recordset... tu deverais probablement utiliser 2 variables différentes non ?

<hr size="2" width="100%" />  zen69 aka Ortho Le Profett
  [site web]

mannanaesc · Answer

bj. c exactement ce ke tu ma proposé!! merci bcp

mannanaesc · Answer

slt. jsé pourkoi ce bloc ne fonctionne pas?!! il maffiche comme erreur"non reconnue"
pourtant kil est fonctionnel dans un autre projet!!
Set dbcomar = OpenDatabase(App.Path & "\comar1.mdb")

Acces à deux tables access en meme temps

3 réponses

Votre réponse

Discussions similaires