Salut, cheickssy
La table access ne s'exporte pas dans vb6. La base de données reste dans access, tu dois pouvoir attaquer cette base à partir de vb.
Plusieurs méthodes existent.
Voici ce que j'utilise
Dans ton projet vb,
1- crée un module et colle le code suivant dessus
1 2 3 4 5 6 7 8 9
| Public mali As Connection
Public Sub Main()
Set mali = New Connection
mali.ConnectionString = "dsn=bamak" ' "bamak" est le nom de la chaine de connection que tu auras préciser dans l'étape 2
mali.Open
frmAccueil.Show 'nom de la 1ère feuille
End Sub |
2- Etablie la chaine en procedant de la sorte
Demmarrer/Panneau de configuration/Performance et maintenance/Outils d'administration/Sources de données ODBC (double cliquez sur l'icone)
Tu aura une fenetre.
Clique sur ajouter
une autre fenetre apparaitra, chercher "Microsoft Access Driver (*.mdb)
Cliquer sur terminer
une autre fenetre apparaitra, dans le champ "nom de la source de données" , mets "bamak" (c'est le nom préciser dans l'étape 1)
Puis cliquez sur selectionnez, une nouvelle fenetre apparaitra , naviguez sur l'exporateur pour retrouver votre base de données (dans le champ base de données )
Faites OK
Rentrez sur votre projet vb
créer une feuille
dans le code de la feuille (dans Général) collez le code suivant:
Dim setuser As New ADODB.Recordset
Cherche le composant DataGrid et pose ce controle sur la feuille
dans form_load()
colle le code suivant
1 2 3 4 5 6 7 8 9 10 11 12 13 14
|
Main ' Etabli la connection avec ta base
'la requete sql pour charger ton datagrid
Dim SqlD As String
SqlD = "select * FROM Pays ' le nom de la table est pays
setuser.CursorLocation = adUseClient
setuser.Open SqlD, mali, adOpenKeyset, adLockOptimistic, adCmdText
Set DataGrid1.DataSource = setuser
Set setuser = Nothing |
Dans les propriétés de Datagrid, tu pourras permettre les modoifiactions, les suppressions ou les ajouts, bref tout ce que tu voudras.
Bref, voila en gros comment modifier la table access via vb6.
D'autres méthodes existent biensûr.
Bon courage
Partager