[VB] (ça pue :D ) Ouvrir une table en accès direct ou séquentiel...

Marsh Posté le 22-03-2002 à 17:16:28

Bonjour,

je suis obligé de coder en VB (scolaire :-(, j'aime pas je préfère mon petit C++ adoré ou bien le pascal/delphi, mais bon je suis obligé. En plus de ça ya pas d'aide sur la machine où je suis, j'aimerais donc savoir comment on fait pour ouvrir, puis lire/écrire dans une table sous ACCESS (en VBA donc).

En direct ça doit donner qqchose du style :

Code :

Dim BD As DAO.Database
Dim T1 As DAO.Recordset
Dim cle_primaire As String
Set BD = DBEngine.Workspaces(0).Databases(0)
Set T1 = BD.OpenRecordset("NOM_TABLE" )
On Error GoTo Err
T1.Index = "primarykey"
cle_primaire = Me!NOM_TABLE
T1.Seek "=", cle_primaire
If T1.NoMatch Then
Me!message = "Nom d'utilisateur erroné. Veuillez resaisir ou annuler."
Else
Me!classe = T1!champ_2
End If
T1.Close
Err:
Exit Sub

pourriez-vous corriger, voire créer un prototype qui sera toujours valable ?
puis en séquentiel on fait comment ?

Rhâââ là là !!! Si jamais on pouvait faire ça en C++, mais bon ...

@++ :hello:

---------------
Visitez mon site : http://www.jujubarbare.linux-fan.com

Marsh Posté le 22-03-2002 à 17:16:28

Marsh Posté le 23-03-2002 à 14:10:59

je peux te filer un modele utilisant ADODB ...

Marsh Posté le 24-03-2002 à 09:20:35

kvl a écrit a écrit :

je peux te filer un modele utilisant ADODB ...

je suis preneur mon ami !!!
si c'est un fichier, voici mon mail : damamme@linux-fan.com

Merci encore :hello:

---------------
Visitez mon site : http://www.jujubarbare.linux-fan.com

Marsh Posté le 24-03-2002 à 15:41:13

c'est que en VBA? pcq sous VB je sais parfaitement comment gerer une database access sous dao 3.6... re-post si tu veux des examples

Sujets relatifs:

Leave a Replay

Make sure you enter the(*)required information where indicate.HTML code is not allowed

Name *

Email *

URL

Message *