Displaying folder contents
[brazen weep], you out there?
Saturday, June 18, 2005 by Xixao3D | Discussion: DesktopX
I'm looking for someone who may have an idea on how to create a folder-like widget that will display the contents of a folder, much like Windows would. Here's what I have in mind...
The theme I'm creating completely conceals Windows, but offers access to the Start menu, desktop icons, and My Documents via a password-protected Admin Panel. The Admin Panel is scripted and working extremely well, but I can't figure out how to create the widgets to "replace" Windows Explorer by displaying folder contents inside my widgets. Basically, I want to force users to rely solely on my theme and prevent access to Windows Explorer.
Any ideas?
.: EDIT :.
-------------
I just found something close to what I'm looking for. [brazen weep] created a FileLister and Launcher that does an excellent job of replacing Windows Explorer with one of his own creation. If there is a way to use the same basic idea to create a box containing just specific folders, and display icons rather than just filenames, then it would be the solution I've been looking for. Anyone know how this can be achieved? [brazen weep]?
Reply #2 Saturday, June 18, 2005 8:12 PM
Reply #3 Sunday, June 19, 2005 7:07 PM
1)Make a web browser with Activex control
2)Add Control.Navigate2 "::{20D04FE0-3AEA-1069-A2D8-08002B30309D}"
that should open you a window to my computer, but you have to make your border and controls
Control.Navigate2 "::{450D8FBA-AD25-11D0-98A8-0800361B1103}"
that one is for my documents but i dont know if it changes due to different usernames

Reply #4 Sunday, June 19, 2005 8:09 PM

Reply #5 Tuesday, June 21, 2005 4:17 PM
.: EDIT :.
Found it. Here it is, if anyone wants to use it:
Sub Control_NavigateComplete2(pDisp, URL)
If DesktopX.ScriptObject("Object").Control.LocationURL = "" Then
'Action, such as Script.MsgBox("Oops")
Else
DesktopX.ScriptObject("Object").Control.GoBack
End If
End Sub
Reply #6 Monday, July 3, 2006 4:45 PM
Sub Object_OnLButtonDown(x,y)
On Error Resume Next <--- Stops any errors so nothing thrown at you it just doesn't do anything.
DesktopX.ScriptObject("WebCtrl").Control.GoBack
End Sub
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 Saturday, June 18, 2005 8:07 PM
but if you can do this you will have a full windows explorer.i do belive my computer is a pidl,which navigate2 should be able to open?
just dont know how?
i thought about making a fake my computer with just shortcuts to C:, my Documents etc
but then im still stuffed for recycle bin.And i cant make proper shortcuts to control panel etc
any help would be great