Connection ODBC & VB

Connection ODBC & VB - VB/VBA/VBS - Programmation

Marsh Posté le 29-01-2003 à 14:25:52    

apres avoir compilé un projet vb prennant en charge une connection odbc par data environment, quand je copie l'exe sur un poste qui a exactement la meme connection odbc dans les gest. odbc, bah ca marche pas, il merde "erreur d'execution 713"  
 
comme si la connection odbc était integrée dans l'exec par l'editeur de lien et etait spécifique au poste  
 
bref c la merde
 
comment je peux faire?


---------------
pas vu, pas pris!!
Reply

Marsh Posté le 29-01-2003 à 14:25:52   

Reply

Marsh Posté le 29-01-2003 à 14:35:22    

qqun aurai une solution de rechange pour me connecter indifferement a une base acces ou mySQL située sur un server NT4 depuis n'importe quelle machine client d'un rezo local


---------------
pas vu, pas pris!!
Reply

Marsh Posté le 29-01-2003 à 18:13:08    

up


---------------
pas vu, pas pris!!
Reply

Marsh Posté le 29-01-2003 à 18:38:37    

Ben tu peux construire une connectionstring dynamiquement dans ton programme en fonction de paramètres que l'utilisateur entrerait, ou encore créer un fichier .DSN qui serait référencé dans ta connectionstring.  C'est ce fichier qui serait modifié pour changer les paramètres de connexion
 
ça ressemblerait à ceci:
 


Set objConnect = New Connection
objConnect.ConnectionString = "FILE NAME=ACCESDB.DSN"
objConnect.Open



---------------
Whichever format the fan may want to listen is fine with us – vinyl, wax cylinders, shellac, 8-track, iPod, cloud storage, cranial implants – just as long as it’s loud and rockin' (Billy Gibbons, ZZ Top)
Reply

Marsh Posté le 30-01-2003 à 06:07:28    

drasche a écrit :

Ben tu peux construire une connectionstring dynamiquement dans ton programme en fonction de paramètres que l'utilisateur entrerait, ou encore créer un fichier .DSN qui serait référencé dans ta connectionstring.  C'est ce fichier qui serait modifié pour changer les paramètres de connexion
 
ça ressemblerait à ceci:
 


Set objConnect = New Connection
objConnect.ConnectionString = "FILE NAME=ACCESDB.DSN"
objConnect.Open


 

:jap:


---------------
pas vu, pas pris!!
Reply

Marsh Posté le 30-01-2003 à 06:08:08    

et ensuite j'enchane dssus? je crée une commande sur cette connection pour sortir un recordset?


---------------
pas vu, pas pris!!
Reply

Marsh Posté le 30-01-2003 à 09:12:30    

oui après le Open rien ne change, tu peux faire tout ce qu'on fait habituellement sur une connexion ADO


---------------
Whichever format the fan may want to listen is fine with us – vinyl, wax cylinders, shellac, 8-track, iPod, cloud storage, cranial implants – just as long as it’s loud and rockin' (Billy Gibbons, ZZ Top)
Reply

Marsh Posté le 31-01-2003 à 12:00:56    

:jap:  
 
ca marche au poil
 


Dim objconnect As Connection
Set objconnect = New Connection
objconnect.ConnectionString = "FILE NAME=" & App.Path & "\client.DSN"
objconnect.Mode = adModeReadWrite
objconnect.Open
   
Set rs = objconnect.Execute("Table1" )


par contre il me reste deux ennuis, mon objet recordset me refuse 2 methodes:
 

  • moveprevious : "l'operation demandée n'est pas authorisée dans ce contexte"

je pense que c un truc a preciser dans  
"Set rs = objconnect.Execute("Table1" )"
mais j'arrive pas a determnier quoi
 

  • addnew : je pensai que  

"objconnect.Mode = adModeReadWrite"
reglerai ce probleme qui ressemble a une limitation d'acces mais non.
 
une idée?


---------------
pas vu, pas pris!!
Reply

Marsh Posté le 31-01-2003 à 21:02:03    

up


---------------
pas vu, pas pris!!
Reply

Marsh Posté le 31-01-2003 à 22:58:12    

pour ton rs ,c p'tetre la méthode d'ouverture du rs : keyset,dynamic,static
mais c po sur

Reply

Marsh Posté le 31-01-2003 à 22:58:12   

Reply

Marsh Posté le 31-01-2003 à 23:22:33    

msdn

L'objet Recordset renvoyé est toujours un curseur en lecture seule, ou En avant seulement. Si vous avez besoin d'un objet Recordset offrant plus de fonctionnalités, créez au préalable un objet Recordset à l'aide des paramètres de propriété voulus, puis utilisez la méthode Open de l'objet Recordset pour exécuter la requête et pour que celle-ci renvoie le type de curseur souhaité.


 
:/


---------------
pas vu, pas pris!!
Reply

Marsh Posté le 31-01-2003 à 23:45:12    

ok ca marche   :bounce:  :bounce:  
 

Dim objconnect As Connection
Set objconnect = New Connection
objconnect.ConnectionString = "FILE NAME=" & App.Path & "\client.DSN"
objconnect.Mode = adModeReadWrite
objconnect.Open
   
Set rs(1) = New Recordset
rs(1).Open "Table1", objconnect, adOpenDynamic, adLockOptimistic
 
Set rs(2) = New Recordset
rs(2).Open "Table2", objconnect, adOpenDynamic, adLockOptimistic
 
Form1.Show


 
thx all  :jap:


---------------
pas vu, pas pris!!
Reply

Sujets relatifs:

Leave a Replay

Make sure you enter the(*)required information where indicate.HTML code is not allowed