能不能用filesystemobject编写一个服务器上的资源管理器？
日期：2012-11-12 浏览次数：21196 次
其实可以这样
left frame:
use filesystemobject function list all folder on server;
use DHTML or treeview display them
onclick call display.asp?foldername
the code is like this:
================================
<%@ LANGUAGE = VBScript %>
<html>
<head>
<style TYPE="text/css">
/* Outline Style Sheet */
UL{cursor: hand;
color: navy;
font-family: Arial}
UL UL {display: none;
margin-left: 20pt}
</style>
<link REL="stylesheet" TYPE="text/css" HREF="css/myCSS.CSS">
<script LANGUAGE="javascript">
<!--
function mousemove()
{
var srcElement;
srcElement=window.event.srcElement;
if ("A" == srcElement.tagName)
{
srcElement.className = "coolstyle";
}
}
function mouseout()
{
var srcElement;
srcElement=window.event.srcElement;
if ("A" == srcElement.tagName)
{
srcElement.className = "normalstyle";
}
}
//-->
</script>
<script LANGUAGE="JavaScript">
function checkParent(src, dest) {
// Search for a specific parent of the current element
while (src!=null) {
if (src.tagName == dest) return src;
src = src.parentElement;
}
return null;
}
function outline() {
// Expand or collapse if a list item is clicked.
var open = event.srcElement;
// Make sure clicked inside an LI. This test allows rich HTML inside lists.
var el = checkParent(open, "LI");
if (null!=el) {
var pos = 0;
// Search for a nested list
for (var pos=0; pos<el.children.length; pos++) {
if ("UL"==el.children[pos].tagName) break;
left frame:
use filesystemobject function list all folder on server;
use DHTML or treeview display them
onclick call display.asp?foldername
the code is like this:
================================
<%@ LANGUAGE = VBScript %>
<html>
<head>
<style TYPE="text/css">
/* Outline Style Sheet */
UL{cursor: hand;
color: navy;
font-family: Arial}
UL UL {display: none;
margin-left: 20pt}
</style>
<link REL="stylesheet" TYPE="text/css" HREF="css/myCSS.CSS">
<script LANGUAGE="javascript">
<!--
function mousemove()
{
var srcElement;
srcElement=window.event.srcElement;
if ("A" == srcElement.tagName)
{
srcElement.className = "coolstyle";
}
}
function mouseout()
{
var srcElement;
srcElement=window.event.srcElement;
if ("A" == srcElement.tagName)
{
srcElement.className = "normalstyle";
}
}
//-->
</script>
<script LANGUAGE="JavaScript">
function checkParent(src, dest) {
// Search for a specific parent of the current element
while (src!=null) {
if (src.tagName == dest) return src;
src = src.parentElement;
}
return null;
}
function outline() {
// Expand or collapse if a list item is clicked.
var open = event.srcElement;
// Make sure clicked inside an LI. This test allows rich HTML inside lists.
var el = checkParent(open, "LI");
if (null!=el) {
var pos = 0;
// Search for a nested list
for (var pos=0; pos<el.children.length; pos++) {
if ("UL"==el.children[pos].tagName) break;
免责声明： 本文仅代表作者个人观点，与爱易网无关。其原创性以及文中陈述文字和内容未经本站证实，对本文以及其中全部或者部分内容、文字的真实性、完整性、及时性本站不作任何保证或承诺，请读者仅作参考，并请自行核实相关内容。
