Précédent   Forum des professionnels en informatique > Logiciels > Microsoft Office > Access > VBA Access
VBA Access Le forum pour les questions relatives au code VBA sous Access, et à son environnement de développement VBE.
Partagez cette discussion sur d'autres réseaux sociaux : Viadeo Twitter Google Facebook Digg Delicious MySpace Yahoo
Réponse Proposer ce sujet en actualité
 
Outils de la discussion
Publicité
'
Vieux 31/05/2011, 11h09   #1
Nouveau Membre du Club
 
Homme
ingénieur essais électronique
Inscription : mai 2011
Messages : 128
Détails du profil
Informations personnelles :
Sexe : Homme

Informations professionnelles :
Activité : ingénieur essais électronique
Secteur : Industrie

Informations forums :
Inscription : mai 2011
Messages : 128
Points : 37
Points : 37
Par défaut table liée via ODBC

Bonjour,

Je me trouve face a un problème et je galère un peu.

Je dois aller chercher les infos dans une table via ODBC et l'insérer dans ma base via ODBC.

J'arrive à insérer ma table mais à chaque nouveau démarrage de la base et utilisation de cette table, j'ai une demande de mot de passe. Je voudrais que ce mot de passe soit intégrer à ma base et qu'il ne me demande plus à chaque utilisation.

J'ai essayé avec ce code mais à mon avis c'est pas le top :

Code :
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
Set dbsCurrent = CurrentDb
'  Chaîne de connexion
strConn = "ODBC;" & _
          "DSN=DSN;" & _
          "UID=UID;PWD=PWD"
' Création nouvelle définition de table
Set tdfLinked = dbsCurrent.CreateTableDef("ref_gima")
' Optionnel : Sauver mot de passe
tdfLinked.Attributes = tdfLinked.Attributes Or dbAttachSavePWD
' Chaîne de connexion ODBC pour DAO
tdfLinked.Connect = strConn
' Nom de la table source
tdfLinked.SourceTableName = "dbo.Ref"
 
'Rafraichit les données
'tdfLinked.RefreshLink
' Ajouter à la collection
dbsCurrent.TableDefs.Refresh
 
dbsCurrent.Close
 
' Actualiser fenêtre base de données pour que la nouvelle table apparaisse
Application.RefreshDatabaseWindow
A mon avis il existe mieux.
sylv20 est déconnecté   Envoyer un message privé Réponse avec citation 00
Vieux 31/05/2011, 20h24   #2
Rédacteur
 
Avatar de LedZeppII
 
Homme
Maintenance données produits
Inscription : décembre 2005
Messages : 3 939
Détails du profil
Informations personnelles :
Sexe : Homme
Localisation : France, Yvelines (Île de France)

Informations professionnelles :
Activité : Maintenance données produits
Secteur : Distribution

Informations forums :
Inscription : décembre 2005
Messages : 3 939
Points : 6 278
Points : 6 278
Bonsoir,

L'équivalent «à la main» du code, consiste à cocher la case «Enregistrer le mot de passe» de l'assistant importation, au moment où on sélectionne la table à attacher (lier).

A+
LedZeppII est déconnecté   Envoyer un message privé Réponse avec citation 10
Réponse Proposer ce sujet en actualité
Outils de la discussion



Fuseau horaire GMT +2. Il est actuellement 17h36.


 
 
 
 
Partenaires

Hébergement Web