Web Shortcuts
Script
Sunday, December 18, 2005 by jlaj1989 | Discussion: DesktopX
How can i make a web page launch using a script. Instead of change the type to url or shortcut. Thanks 
jlaj1989
Reply #2 Tuesday, December 20, 2005 6:59 AM
Reply #2 Tuesday, December 20, 2005 6:59 AM
Thank You Very Much 
Yep It Worked. Thanks Again 
Yep It Worked. Thanks Again 
Please login to comment and/or vote for this skin.
Welcome Guest! Please take the time to register with us.
There are many great features available to you once you register, including:
- Richer content, access to many features that are disabled for guests like commenting on the forums and downloading skins.
- Access to a great community, with a massive database of many, many areas of interest.
- Access to contests & subscription offers like exclusive emails.
- It's simple, and FREE!
Reply #1 Tuesday, December 20, 2005 3:41 AM
Dim myURL
Sub Object_OnScriptEnter()
myURL = "http:\\www.stardock.com"
End Sub
Sub Object_OnLButtonUp(x,y,dragged)
If dragged = False Then
Dim WshShell
Set WshShell = CreateObject("WScript.Shell")
WshShell.Run Chr(34) & myURL & Chr(34)
Set WshShell = Nothing
End If
End Sub
Elsewhere you you redefine the variable to set which URL is launched.
DesktopX.ScriptObject("ABOVEOBJECT'SNAME").myURL = "www.wincustomize.com"