Google Groups no longer supports new Usenet posts or subscriptions. Historical content remains viewable.
Dismiss

creare collegamento sul desktop

121 views
Skip to first unread message

MAUROAP

unread,
Jan 19, 2009, 10:04:06 AM1/19/09
to
devo realizzare uno script che crea un collegamento sul desktop
al programmma connessione desktop remoto
%SystemRoot%\system32\mstsc.exe

come posso fare mi aiutate?


ObiWan [MVP]

unread,
Jan 19, 2009, 11:55:33 AM1/19/09
to

prova a leggere questo

http://www.codeproject.com/KB/files/SimpleWayToCreateShortcut.aspx

in due parole, uno shortcut (collegamento) non è altro che un file
contenente alcune informazioni che permettono sia di risalire al
file da aprire/avviare tramite lo shortcut sia di specificare quale
icona visualizzare; a questo punto, a parte il codice presente nel
sito di cui sopra, ti basterebbe mettere assieme un minimo di
codice che apra e scriva il file "lnk" nella posizione desiderata


Alessandro Angeli

unread,
Jan 19, 2009, 12:02:05 PM1/19/09
to
From: "ObiWan [MVP]"

>> devo realizzare uno script che crea un collegamento sul
>> desktop al programmma connessione desktop remoto
>> %SystemRoot%\system32\mstsc.exe
>
>> come posso fare mi aiutate?
>
> prova a leggere questo
>
> http://www.codeproject.com/KB/files/SimpleWayToCreateShortcut.aspx

Visto che questo e` un NG sull'ActiveScripting, esiste
WshShell.CreateShortcut().

--
// Alessandro Angeli
// MVP :: DirectShow / MediaFoundation
// mvpnews at riseoftheants dot com
// http://www.riseoftheants.com/mmx/faq.htm


ObiWan [MVP]

unread,
Jan 21, 2009, 11:42:17 AM1/21/09
to
>> http://www.codeproject.com/KB/files/SimpleWayToCreateShortcut.aspx

> Visto che questo e` un NG sull'ActiveScripting, esiste
> WshShell.CreateShortcut().

si, hai ragione :) anche se basterebbe anche solo
usare il filesystem object per creare un file :)


Alessandro Angeli

unread,
Jan 21, 2009, 12:25:02 PM1/21/09
to
From: "ObiWan [MVP]"

> si, hai ragione :) anche se basterebbe anche solo
> usare il filesystem object per creare un file :)

Per una volta che MS pubblica un'API e non costringe al
reverse-engineering, usiamola :-)

Reventlov

unread,
Jan 22, 2009, 5:02:40 PM1/22/09
to
Il giorno Mon, 19 Jan 2009 12:02:05 -0500, "Alessandro Angeli" <nob...@nowhere.in.the.net>
ha scritto:

>Visto che questo e` un NG sull'ActiveScripting, esiste
>WshShell.CreateShortcut().

Set WShell = WScript.CreateObject("WScript.Shell")
Set oShortcut = WShell.CreateShortcut("C:\dati\MioCollegamento.lnk")

A questo punto si possono impostare le proprietą del collegamento. Le proprietą
eventualmente non impostate sono settate a valori di default.
L'essenziale č indicare il TargetPath.

oShortcut.TargetPath = "c:\WINDOWS\system32\eudcedit.exe"
' punta all'editor di caratteri personalizzati di XP.
oShortcut.WorkingDirectory = "c:\WINDOWS\System32"
' Directory di lavoro, senza "\" finale.
oShortcut.WindowStyle = 1
oShortcut.Hotkey = "CTRL+SHIFT+F"
oShortcut.IconLocation = "c:\windows\notepad.exe, 0"
oShortcut.Description = "Editor di Caratteri."
oShortcut.Save
' Aggiorna il file esistente o lo scrive se č nuovo.
--
Giovanni Cenati (Bergamo, Italy)
Write to "Reventlov" at katamail com
http://digilander.libero.it/Cenati (Esempi e programmi in VbScript)
--

ZF

unread,
Feb 12, 2009, 1:01:29 PM2/12/09
to

Reventlov wrote:
> Il giorno Mon, 19 Jan 2009 12:02:05 -0500, "Alessandro Angeli"
> <nob...@nowhere.in.the.net> ha scritto:
>> Visto che questo e` un NG sull'ActiveScripting, esiste
>> WshShell.CreateShortcut().
>
> Set WShell = WScript.CreateObject("WScript.Shell")
> Set oShortcut = WShell.CreateShortcut("C:\dati\MioCollegamento.lnk")
>

> A questo punto si possono impostare le proprietà del collegamento. Le
> proprietà eventualmente non impostate sono settate a valori di
> default.
> L'essenziale è indicare il TargetPath.


>
> oShortcut.TargetPath = "c:\WINDOWS\system32\eudcedit.exe"
> ' punta all'editor di caratteri personalizzati di XP.
> oShortcut.WorkingDirectory = "c:\WINDOWS\System32"
> ' Directory di lavoro, senza "\" finale.
> oShortcut.WindowStyle = 1
> oShortcut.Hotkey = "CTRL+SHIFT+F"
> oShortcut.IconLocation = "c:\windows\notepad.exe, 0"
> oShortcut.Description = "Editor di Caratteri."
> oShortcut.Save

> ' Aggiorna il file esistente o lo scrive se è nuovo.


Se per caso domani quando uscite trovate il tappeto rosso sulle scale,
sapete perché

GRAZIE!!! :D

Andry

unread,
Apr 18, 2009, 2:05:57 PM4/18/09
to
credo che devi fare copy %SystemRoot%\system32\mstsc.exe
%SystemRoot%\Documents and settings\nomedeltuoaccount\desktop

"MAUROAP" <MAU...@discussions.microsoft.com> ha scritto nel messaggio
news:27C3437B-48CF-40B5...@microsoft.com...

Reventlov

unread,
Apr 19, 2009, 9:38:39 AM4/19/09
to

Questo č un esempio che crea un link al programma di windows per creare font di caratteri.
qualche spiegazione su digilander.libero.it/Cenati/shortcut.htm

oShortcut.TargetPath = "c:\WINDOWS\system32\eudcedit.exe"
' punta all'editor di caratteri personalizzati di XP.
oShortcut.WorkingDirectory = "c:\WINDOWS\System32"
' Directory di lavoro, senza "\" finale.
oShortcut.WindowStyle = 1
oShortcut.Hotkey = "CTRL+SHIFT+F"
oShortcut.IconLocation = "c:\windows\notepad.exe, 0"
oShortcut.Description = "Editor di Caratteri."

0 new messages