cs_PartyBoy
Messages postés2Date d'inscriptionvendredi 14 juin 2002StatutMembreDernière intervention14 juin 2002
-
14 juin 2002 à 10:23
cs_Charlie
Messages postés110Date d'inscriptionjeudi 9 mai 2002StatutMembreDernière intervention11 mars 2010
-
17 juin 2002 à 22:21
Bonjour
Je lie une BD à un contrôle DataListBox par l'intermédiaire d'un contrôle adodc. J'associe au contrôle adodc une source de données système. Sur mon ordinateur, ca marche mais pour le faire tourner sur un autre ordinateur, il faut à chaque fois recréer à la main la source de données.
Le but est que cela se fasse automatiquement pour ne pas avoir à le faire sur tous les ordinateurs ou j'installerai le prog.
cs_Charlie
Messages postés110Date d'inscriptionjeudi 9 mai 2002StatutMembreDernière intervention11 mars 20101 17 juin 2002 à 22:21
voici mon code pour une de mes applications.. regarde si ca peut t'aider...
Option Explicit
Private Cat As New ADOX.Catalog
Private Tbl As New ADOX.Table
Private cmdado As New ADODB.command
Private rsProject As New ADODB.Recordset
Private rsImages As New ADODB.Recordset
Private rsData As New ADODB.Recordset
Public Function CreateDB(link As String) As Boolean
On Error GoTo Annulation
Cat.Create "provider=microsoft.jet.oledb.3.51;" & "Data source =" & link & ";"
cmdado.CommandText = " select * from Data " ' order by name indice asc"
rsData.CursorLocation = adUseClient
rsData.CursorType = adOpenDynamic
rsData.LockType = adLockOptimistic
rsData.Open cmdado