|
[WD8 / WD7.5] Extraction informations des raccourcis. |
|
Anonyme
|
Bonjour,
Leur du développement d'une application, il m'as été nécessaire d'extraire les informations d'un fichier ".lnk". Pour l'instant j'utilisais le code fourni par ce site nommé "InfoRaccourci", malheureusement ce code ne fonctionne plus sur XP (enfin.. j'ai que un version test de longhorn mais je pense que c'est la meme chose).
Quelqu'un aurait-il un méthode pour extraire ces informations ?
.. j'ai regarder dans les api, rien, j'ai trouver du code c qui utilise des objets com.. impossible dans wd.
Merci de votre aide.
Alois Cochard
Contribution le : 04/01/2004 13:55
|
|
|
Re: [WD8 / WD7.5] Extraction informations des raccourcis. |
|
Animateur WDF
Inscrit: 02/03/2003 04:07
De Noisy le grand(93)
Post(s): 2745
|
Au contraire, les objets com son normallement accessibles en WL. Quel est l'objet com?.
Contribution le : 05/01/2004 09:32
|
|
|
Re: [WD8 / WD7.5] Extraction informations des raccourcis. |
|
Anonyme
|
Objet com accesible en WL????
C'est fantastique ce que tu dit la met comment ?`
Pour l'instant j'ai trouver une solution avec un script WHS qui écrit un ".ini".
Voila le code vbscript : --------------------- If WScript.Arguments.Count = 0 Then WScript.Quit Else Dim ws,fso,iniout Dim SCPath,SCTarget,SCDescription,SCArguments,SCHotKey,SCWindowStyle,SCWorkingDir,SCIcon Dim CFPath
SCPath=WScript.Arguments.Item(0) CFPath=WScript.Arguments.Item(1)
Set ws = CreateObject("WScript.Shell") Set fso = CreateObject("Scripting.FileSystemObject") Set iniout = fso.CreateTextFile(CFPath,TRUE)
With ws.CreateShortcut(SCPath) SCTarget=.TargetPath SCDescription=.Description SCArguments=.Arguments SCHotKey=.HotKey SCWindowStyle=.WindowStyle SCWorkingDir=.WorkingDirectory SCIcon=.IconLocation End With
iniout.WriteLine("[LNK]") iniout.WriteLine("DESCRIPTION=" & SCDescription) iniout.WriteLine("TARGET=" & SCTarget) iniout.WriteLine("ARGUMENTS=" & SCArguments) iniout.WriteLine("WORKINGDIR=" & SCWorkingDir) iniout.WriteLine("ICON=" & SCIcon) iniout.WriteLine("HOTKEY=" & SCHotKey) iniout.WriteLine("STYLE=" & SCWindowStyle) End If -----------------------
Alors comment faire sa : Set ws = CreateObject("WScript.Shell") Set fso = CreateObject("Scripting.FileSystemObject")
En w-langage ?
Merci bcp.
Contribution le : 05/01/2004 11:17
|
|
|
Re: [WD8 / WD7.5] Extraction informations des raccourcis. |
|
Animateur WDF
Inscrit: 02/03/2003 04:07
De Noisy le grand(93)
Post(s): 2745
|
Une traduction à la volée pour l'initialisation
// ou est initialiser WScript ?
//If WScript.Arguments.Count = 0 Then
//WScript.Quit
//Else
Ws est un objet automation Dynamique
Fso est un Objet automation Dynamique
IniOut est un objet automation Dynamique
SCPath est une chaine
SCTarget est une Chaine
SCDescription est une Chaine
SCArguments est une Chaine
SCHotKey est une Chaine
SCWindowStyle est une Chaine
SCWorkingDir est une Chaine
SCIcon est une Chaine
Ws = Allouer un Objet Automation "WScript.Shell"
Fso = Allouer un Objet Automation "Scripting.FileSystemObject"
CFPath est une Chaine
Pour démarrer...
Contribution le : 05/01/2004 12:40
|
|
|
Re: [WD8 / WD7.5] Extraction informations des raccourcis. |
|
Anonyme
|
J'y crois pas !!! je savais même pas sa!!!
Tout à coup... tout les possibitlés qui s'ouvre a moi!!
Merci infiniment.
Contribution le : 06/01/2004 07:52
|
|
|
Re: [WD8 / WD7.5] Extraction informations des raccourcis. |
|
Anonyme
|
Voici une procédure global terminée.
Pour ceux que sa intéresse... (compatible 2k/XP)
PROCEDURE pg_Fichier_LienInfo(_FichierRaccourci) Ws est un objet automation "WScript.Shell"
Ws>>CreateShortcut(_FichierRaccourci) _Chemin=Ws>>CreateShortcut(_FichierRaccourci)>>TargetPath _Description=Ws>>CreateShortcut(_FichierRaccourci)>>Description _Argument=Ws>>CreateShortcut(_FichierRaccourci)>>Arguments _HotKey=Ws>>CreateShortcut(_FichierRaccourci)>>HotKey _RepertoireTravail=Ws>>CreateShortcut(_FichierRaccourci)>>WorkingDirectory
RENVOYER _Chemin+TAB+_Description+TAB+_Argument+TAB+_RepertoireTravail+TAB+_HotKey
Contribution le : 06/01/2004 08:09
|
|
Vous ne pouvez pas débuter de nouveaux sujets.
Vous pouvez voir les sujets.
Vous ne pouvez pas répondre aux contributions.
Vous ne pouvez pas éditer vos contributions.
Vous ne pouvez pas effacez vos contributions.
Vous ne pouvez pas ajouter de nouveaux sondages.
Vous ne pouvez pas voter en sondage.
Vous ne pouvez pas attacher des fichiers à vos contributions.
Vous ne pouvez pas poster sans approbation.