Enplacement du répertoire system

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

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.