VB6

VB6 - Programmation

Marsh Posté le 30-01-2001 à 21:55:05    

Comment trouver le répertoire de windows...ss
 
Comment savoir si un répertoire et un fichier existe???
 
Merci


---------------
Donne un poisson à un homme il mangera une journée, Apprends lui à pêcher, il mangera toute sa vie...
Reply

Marsh Posté le 30-01-2001 à 21:55:05   

Reply

Marsh Posté le 30-01-2001 à 22:00:21    

avec la fonction Dir tu peux obtenir la liste des fichiers d'un répertoire donné

Reply

Marsh Posté le 31-01-2001 à 11:27:50    

Pour récupérer le répertoire de Windows, utilise l'API "GetWindowsDirectory "
Pour l'utiliser fait comme suit.
 
Dans un module:
Public Declare Function GetWindowsDirectory Lib "kernel32" Alias "GetWindowsDirectoryA" (ByVal lpBuffer As String, ByVal nSize As Long) As Long
 
Dans ton code:
Dim retour, sData As String * 255
 
retour = GetWindowsDirectory(sData, Len(sData))
sData = Trim$(Left$(sData, InStr(sData, Chr(0)) - 1))
 
sData contient en retour un caractère chr(0) qu'il faut supprimer.
 
A+

Reply

Sujets relatifs:

Leave a Replay

Make sure you enter the(*)required information where indicate.HTML code is not allowed