B
Brian A.
"Bill in Co." <not_really_here@earthlink.net> wrote in message
news:uYJ4HjwvIHA.2292@TK2MSFTNGP05.phx.gbl...
>
>>> And it STILL doesn't remember ONLY to search on the C: drive next time.
>>
>> Not sure if that has been addressed with a hack or not. That never
>> bothered
>> me, yet I do understand how an extra 2 clicks can be bothersome or hard on
>> some.
>
> Yes, it's a bit of an annoyance.
Ok Bill, this worked on the machines I tested it on, it'll open the search
companion with the lookin box set to whatever drive is set in the code.
Code from:
http://www.winhelponline.com/articl...n-pointing-to-a-specific-folder-or-drive.html
Copy/paste the below code in notepad and save it as a .vbs file.
Set objShell = CreateObject("Shell.Application")
Set objFolder = objShell.Namespace(&H11&)
Set objFolderItem = objFolder.ParseName("C:\")
objFolderItem.InvokeVerb("find")
If you wanted to have it default to a specific directory, then the below code
would be used.
Set objShell = CreateObject("Shell.Application")
Set objFolder = objShell.Namespace("C:\")
Set objFolderItem = objFolder.ParseName("myfolder")
objFolderItem.InvokeVerb("find")
--
Brian A. Sesko { MS MVP_Windows Desktop User Experience }
Conflicts start where information lacks.
http://basconotw.mvps.org/
Suggested posting do's/don'ts: http://dts-l.com/goodpost.htm
How to ask a question: http://support.microsoft.com/kb/555375
news:uYJ4HjwvIHA.2292@TK2MSFTNGP05.phx.gbl...
>
>>> And it STILL doesn't remember ONLY to search on the C: drive next time.
>>
>> Not sure if that has been addressed with a hack or not. That never
>> bothered
>> me, yet I do understand how an extra 2 clicks can be bothersome or hard on
>> some.
>
> Yes, it's a bit of an annoyance.
Ok Bill, this worked on the machines I tested it on, it'll open the search
companion with the lookin box set to whatever drive is set in the code.
Code from:
http://www.winhelponline.com/articl...n-pointing-to-a-specific-folder-or-drive.html
Copy/paste the below code in notepad and save it as a .vbs file.
Set objShell = CreateObject("Shell.Application")
Set objFolder = objShell.Namespace(&H11&)
Set objFolderItem = objFolder.ParseName("C:\")
objFolderItem.InvokeVerb("find")
If you wanted to have it default to a specific directory, then the below code
would be used.
Set objShell = CreateObject("Shell.Application")
Set objFolder = objShell.Namespace("C:\")
Set objFolderItem = objFolder.ParseName("myfolder")
objFolderItem.InvokeVerb("find")
--
Brian A. Sesko { MS MVP_Windows Desktop User Experience }
Conflicts start where information lacks.
http://basconotw.mvps.org/
Suggested posting do's/don'ts: http://dts-l.com/goodpost.htm
How to ask a question: http://support.microsoft.com/kb/555375