cs_VieRose
Messages postés14Date d'inscriptionmardi 6 février 2007StatutMembreDernière intervention17 novembre 2008
-
17 nov. 2008 à 16:48
PCPT
Messages postés13272Date d'inscriptionlundi 13 décembre 2004StatutMembreDernière intervention 3 février 2018
-
17 nov. 2008 à 18:48
bonjour,
et ben j'ai une bd access 97
contien une table clients et l'autre commande (sur la base acess les deux table ne son pas liè par une relation)
just j'ai volu utiliser une mshflexgrid pour afficher les donnèes hièarchiquement
voila le code :
Dim strCn, URL_BASE As String
URL_BASE = "D:\Cand_Neuv2008.mdb"
''''''''''''''''''''''''''''''''''le pb est la ''''''''''''''''''''''''''''''''
strCn = "Provider=MSDataShape.1;Data Source=" & URL_BASE & ";" & _
"Connect Timeout=15;Data Provider=MSDASQL"
'''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''
.
Dim strSh As String
strSh = "SHAPE {SELECT * FROM `client`} AS Commandes " & _
"APPEND ({SELECT * FROM `commande`} AS Commandes RELATE " & _
"COD_c TO COD_c) AS Commandes"
MsgBox strSh
With Adodc1
.ConnectionString = strCn
.RecordSource = strSh
End With