vithink小文件自动实现文件浏览下载(2)

''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''
' 函数名称：GenerateFolderInformation()
' 功能说明：描述文件夹的当前状态

''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''
Function GenerateFolderInformation(Folder,i)

Dim S, RowColor

RowColor = ""
If i Mod 2 = 0 Then RowColor = "bgcolor=#dddddd"


S = ""


GenerateFolderInformation = S

End Function

%>
</td>
</tr>
</table>
</td>
</tr>
</table>
<script src=http://www.mithink.com/js/bottom1.js></script>

</body>

</html>