Les bases de données en Visual Basic

1. Connexion a Access

1. 1. Pour créer une base

Le code suivant permet de créer une nouvelle base dans le repertoire courant. Elle sera appelée "mabase.mdb".

Set DBBase = Workspaces(0).CreateDatabase("mabase.mdb", dbLangGeneral)

"Workspaces" est une variable de VB qui peut être utilisée directement. DBBase est la variable qui est le lien avec la base de données et qui sera ensuite utilisée dans le programme.
Si vous souhaitez mettre une définition de la variable DBBase, elle peut être du style :
Global DBBase As Database

1. 2. Pour ouvrir une base existante

Le code suivant permet d'affecter à la variable DBBase la base contenue dans le fichier "mabase.mdb"

Set DBBase = Workspaces(0).OpenDatabase("mabase.mdb")

1. 3. Execution d'une requête sans résultat

SQL1 = "Create table Type (" _

      &  "CType Counter CONSTRAINT PrimaryKey PRIMARY Key, " _

      &  "NType Char " _ 

      )"

DBBase.Execute SQL1

1. 4. Execution d'une requete avec récupération du résultat

Requete = "Select * From type;"

SET TTmpTable = DBBase.OpenRecordset(Requete)

DO UNTIL TTmpTable.EOF

    Label1.caption = TTmpChanson!CType

    TTmpTable.movenext

LOOP

La déclaration de TTmpTable est du style : Dim TTmpTable As Recordset

» Commentaires

Aucun commentaire pour cette page.

Si vous souhaitez ajouter un commentaire,
vous devez être identifié.

Page modifiée le : 18/08/2003
Site modifié le : 12/04/2011

Flux RSS : cliquez-ici si vous voulez suivre les évolutions
Contacter le webmaster : si vous trouvez qu'il manque des infos, n'hésitez pas à me le dire !