smiler44
03-11-2011, 10:34 AM
Is it possible to obtain the URL addresses of all the web sites I have saved in Internet Explorer ?
I then want to run a program to see if the web page still exists?
I'd be using VB5
thanks
smiler44
HiTechCoach
03-14-2011, 04:16 PM
I do not see why not. Your IE favorites are stored as shortcuts in your favorites folder under your profile.
smiler44
03-20-2011, 12:50 AM
Hi HiTechCoach,
how do I actually obtain the url's (properties) of the links?
smiler44
HiTechCoach
03-20-2011, 07:02 AM
Try:
' Author: Denis St-Pierre
' *Retrieves* Shortcut info without using WMI
' The *Undocumented* Trick: use the ".CreateShortcut" method without the
' ".Save" method; works like a GetShortcut when the shortcut already exists!
strTargetPath="C:\Documents and Settings\All Users\Desktop\My Shortcut.lnk"
Set wshShell = WScript.CreateObject("WScript.Shell")
' CreateShortcut works like a GetShortcut when the shortcut already exists!
Set objShortcut = wshShell.CreateShortcut(strTargetPath)
' For URL shortcuts, only ".FullName" and ".TargetPath" are valid
WScript.Echo "Full Name : " & objShortcut.FullName
WScript.Echo "Arguments : " & objShortcut.Arguments
WScript.Echo "Working Directory : " & objShortcut.WorkingDirectory
WScript.Echo "Target Path : " & objShortcut.TargetPath
WScript.Echo "Icon Location : " & objShortcut.IconLocation
WScript.Echo "Hotkey : " & objShortcut.Hotkey
WScript.Echo "Window Style : " & objShortcut.WindowStyle
WScript.Echo "Description : " & objShortcut.Description
Set objShortcut = Nothing
Set wshShell = Nothing
** Note: This is VB Script (.VBS) code. It can be easily be converted to VBA or VB
smiler44
06-11-2011, 03:43 AM
thanks but i have no idea how to convert frm vbs to vba
smiler44