Enplacement du répertoire system

Soyez le premier à donner votre avis sur cette source.

Snippet vu 4 167 fois - Téléchargée 47 fois

Contenu du snippet

Ce code vient pas de moi il vient de Reseach Center

Source / Exemple :


Declare Function GetSystemDirectory Lib "kernel32" Alias "GetSystemDirectoryA" ( _
                 ByVal lpBuffer As String, _
                 ByVal nSize As Long) As Long 

Public Function SystemDirectory() As String
' Retourne le chemin du répertoire système de windows
Dim stTmp As String, lgTmp As Long
stTmp = Space$(250)
lgTmp = 251
Call GetSystemDirectory(stTmp, lgTmp)
SystemDirectory = Split(stTmp, Chr$(0))(0)
End Function

Conclusion :


Si vous êtes pas satisfait dans les 30 jours, je m'en TAPE !!!!!!
=> www.psycomaxter.fr.st

A voir également

Ajouter un commentaire Commentaires
Messages postés
47
Date d'inscription
mercredi 21 novembre 2001
Statut
Membre
Dernière intervention
2 avril 2007

Rapide, net, efficace, bref chapô !

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.