begin process at 2012 02 12 19:03:25
  Trouver un code source :
 
dans
 
Accueil > 

Code

 > 

Fichier / Disque

 > EQUIVALENT DE APP.PATH EN VB.NET

EQUIVALENT DE APP.PATH EN VB.NET


 Information sur la source

Note :
8 / 10 - par 1 personne
8,00 / 10

  • 1

  • 2

  • 3

  • 4

  • 5

  • 6

  • 7

  • 8

  • 9

  • 10
Catégorie :Fichier / Disque Source .NET ( DotNet ) Classé sous :applicationpath, workingdirectory, apppath Niveau :Débutant Date de création :23/04/2003 Date de mise à jour :23/04/2003 14:26:39 Vu :22 671

Auteur : Crazyht

Ecrire un message privé
Site perso
Ce membre participe au partage de revenus publicitaires
Commentaire sur cette source (12)
Ajouter un commentaire et/ou une note


 Description

Voila de quoi sortir l'emplacement de l'executable en VB.Net

Source

  • Public Function AppPath(ByVal EndWithBackSlach As Boolean) As String
  • Dim p As String
  • ' Recupere le chemin complet avec le nom de l'executable
  • p = Application.ExecutablePath
  • ' Extrait la partie repertoire du chemin complet
  • If (EndWithBackSlach) Then
  • Return p.Substring(0, p.LastIndexOf("\") + 1)
  • Else
  • Return p.Substring(0, p.LastIndexOf("\"))
  • End If
  • End Function
  • Public Function AppPath() As String
  • Return AppPath(True)
  • End Function
  • ' ************
  • ' * Utilisation : *
  • ' ************
  • Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
  • Debug.WriteLine("AppPath(True) : " & AppPath(True))
  • Debug.WriteLine("AppPath() : " & AppPath())
  • Debug.WriteLine("AppPath(False) : " & AppPath(False))
  • End Sub
Public Function AppPath(ByVal EndWithBackSlach As Boolean) As String
	Dim p As String
	' Recupere le chemin complet avec le nom de l'executable
	p = Application.ExecutablePath
	' Extrait la partie repertoire du chemin complet
	If (EndWithBackSlach) Then
		Return p.Substring(0, p.LastIndexOf("\") + 1)
	Else
		Return p.Substring(0, p.LastIndexOf("\"))
	End If
End Function

Public Function AppPath() As String
	Return AppPath(True)
End Function

' ************
' * Utilisation : *
' ************

Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
	Debug.WriteLine("AppPath(True)  : " & AppPath(True))
	Debug.WriteLine("AppPath()      : " & AppPath())
	Debug.WriteLine("AppPath(False) : " & AppPath(False))
End Sub

 Conclusion

Et voila c'est tout simple :)

Bonne prog

@++
Crazyht


 Sources du même auteur

Source avec Zip Source .NET (Dotnet) DEMO BACKGROUNDWORKER & PING
Source avec Zip CLASSE SOMME MD5 EN VB6
MSN LOGGER
EST-ON EN MODE DEBUG (VB6)
Source avec Zip Source avec une capture Source .NET (Dotnet) CONTROLE DE SAISIE DES IP EN VB.NET

 Sources de la même categorie

Source avec Zip Source .NET (Dotnet) MODIFIER LES EXTENSION DES FICHIERS par okosa
ROUTINE DIR RÉCURSIVE POUR OBTENIR LA LISTE DE TOUS LES FICH... par kerisolde
Source avec Zip Source avec une capture FILE,SECURITY,FICHIER par okosa
Source avec Zip Source avec une capture Source .NET (Dotnet) PATCHEUR DE FICHIER par tototh
Source avec Zip Source avec une capture LECTURE DES INFORMATIONS DES DISQUES COMPOSANT UN ENSEMBLE R... par jack

 Sources en rapport avec celle ci

Source .NET (Dotnet) EQUIVALANT DE APP.PATH EN VB.NET par Crazyht

Commentaires et avis

Commentaire de Icem@n le 23/04/2003 14:37:31

Juste ne passant :
System.IO.Path.GetDirectoryName(Application.ExecutablePath)

et si on veux le fichier de config par ex :
System.IO.Path.Combine(System.IO.Path.GetDirectoryName(Application.ExecutablePath), "config.xml")

Bonne Prog ;-)

Commentaire de Crazyht le 23/04/2003 15:29:19 administrateur CS

Wi encore plus rapide mon premier post : http://www.vbfrance.com/article.aspx?Val=8061

Commentaire de Crazyht le 23/04/2003 15:40:10 administrateur CS

Attention l'objet application n'existe que sur les projets Win Forms sinon, il faut remplacer

p=Application.ExecutablePath

par

p=System.Reflection.Assembly.GetExecutingAssembly.Location.ToString()

Voila :)

@++
Crazyht

Commentaire de Wardall le 02/06/2003 13:42:56

Juste en passant. Pas besoin de tous ce code pour extraire le chemin de l'application de type Windows.. Simplement utiliser la Methode suivante :

Dim MyAppPath As String = Application.StartupPath

Commentaire de Crazyht le 02/06/2003 14:40:10 administrateur CS

A certain moment (dans une DLL par exemple) tu n'as pas acces a Application

Commentaire de Maleek le 12/06/2003 18:28:51

Ben v'la, en VB .NET on peut se passer de tout ce jonglage et prendre un raccourci en utilisant directement Application.StartupPath.

Donc p= Application.StartupPath vous donne directement l'équivalent de APP. PATH connu dans les précédentes versions de VB [...]

Commentaire de Crazyht le 13/06/2003 01:57:20 administrateur CS

oui sauf que si tu est dans une librairie .NEt la classe Application n'est pas accessible donc tu l'as dans l'os, d'ou mon poste du 23/04 a 15:40 et celui de 15:29 pour la methode que tu viens de donner mais bon :)

Cordialement
Crazyht

Commentaire de gnasr le 20/09/2004 23:46:30

Vous pouvez tout simplement remplacer "app.path " par ".." .

Commentaire de fg85 le 26/02/2005 19:17:42

hehe les gers!! Mdr
Il suffit de faire "Application.StartupPath()" et le tour est joué .

-------------
http://fg.logiciel.free.fr

Commentaire de Renfield le 21/03/2006 13:18:51 administrateur CS

ouais, enfin, 'mdr' si tu veux, quand deux personnes l'ont dit avant toi....

Commentaire de mams161 le 07/04/2006 13:40:47

On peut également utilisé System.AppDomain.CurrentDomain.BaseDirectory()
Qui renvoie le nom du répertoire avec le "\" à la fin.
Cela fonctionne aussi bien sur une dll, sur un exe, ou en ASP.Net

Commentaire de lurked le 08/01/2008 17:33:16

Bonne source, mais ce n'est pas vraiment ce que je cherchais.

Le faite que certaines personnes ne lisent pas les commentaires, et se croient brillants après avec fait un commentaire de la sorte, qui a été contrarié 2 fois avant, donne tout son sens aux commentaires.....

Les commentaires servent à savoir si la source est fiable, pas a rajouter nos 'Bonnes idées' qui datent de 5ans.

 Ajouter un commentaire


Discussions en rapport avec ce code source dans le forum

syntaxe exacte pour... [ par LeRoux ] Open apppath & "\gameplay\n1\qn1.qdh" For Input As #1comment mettre le apppath et le lien??? sortir des caractères txt sur un classeur excel [ par kobejul08 ] Bonjour,Voil&#224; dans ma form j'ai plusieurs caract&#232;res text que j'aimerais mettre dans un classeur excel.Comment dois je faire?Il y a aussi un est ce possible? [ par kobejul08 ] Voil&#224; j'aimerais enregistrer mes donn&#233;es dans un fichier Word mais ou il y a inclus dans ce fichier word un tableau excel... est ce que c'es VB.Net AppPath [ par MagDix ] Salut à tous...J'utilise cette ces lignes de codes pour le AppPathModule:Public AppPath As<font color="#0000ff" Désérialisation en visual studio 2005 [ par Grefer2luxe ] Bonjour,Je fais actuellement une application en visual studio 2005 et je rencontre un souci. En effet, j'ai réussi à sérialiser dans mon programme mai


Nos sponsors


Sondage...

Comparez les prix

CalendriCode

Février 2012
LMMJVSD
  12345
6789101112
13141516171819
20212223242526
272829    

Consulter la suite du CalendriCode

Photothèque

 
Développement réalisé par Nicolas SOREL (Nix) avec l'aide de : Cyril DURAND et Emmanuel (EBArtSoft), Merci à Vincent pour ses précieux conseils.
CodeS-SourceS.com© Toute reproduction même partielle est interdite sauf accord écrit du Webmaster
CodeS-SourceS.com© est une marque déposée tous droits réservés

Google Coop CodeS-SourceS Google Coop CodeS-SourceS
Temps d'éxécution de la page : 5,460 sec (4)

Nous contacter | Annoncer sur CodeS-SourceS | Mentions légales