Prova così

codice:
MioLivello.innerHTML = MioLivello.innerHTML & "
<a href='#' onClick='naviga("" & elemFolder.Path & "")'>" & elemFolder.Name & "
"