-- Création d'une table : CREATE TABLE ... -- Ajout d'une colonne dans une table : ALTER TABLE [MaTable] ADD ... -- Chercher / afficher : SELECT ... FROM ... WHERE ... -- Créer une base CREATE DATABASE ...
Dim Cnn as ADODB.Connection = New ADODB.Connection("Provider...;...") Dim Cmd as ADODB.Command set Cmd = New ADODB.Command("CREATE TABLE ...", cnn) Cmd.Execute 'La table est crée Dim rst as ADODB.Recordset Set rst = New ADODB.Recordset Rst.open "SELECT ... FROM ... WHERE", cnn Do Until Rst.EOF 'Lecture du recordset enregistrement par enregistrement Rst.MoveNext Loop