elenco dinamico su due colonne

[jspippo]

Ciao

ho un elenco dinamico, fatto in ASP :

<%

Dim FileObject
Set FileObject = Server.CreateObject("Scripting.FileSystemObject")

StrPath = Server.MapPath("/public/modulistica/")

call GetFiles(StrPath)

call GetFolders(StrPath)

Set FileObject = Nothing


Sub GetFiles(strPath)

Set f = FileObject.GetFolder( strPath )
Set fc = f.Files

For Each f1 in fc
'if instr(f1.name, ".zip") then
Response.write "[*]" & f1.name
'end if
Next

Set fc = Nothing
Set f = Nothing
End sub

Sub GetFolders(strPath)

Set f = FileObject.GetFolder( strPath )
Set fc = f.SubFolders

For Each f1 in fc

Response.write "[*]" & f1.name
Response.write "<ul>"
call GetFiles(f1)

call GetFolders(f1)

Response.write "[/list]"
Next

Set fc = Nothing
Set f = Nothing
End sub

%>

come posso dividerlo in due o tre colonne?

grazie

[salasir]

Multi column list