Connaitre le type d'un element

Bonjour

Je voudrais savoir si il y a un moyen simple de connaitre le type d'un element.
Soit fichier, soit repertoire, soit raccourci

Merci et bonne journée

Bonjour PCPT
Dis donc ta competence n'a d'egal que ta rapidité a repondre :-)
J'suis super content de te parler à nouveau :-)

Merci pour la combine
En fait je cherchais a faire un test pour savoir si je suis sous VISTA ou non
Et j'ai vu que le dossier document and setting est un raccourci maintenant
Donc je me suis dit qu'en testant si c'est un repertoire, je saurais si je suis sous 2000/XP ou sous vista :-)
Pour etre plus certain je lis en plus la clef de registre

J'ai fait cette "glutte" dis moi ce que tu en pense

Private Declare Function GetFileAttributes Lib "kernel32.dll" Alias "GetFileAttributesA" (ByVal lpFileName As String) As Long

Private Sub Form_Load()
 MsgBox OsVista
End Sub

Private Function OsVista()
 
 Dim NomOs As String
 Set WshShell = CreateObject("Wscript.Shell")
 NomOs = WshShell.RegRead("HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion\ProductName")
 
 If GetFileAttributes("c:\Documents and Settings") = vbDirectory Or InStr(UCase(NomOs), "VISTA") = 0 Then
  MsgBox NomOs + Chr(13) + Str(GetFileAttributes("c:\Documents and Settings"))
  OsVista = 0
  Exit Function
 End If
 
 OsVista = 1
 MsgBox NomOs + Chr(13) + Str(GetFileAttributes("c:\Documents and Settings"))
 
End Function

et si je change ma clé à la main, pour le fun.....

nan çà va pas du tout

y'a d'autres api..... dont une pour la version :p
je teste de suite, çà doit renvoyer 6 sous vista de mémoire, mais je ne sais pas pour seven.... peut-être 7

Ouaillle yayaye !!!!!
Mais qu'est ce que je deviendrais sans toi ?????

En tout cas meme en forçant beaucoup, chose que je fais uniquement dans une petite piece carré ou on s'enferme...., jamais j'aurais pu pondre un code de cette classe :-(
Deux heures de travail, et mon code à coté du tiens, y ressemble justement a ce que je fais dans cette petite piece carré ou on s'enferme :-)
En plus, encore plus fort, le raccourcis "Document and settings" je viens de m'appercevoir que on peut l'effacer ......
Alors mon code t'as raison.....outre la clef il aurait pas servi a grand chose

Je te remercie mille fois de ton aide pour ce code qui va me servir presque tous les jours, malheureusement devrais je dire, car je deteste VISTA....mais bon .........bilou y m'a pas demandé :-(

Je te souhaite une excelente soirée

j'ai peu de mérite tu sais

l'API-Guid fournit des centaines d'exemples. c'est un indispensable
http://logiciel.codes-sources.com/logiciels/API-Guide-197.aspx

à bientôt

Pour info, Windows Se7en c'est la version 6.1

ah? merci de l'info
tu en es bien certain?
vista : 6.0 (vérifié)
aurais-tu la numérotation de windows 2008 dans ce cas?...

Oui : [ Lien ]