~ Edito ~
12/03/2006 @ 13:39
Depuis la dernière mise à jour (qui remonte à... oulala plusieurs mois), un petit ménage de printemps s'impose. Ca tombe bien, c'est presque la période. Au menu, et progressivement sur les jours à venir, rafraîchissement de plusieurs fonctions et procédures, nouvelles APIs et nouveaux programmes.
~ Rechercher ~
~ Annuaire VB ~
~ Partenaires ~
|
Fonction GetWindowsDirectory
Declare Function GetWindowsDirectory Lib "kernel32" Alias "GetWindowsDirectoryA" ( _ ByVal lpBuffer As String, _
ByVal nSize As Long) As Long
Versions : . Windows 95/98 : Oui . Windows NT : A partir de 3.1 . Windows 2000/XP : OuiDescription : Permet de connaître le nom du répertoire Windows.
lpBuffer : Chaîne qui recevra en retour le nom du répertoire.
nSize : Taille de la chaîne qui recoit le résultat.
Renvoie la longueur du résultat donné si la fonction a réussi, sinon 0. Si l'erreur vient du fait que la taille de la chaîne n'est pas assez importante, le résultat retourné est la longueur à prévoir pour récupérer le résultat.
Exemple d'utilisation :
Public Function WindowsDirectory() As String
' Retourne le chemin du répertoire windows
Dim stTmp As String, lgTmp As Long
stTmp = Space$(250)
lgTmp = 251
Call GetWindowsDirectory(stTmp, lgTmp)
WindowsDirectory = Split(stTmp, Chr$(0))(0)
End Function
Retour à la liste des API |