Requête Pour table Access

Version imprimable

17/08/2007, 14h18
adrien.gendre

Requête Pour table Access

Bonjour je voudrais executer une requête et effectuer des opérations à partir de certains résultats c'est pour cela que je ne choisi pa la méthode d'afficher le résultat directement dans les cellule. De plus j'utilise un lien ODBC dans lequel j'ai rentré le chemin de ma table dans le cas ou elle seré déplacé je ne comprend pas les exemples que je trouve sur internet moi les connection ADOBD.Connection ne marchent pas.
Merci de l'aider
17/08/2007, 14h23
Invité

Bonjour

Avec le code cela serait mieux, as-tu ce tuto de Caféine.

Starec
17/08/2007, 14h31
adrien.gendre

En fait à chaque fois j'ai une erreur sur ça :

Code:

Set cnx = New ADODB.Connection

Déjà il n'est pas par défault dans les listes de propositions VBA
17/08/2007, 14h37
adrien.gendre

Non j'ai rien dit lol excuse moi je pense que je trouverais mon bonheur la dedans jvais essayer de décrypter merci.

J'ai mis ça et il me met une erreur me disant que c'est impossible d'utiliser ODBC pour faire cela. Saurais tu pourquoi ? Merci

Code:

1
2
3
4
5
6
7
8
9
10
11
12
Dim cnx As ADODB.Connection
Set cnx = New ADODB.Connection
Dim strSQL As String
cnx.Provider = "Microsoft.Jet.Oledb.4.0"
cnx.ConnectionString = "ODBC;DSN=Base_Oriolles"
cnx.Open
 
strSQL = "SELECT CONSFUEL FROM DATATECH WHERE NUMSEQU =  '070601'"
 Dim rst As New ADODB.Recordset
 rst.Open strSQL, cnx
 MsgBox rst.Fields("CONSFUEL")
 rst.Close

19/08/2007, 19h47
getule

bonjour
as tu pensé à activer (Microsoft ado ext x.xx for dll and security) dans
outils/références