Est-il possible de récupérer dans dans une variable le chemin complet de la
base dans laquelle se trouvent les tables liées, dans le cas d'une
application type base frontale/base dorsale ?
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
david
salut,
pour ce faire : - ajoute une référence DAO (menu outils dans le créateur de module) - utilise de code
private sub readBackConnection() Dim db As DAO.Database Dim tb As DAO.TableDef
Set db = CurrentDb() For Each tb In db.TableDefs If tb.Connect <> "" Then 'faire ici le traitement d'utilisation de la variable de connection 'Si on modifie la valeur (changement de chemin ou même de base) 'Utiliser tb.refreshLink pour rafraichir la liaision End If Next tb set db=nothing end sub
A+
salut,
pour ce faire :
- ajoute une référence DAO (menu outils dans le créateur de
module)
- utilise de code
private sub readBackConnection()
Dim db As DAO.Database
Dim tb As DAO.TableDef
Set db = CurrentDb()
For Each tb In db.TableDefs
If tb.Connect <> "" Then
'faire ici le traitement d'utilisation de la variable de
connection
'Si on modifie la valeur (changement de chemin ou même de
base)
'Utiliser tb.refreshLink pour rafraichir la liaision
End If
Next tb
set db=nothing
end sub
pour ce faire : - ajoute une référence DAO (menu outils dans le créateur de module) - utilise de code
private sub readBackConnection() Dim db As DAO.Database Dim tb As DAO.TableDef
Set db = CurrentDb() For Each tb In db.TableDefs If tb.Connect <> "" Then 'faire ici le traitement d'utilisation de la variable de connection 'Si on modifie la valeur (changement de chemin ou même de base) 'Utiliser tb.refreshLink pour rafraichir la liaision End If Next tb set db=nothing end sub
A+
Domi
Bonjour, et merci...
Mais je me suis peut-être mal expliqué.
Ce que je recherche, c'est pouvoir récupérer dans une variable le chemin de mes tables sous le format "D:Lechemin...".
Domi
salut,
pour ce faire : - ajoute une référence DAO (menu outils dans le créateur de module) - utilise de code
private sub readBackConnection() Dim db As DAO.Database Dim tb As DAO.TableDef
Set db = CurrentDb() For Each tb In db.TableDefs If tb.Connect <> "" Then 'faire ici le traitement d'utilisation de la variable de connection 'Si on modifie la valeur (changement de chemin ou même de base) 'Utiliser tb.refreshLink pour rafraichir la liaision End If Next tb set db=nothing end sub
A+
Bonjour, et merci...
Mais je me suis peut-être mal expliqué.
Ce que je recherche, c'est pouvoir récupérer dans une variable le chemin de
mes tables sous le format "D:Lechemin...".
Domi
salut,
pour ce faire :
- ajoute une référence DAO (menu outils dans le créateur de
module)
- utilise de code
private sub readBackConnection()
Dim db As DAO.Database
Dim tb As DAO.TableDef
Set db = CurrentDb()
For Each tb In db.TableDefs
If tb.Connect <> "" Then
'faire ici le traitement d'utilisation de la variable de
connection
'Si on modifie la valeur (changement de chemin ou même de
base)
'Utiliser tb.refreshLink pour rafraichir la liaision
End If
Next tb
set db=nothing
end sub
Ce que je recherche, c'est pouvoir récupérer dans une variable le chemin de mes tables sous le format "D:Lechemin...".
Domi
salut,
pour ce faire : - ajoute une référence DAO (menu outils dans le créateur de module) - utilise de code
private sub readBackConnection() Dim db As DAO.Database Dim tb As DAO.TableDef
Set db = CurrentDb() For Each tb In db.TableDefs If tb.Connect <> "" Then 'faire ici le traitement d'utilisation de la variable de connection 'Si on modifie la valeur (changement de chemin ou même de base) 'Utiliser tb.refreshLink pour rafraichir la liaision End If Next tb set db=nothing end sub
A+
3stone
Salut,
"Domi" | Ce que je recherche, c'est pouvoir récupérer dans une variable le chemin de | mes tables sous le format "D:Lechemin...".
Utilise cette fonction : http://www.3stone.be/access/articles.php?lng=fr&pg)
