1. Accueil
  2. Tous les snippets
  3. Snippets Visual Basic / VB.NET
  4. Chemin base courante access

Chemin base courante access

Soyez le premier à donner votre avis sur cette source.

Snippet vu 14 340 fois - Téléchargée 39 fois

Commenter

Contenu du snippet

Cette fonction permet sous access, de trouver le chemin de la base courante. Pratique pour ouvrir ses connections en relatif et non en absolu...
Je ne savais pas comment faire cela, j'ai posé la question dans le forum et personne ne m'ayant répondu j'ai pensé que cela pouvait interessé d'autres personnes (malgré la simplicité du code, j'ai galéré à trouver comment faire (utiliser les bons objets et la bonne propriété) donc j'espère que cela évitera à d'autres de trop chercher...).
@+

Source / Exemple : 


Public Function BasePath() As String
Dim strconnection As String
Dim pos As Integer
strconnection = Application.CurrentProject.BaseConnectionString
pos = InStr(1, strconnection, "Data source=")
strconnection = Mid(strconnection, pos + 12)
pos = InStr(1, strconnection, ";")
strconnection = Left(strconnection, pos - 1)
BasePath = strconnection
End Function

A voir également

Ajouter un commentaire Commentaires
Signaler
Messages postés
117
Date d'inscription
lundi 23 octobre 2000
Statut
Membre
Dernière intervention
12 août 2009
et aussi CurrentDB.Name
Signaler
Messages postés
1
Date d'inscription
jeudi 11 septembre 2003
Statut
Membre
Dernière intervention
16 avril 2004
pour moi ça marche aussi très bien avec CurrentProject.Path
Signaler
Messages postés
109
Date d'inscription
dimanche 23 décembre 2001
Statut
Membre
Dernière intervention
26 octobre 2007
mais dites-moi, c'est possible de modifier cette propriété de façon à pouvoir séparer l'exécutable de access et la base de donnée dans laquelle sont faits les enregistrements???

GENRE:

J'ai fait un prog access,
Plusieurs utilisateurs ont utilisé le truc et ont des bases assez grosses,
Je veux faire une mise-à-jour: je suis dans la merde si les deux sont en 1 non???
Mais avec ça, il suffit de remplacer le .mde non???
Signaler
Messages postés
1
Date d'inscription
jeudi 6 février 2003
Statut
Membre
Dernière intervention
21 mai 2003
Merci ça c'est cool.
Je comprends meme pas qu'il n'y ai pas cette propriété pour l'objet application
Signaler
Messages postés
14
Date d'inscription
lundi 23 décembre 2002
Statut
Membre
Dernière intervention
1 août 2003
Adiu

Effectivement un code très utile
Merci
S'inscrire maintenant

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !

Les membres obtiennent plus de réponses que les utilisateurs anonymes.

Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.

Le fait d'être membre vous permet d'avoir des options supplémentaires.

Du même auteur (PatriceVB)