Forum |  HardWare.fr | News | Articles | PC | S'identifier | S'inscrire | Shop Recherche
2049 connectés 

  FORUM HardWare.fr
  Programmation
  VB/VBA/VBS

  [VB6] Problème de lien d'une base SQL Server vers Access

 



 Mot :   Pseudo :  
 
Bas de page
Auteur Sujet :

[VB6] Problème de lien d'une base SQL Server vers Access

n°2228367
armineas
Posté le 19-05-2014 à 12:55:32  profilanswer
 

Bonjour à tous et à toutes,  
 
Je suis nouveau dans la programmation VB6 et j'ai du réaliser le lien d'une base SQL Server vers une base Access.
 
J'ai donc écrit ce code qui va chercher les données à récupérer dans un tableau Excel.  

Code :
  1. While wsE.Cells(I, j) <> ""
  2.      'nom des tables à lier
  3.      nameSQL = wsE.Cells(I, j)
  4.      'création de la table avec mémorisation du mot de passe
  5.      Set adCat = New ADOX.Catalog
  6.      Set adTab = New ADOX.Table
  7.      Set adCo = New ADODB.Connection
  8.      adCo.Open "Provider=Microsoft.Jet.OLEDB.4.0;" & "Data Source=" & App.Path & "\" & Text1.Text & ".mdb"
  9.      adCat.ActiveConnection = adCo
  10.      adTab.name = nameSQL
  11.      adTab.ParentCatalog = adCat
  12.      adTab.Properties("Jet OLEDB:Create Link" ) = True
  13.      adTab.Properties("Jet OLEDB:Link Provider String" ) = connect
  14.      adTab.Properties("Jet OLEDB:Cache Link Name/Password" ) = True 'ligne obligatoire pour conserver le mdp
  15.      adTab.Properties("Jet OLEDB:Remote Table Name" ) = nameSQL
  16.      'ajout de la table dans la base
  17.      adCat.Tables.Append adTab
  18.      I = I + 1
  19. Wend


 
Ce code fonctionne mais 3 bases sont impossible à lire, quand je les ouvre ça me retourne le message d'erreur "ODBC--call failed".  
Ce qui m'étonne c'est que ce message n'est que ces 3 bases, les 120 autres sont lisibles.  
 
S'il vous plaît, je ne sais pas pourquoi ça ne marche pas et comment je peux le corriger.  
Merci de votre attention et je vous remercie d'avance pour les solutions que vous pourriez trouver.

mood
Publicité
Posté le 19-05-2014 à 12:55:32  profilanswer
 


Aller à :
Ajouter une réponse
  FORUM HardWare.fr
  Programmation
  VB/VBA/VBS

  [VB6] Problème de lien d'une base SQL Server vers Access

 

Sujets relatifs
[PHP] probleme #Ressource #Fichier sur manip imagePetit probleme
Quelle base pour 100 millions de lignes par jourSQL et les Update multi lignes
Xcopy et rename problèmeproblème type char* et char*[20]
Connexion permanent Excel Access - Requête multipleMoyen le plus rapide de copier une grosse table SQL en mémoire ?
Problème ProgrammationBase de données ou fichier de données ?
Plus de sujets relatifs à : [VB6] Problème de lien d'une base SQL Server vers Access


Copyright © 1997-2018 Hardware.fr SARL (Signaler un contenu illicite / Données personnelles) / Groupe LDLC / Shop HFR