td> "
   SI=SI&"FSO文件操作模块"
   SI=SI&"</td></tr>"
   If Not ObT(0,1) Then
   SI=SI&"<tr><td height='20'></td></tr>"
   Else
   Set ABC=New LBF:SI=SI&ABC.ShowDriver():Set ABC=Nothing
   SI=SI&"<tr><td height='20'>    "
   SI=SI&"<a href='javascript:ShowFolder(""C:\\Progra~1"")'>C:\Progra~1</a>"
   SI=SI&"</td></tr>"
   SI=SI&"<tr><td height='20'>    "
   SI=SI&"<a href='javascript:ShowFolder(""C:\\Docume~1"")'>C:\Docume~1</a>"
   SI=SI&"</td></tr>"
   SI=SI&"<tr><td height='20'>    "
   SI=SI&"<a href='javascript:ShowFolder("""&RePath(WWWRoot)&""")'>站点根目录</a>"
   SI=SI&"</td></tr>"
   SI=SI&"<tr><td height='20'>    "
   SI=SI&"<a href='javascript:ShowFolder("""&RePath(RootPath)&""")'>本程序目录</a>"
   SI=SI&"</td></tr>"
   SI=SI&"<tr><td height='20'>    "
   SI=SI&"<a href='javascript:FullForm("""&RePath(Session("FolderPath")&"\NewFolder")&""",""NewFolder"")'>新建目录</a>"
   SI=SI&"</td></tr>"
   SI=SI&"&l

上一页  [1] [2] [3] [4] [5] [6] [7] [8] [9] [10]  ... 下一页  >> 

在google里搜索更多ASP站长助手源代码

	Web www.51ec.org

上一篇信息学院： 在ASP中结合对象和组件

下一篇信息学院： 解析ASP的Application和Session对象