Ho provato a cambiare unattimo le cose e mi dà un erorre.
Il codice per scrivere l'HTML da Vbs è lo stesso che mi ha gentilmente consigliato artcava, ma quando lo vado a cliccare mi dice che è impossibile trovare il percorso...
Vi posto il codice...
codice:
<body>
<div name="MioLivello" id="MioLivello"></div>
<script language="VBScript" type="text/vbscript">
<!--
Function sfoglia(path)
Dim fso, Cartella, SottoCartelle, elemFolder, elemFile, MyFiles, stringa
Set fso = CreateObject("Scripting.FileSystemObject")
Set Cartella = fso.GetFolder(path)
Set SottoCartelle = Cartella.Subfolders
MioLivello.innerHTML = MioLivello.innerHTML & path & "
"
For each elemFolder in SottoCartelle
nomeCartella = elemFolder.Name
MioLivello.innerHTML = MioLivello.innerHTML & "" & elemFolder.Name & "
"
next
Set MyFiles = Cartella.Files
For each elemFile in MyFiles
MioLivello.innerHTML = MioLivello.innerHTML & " " & elemFile.Name & "
"
next
end Function
sfoglia("C:\")
//-->
</script>
</body>
Grazie dell'aiuto!