Discussion :

[maxtofurious]

Bonjour,

Je souhaite lire dans une BDD SQL en vbs, je suis vraiment novice et j'aimerai des conseils qui m'explique, je ne cherche pas "juste un code tout fait" ^^


J'ai trouvé ca:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
dim ConnDataBase
dim TablES1
dim CheminNomDelabase
dim NomDeLaTable
dim SQL
 
'***** à adapter ***************************************
CheminNomDelabase = "C:\PersoFrancis\BDpourEssais.mdb"
NomDeLaTable = "Principal"
'***** fini à adapter **********************************
 
Set ConnDataBase = createobject("ADODB.Connection")
SQL="PROVIDER=Microsoft.Jet.OLEDB.4.0;Data Source= " & CheminNomDelabase & ";"
ConnDataBase.open SQL
 
Set TablES1 = CreateObject("ADODB.Recordset")
SQL= NomDeLaTable
TablES1.open SQL, ConnDataBase, 3, 2
.........
TablES1.Close
ConnDataBase.Close

Je pense avoir compris cette parti :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
Set ConnDataBase = createobject("ADODB.Connection")
SQL="PROVIDER=Microsoft.Jet.OLEDB.4.0;Data Source= " & CheminNomDelabase & ";"
ConnDataBase.open SQL

Initialise une connection à une BDD
Défini le type de BDD, son emplacement et se connecte

Est ce bien ca ?


Ensuite,

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
Set TablES1 = CreateObject("ADODB.Recordset")
SQL= NomDeLaTable
TablES1.open SQL, ConnDataBase, 3, 2
.........
TablES1.Close
ConnDataBase.Close

Vous pouvez mm'expliquer ?

Merci d'avance

Maxime

[ProgElecT]

Je pense avoir compris cette parti :
....................
Est ce bien ca ?

Set TablES1 = CreateObject("ADODB.Recordset")
Création d'un objet pouvant contenir une table de la BD


SQL= NomDeLaTable:
SQL est une variable pouvant contenir une phrase le nom de la table à ouvrir tout simplement ou, une requête conditionnelle pour ne retourner qu'une partie des enregistrements et/ou champs et/ou avec trie des champs et/ou .... le nom de la table y figurant.
NomDeLaTable = "Principal"
SQL= NomDeLaTable:
Le nom de la table dont on veux avoir un retour d'enregistrement.