Hopefully there's no way to get it executed automatically. Maybe you can
create a *.vbs file, attach that to the e-mail and ask the user to save the
attachment as a file and run it.

--
Viele Gruesse / Best regards
Michael Bauer - MVP Outlook
-- www.VBOffice.net --

Am Thu, 23 Nov 2006 02:57:01 -0800 schrieb A1pro:

This seems to do the programatic trick:
Sub CreateShortcut()

On Error Resume Next

Dim wsShell As Object
Dim wsSCut As Object

Set wsShell = CreateObject("WScript.Shell")

DesktopPath = wsShell.SpecialFolders("Desktop") 'Finds Desktop folder

shortcutPath = DesktopPath & "\" & "telewest.lnk" ' adds shortcut name

Set wsSCut = wsShell.CreateShortcut(shortcutPath) ' creates shortcut


With wsSCut
.TargetPath = "http://62.30.31.74" ' this selects iexplorer and
sets
the ip address
.Save
End With

Set wsSCut = Nothing
Set wsShell = Nothing
End Sub

Now I'm trying to think how to distribute it.

Any way to embed this on an email?
or do security issues get on the way?

any help would be appreciated

TIA