Listing windows shares

I want to make a button that opens a menu of all folders that are shared by windows.

i found a vbscript but i don't know how to pass it to dopus in a way that a list of buttons is created. probably somehow with "Dopus.OutputString" but i wasn't successful with my attempts.

strComputer = "."
Set objWMIService = GetObject("winmgmts:" _
    & "{impersonationLevel=impersonate}!\\" & strComputer & "\root\cimv2")
Set colShares = objWMIService.ExecQuery("Select * from Win32_Share")
For each objShare in colShares
    Wscript.Echo objShare.Path

this opens messageboxes with the paths on my pc. Is it possible, and if how, to implement this with dopus or is there maybe an easier way?

Nice idea, even nicer in Powershell:

gwmi Win32_Share

An interface to Powershell would be great!

There's currently no real way to have scripts dynamically generate arbitrary menus (without extreme kludges, at any rate).

You could write a script which generates a toolbar/menu containing a snapshot of the current shared folders (the toolbars are pretty simple XML files so could be generated easily enough), but it would only be a snapshot.

(It could also be done a bit differently via a VFS plugin but that's a lot of work.)

thanks for the info