Changing Folder View in ActiveX WebBrowser in Dlg

[stupomer]

Hi All,
Does anyone know how to change folder view in a WebBrowser window I have in a dialog. Currently, I am using that window to show either pdf's or folder views. When the item to be displayed is a folder with many items, the default icon view is undesirable because the filenames are too long. The "Details" folder view would work but I don't know how to send that message. I looked here but don't quite understand it:

http://msdn.microsoft.com/en-us/library/...S.85).aspx

This is some sample code:

Function dlg_SampleFolder

Code:

Copy      Help

\Dialog_Editor
function# hDlg message wParam lParam
if(hDlg) goto messages


str controls = "23"
str ax23SHD = "http://www.quickmacros.com/forum"
if(!ShowDialog("dlg_SampleFolder" &dlg_SampleFolder &controls)) ret

;BEGIN DIALOG
;0 "" 0x90C80A44 0x100 0 0 511 682 "Doc Browser"
;16 Button 0x54032000 0x0 8 16 232 32 "Browse Folder1"
;1 Button 0x54030001 0x0 1312 10 12 14 "OK"
;23 ActiveX 0x54030000 0x0 8 52 498 621 "SHDocVw.WebBrowser"
;17 Button 0x54032000 0x0 246 16 70 32 "Open Pdf1"
;3 Button 0x54032000 0x0 320 16 62 32 "Open Url1"
;6 Button 0x54032000 0x0 384 16 68 32 "Open WordDoc1"
;5 Button 0x54032000 0x0 454 16 54 32 "Open ExcelDoc1"
;END DIALOG
;DIALOG EDITOR: "" 0x2030208 "" "" ""

ret
;messages
sel message
,case WM_INITDIALOG
,case WM_DESTROY    
,case WM_SETCURSOR
,case WM_COMMAND goto messages2
ret
;messages2
sel wParam
,case IDOK
,case IDCANCEL
,case 16
,,_s = "C:\Folder1"
,,_s.setwintext(id(23 hDlg))
,case 4
,,_s = "C:\Folder1\WordDoc1.doc"
,,_s.setwintext(id(23 hDlg))
,case 5
,,_s = "C:\Folder1\ExcelDoc1.xls"
,,_s.setwintext(id(23 hDlg))
,case 3
,,_s = "http://www.google.com"
,,_s.setwintext(id(23 hDlg))
ret 1

Thanks for any thoughts!
Stuart