Comment récupérer les chemins Systems de windows?
Comment récupérer les chemins Systems de windows?
Salutation, j'aimerais savoir comment on fait pour récuperer quelques chemins system de Window du style : System32\, dossier system, etc..
est ce qu'il existe une des fonctions comme on trouve dans VBScript(SpécialFolder!!) ??,
merci à tous
est ce qu'il existe une des fonctions comme on trouve dans VBScript(SpécialFolder!!) ??,
merci à tous
- Kwai chang caine
- Messages : 6989
- Inscription : sam. 23/sept./2006 18:32
- Localisation : Isere
Rebonjour FORTIX
Ce code donné par le génial soldat inconnu peux peut etre t'aider.
Il ne doit pas etre de lui, j'en sais rien......
Ce code donné par le génial soldat inconnu peux peut etre t'aider.
Il ne doit pas etre de lui, j'en sais rien......

Code : Tout sélectionner
; Auteur : Le Soldat Inconnu, d'après le code de je sais plus ...
;
; Explication du programme :
; Récupérer les dossier spéciaux de windows
Procedure.s GetSpecialFolderLocation(lngCSIDL.l)
Protected lngRet.l, strLocation.s, pidl.l
strLocation = Space(260)
lngRet = SHGetSpecialFolderLocation_(0, lngCSIDL, @pidl)
If lngRet = 0
SHGetPathFromIDList_(pidl, @strLocation)
If lngRet = 0
strLocation = RTrim(strLocation)
If Right(strLocation, 1) <> "\"
strLocation = strLocation + "\"
EndIf
ProcedureReturn strLocation
EndIf
CoTaskMemFree_(pidl)
EndIf
EndProcedure
;- Programme principal
For n = 0 To 80
If GetSpecialFolderLocation(n) <> ""
Debug RSet(Str(n), 2, "0") + " " + GetSpecialFolderLocation(n)
EndIf
Next
c'est exactement çà kcc 
sinon, dans certains cas les fonctions pb natives peuvent suffir :

sinon, dans certains cas les fonctions pb natives peuvent suffir :
Code : Tout sélectionner
Debug GetEnvironmentVariable("windir")
Debug GetEnvironmentVariable("homepath")
Debug ""
Debug ""
Debug ""
Debug ""
If ExamineEnvironmentVariables()
While NextEnvironmentVariable()
Debug EnvironmentVariableName() + " = " + EnvironmentVariableValue()
Wend
EndIf
- Kwai chang caine
- Messages : 6989
- Inscription : sam. 23/sept./2006 18:32
- Localisation : Isere
Bonjour Flype
Mais ou va tu chercher tout ça ???
Longueur code flype = 0.000001%
Efficacité code flype = 2000 %
J'suis dégoutté

Encore un code génial a garder dans ma hotte pour noel....
Mais ou va tu chercher tout ça ???
Longueur code flype = 0.000001%
Efficacité code flype = 2000 %
J'suis dégoutté


Encore un code génial a garder dans ma hotte pour noel....
Y en a t'il d'autres que windir et homepath ?Debug GetEnvironmentVariable("windir")
Debug GetEnvironmentVariable("homepath")
- Kwai chang caine
- Messages : 6989
- Inscription : sam. 23/sept./2006 18:32
- Localisation : Isere
C'est vrai ......
J'ai pas tout lu "FREUD"
Mais il faut dire, que pour un amateur comme moi, quand on tombe sur ce genre de rubrique, les yeux nous tombent
Donc on a tendance a zapper à tort
Et apres on se rend compte que le bon FRED avait prevu plein de chose et que l'on utilise que 70% du language.
Et au fait :
Tu n'a pas repondu à ma question, car ça, j'y ai pas vu en dessous de "printer"
Debug GetEnvironmentVariable("windir")
Debug GetEnvironmentVariable("homepath")
Y en a t'il d'autres que windir et homepath ?

J'ai pas tout lu "FREUD"
Mais il faut dire, que pour un amateur comme moi, quand on tombe sur ce genre de rubrique, les yeux nous tombent

Donc on a tendance a zapper à tort

Et apres on se rend compte que le bon FRED avait prevu plein de chose et que l'on utilise que 70% du language.
Et au fait :
Tu n'a pas repondu à ma question, car ça, j'y ai pas vu en dessous de "printer"

Debug GetEnvironmentVariable("windir")
Debug GetEnvironmentVariable("homepath")
Y en a t'il d'autres que windir et homepath ?
- Kwai chang caine
- Messages : 6989
- Inscription : sam. 23/sept./2006 18:32
- Localisation : Isere
@Minirop
Encore un truc que je connaissais pas.
Quand je pense qu'on en est a VISTA et que je connais pas tout de W2000
voir meme W95
Alors ça sert a quelque chose dans windows tous ces petits onglets ou y'a noir de hieroglyphes incomprehensible quand on clique dessus
@Flype
Merci pour le compliment, j'hésite toujours avant de mettre un lien ou un code, j'ai toujours peur d'etre a coté de la plaque.
C'est vrai certain repondent pour ne rien dire (Hors mis les compliments) ou pas dans le sujet et j'aime pas trop ça.
Ta remarque m'encourage.
Je me demande ce que deviens le soldat, il nous manque, j'espere le relire un jour.
Encore merci de vos explications et de votre patience à vous deux.
Encore un truc que je connaissais pas.
Quand je pense qu'on en est a VISTA et que je connais pas tout de W2000



Alors ça sert a quelque chose dans windows tous ces petits onglets ou y'a noir de hieroglyphes incomprehensible quand on clique dessus

@Flype
Merci pour le compliment, j'hésite toujours avant de mettre un lien ou un code, j'ai toujours peur d'etre a coté de la plaque.
C'est vrai certain repondent pour ne rien dire (Hors mis les compliments) ou pas dans le sujet et j'aime pas trop ça.

Ta remarque m'encourage.
Je me demande ce que deviens le soldat, il nous manque, j'espere le relire un jour.
Encore merci de vos explications et de votre patience à vous deux.
le seul gros changement je dirais qu'il c'est fait entre win3.1 (dos) et 95 (NT) le reste reste relativement pareil, par exemple, Vista, il change quoi par rapport à XP (à part couter bcp plus cher ?), juste des pseudo effets 3D ainsi qu'une sécurité un peu plus élevé. le fond reste le mêmeKwai chang caine a écrit :Encore un truc que je connaissais pas.
Quand je pense qu'on en est a VISTA et que je connais pas tout de W2000voir meme W95
![]()
![]()
- Kwai chang caine
- Messages : 6989
- Inscription : sam. 23/sept./2006 18:32
- Localisation : Isere
Je vais tout faire pour ne pas avoir VISTA.
J'en ai marre de cette course aux barette mémoire et GO sur DD
Tu as raison, je crois qu'avec XP Pro on est arrivé a un systeme tres stable et operationnel surtout pour les drivers et le reseau qui posaient pas mal de blemes.
Si en plus, d'apres ce que tu dit ils ont pas fait beaucoup mieux que XP.
Alors .......XP je suis XP je resterais
Jusqu'a que je soit obligé a cause des MAJ.
Et pis ça me laissera le temps de le connaitre mieux grace à vous tous
J'en ai marre de cette course aux barette mémoire et GO sur DD
Tu as raison, je crois qu'avec XP Pro on est arrivé a un systeme tres stable et operationnel surtout pour les drivers et le reseau qui posaient pas mal de blemes.
Si en plus, d'apres ce que tu dit ils ont pas fait beaucoup mieux que XP.
Alors .......XP je suis XP je resterais
Jusqu'a que je soit obligé a cause des MAJ.
Et pis ça me laissera le temps de le connaitre mieux grace à vous tous
