谁有类似网络硬盘的功能的源码吗？

2009-01-05 10:12:46 205 阅读 AI 写同款 · GEO 优化AI 选题数据监测一键分发 ›

smartctl源码解析与实战：硬盘SMART健康监控从入门到精通 SMART（自我监测、分析和报告技术）是硬盘内置的健康监测系统，通过监控温度、重映射扇区、读写错误率等关键参数，实现对硬盘物理状态的实时评估。其技术原理在于硬盘固件持续收集底层硬件指标，当参数异常或达到阈值时提前预警潜在故障。在数据安全领域，主动的硬盘健康监测已成为保障业务连续性的基础实践，能够有效避免因硬盘突然损坏导致的数据丢失灾难。通过smartctl这一开源命令行工具，用户可以获取并解读SMART原始数据，实现从单机检查到自动化监控的完整解决方案。本文聚焦smartctl源码结构、编译部署与实战应用，阅读详情

是要添加到ASP做的OA系统里，主要功能也是上传下载等
但还有一个要求是用户之间只能看见自己所建文档。
谁有源码吗，比较急，后面催得紧！！希望大家帮帮忙……

...全文

轻松扩展Synology硬盘兼容性，只需一个脚本！ Synology HDD db 是一款开源脚本工具，可突破Synology NAS设备的官方硬盘兼容性限制。该工具支持DSM 6和7系统，允许用户将任意HDD、SSD或NVMe驱动器添加到兼容列表中，并提供恢复功能。核心功能包括自动识别设备信息、管理兼容性设置、优化内存支持、Western Digital驱动器管理、M.2扩展支持等。用户通过SSH运行脚本即可操作，还能选择阻止系统自动更新或调整IronWolf健康监测等高级设置。相比同类工具，该项目提供了更全面的硬盘兼容解决方案，特别适合有特殊存储需求的用阅读详情

jiyi30215

ASP 28,401 成员 356,940 内容

+ 关注 + 加入社区

切换为时间正序

lbcleo 2009-01-07

打赏
举报

mingday 2009-01-05

打赏
举报

加个上传、下载的功能就是了
用网络硬盘功能，有点夸张了。

jiyi30215 2009-01-05

打赏
举报

好的。我先试试，谢谢了

明珠佩佩 2009-01-05

打赏
举报

明珠佩佩 2009-01-05

打赏
举报

<td valign="bottom" align="center">
<table border=0>
<tr height=30>
<td align="center"><input type="button" name="Open" value="打开选择的目录" style='background:#336699' class='Font9BoldWhite' onClick="if(checkSelected(document.mainform.fsel.selectedIndex))
opendir(document.mainform.fsel[document.mainform.fsel.selectedIndex].value)"></td>
</tr>
<tr height=30>
<td align="center">
<%if instr(RootDir,LoginID&"_")>1 or instr(RootDir,"/FileDir/Public")>0 then%>
<input type="button" name="Delete" value="删除" style='background:#336699' class='Font9BoldWhite' onClick="if(checkSelected(document.mainform.fsel.selectedIndex)) delfile('<%=currentfolder%>',document.mainform.fsel[document.mainform.fsel.selectedIndex].value);">
<%elseif trim(RootDir)="../FileDir/"&LoginID or trim(RootDir)="/FileDir/"&LoginID then%>
<input type="button" name="Delete" value="删除" style='background:#336699' class='Font9BoldWhite' onClick="if(checkSelected(document.mainform.fsel.selectedIndex)) delfile('<%=currentfolder%>',document.mainform.fsel[document.mainform.fsel.selectedIndex].value);">
<%else%>
<input type="button" name="Delete" value="删除" style='background:#336699' class='Font9BoldWhite' onClick="if(checkSelected(document.mainform.fsel.selectedIndex)) delfile('<%=currentfolder%>',document.mainform.fsel[document.mainform.fsel.selectedIndex].value);" disabled>

<%end if%>

<%if instr(RootDir,LoginID&"_")>1 or instr(RootDir,"/FileDir/Public")>0 then%>
<input type="button" value="重命名" style='background:#336699' class='Font9BoldWhite' onClick="if(checkSelected(document.mainform.fsel.selectedIndex)) renfile('<%=currentfolder%>',document.mainform.fsel[document.mainform.fsel.selectedIndex].value);">
<%elseif trim(RootDir)="../FileDir/"&LoginID or trim(RootDir)="/FileDir/"&LoginID then%>
<input type="button" value="重命名" style='background:#336699' class='Font9BoldWhite' onClick="if(checkSelected(document.mainform.fsel.selectedIndex)) renfile('<%=currentfolder%>',document.mainform.fsel[document.mainform.fsel.selectedIndex].value);">
<%else%>
<input type="button" value="重命名" style='background:#336699' class='Font9BoldWhite' onClick="if(checkSelected(document.mainform.fsel.selectedIndex)) renfile('<%=currentfolder%>',document.mainform.fsel[document.mainform.fsel.selectedIndex].value);" disabled>

<%end if%>

</td>
</tr>
<tr height=30>
<td align="center">
<%if instr(RootDir,LoginID&"_")>1 or instr(RootDir,"/FileDir/Public")>0 then%>
<input type="button" name="Create" value="创建目录" style='background:#336699' class='Font9BoldWhite' onClick="createdir('<%=currentfolder%>');">
<%elseif trim(RootDir)="../FileDir/"&LoginID or trim(RootDir)="/FileDir/"&LoginID then%>
<input type="button" name="Create" value="创建目录" style='background:#336699' class='Font9BoldWhite' onClick="createdir('<%=currentfolder%>');">
<%else%>
<input type="button" name="Create" value="创建目录" style='background:#336699' class='Font9BoldWhite' onClick="createdir('<%=currentfolder%>');" disabled>

<%end if%>

<input type="button" name="View" value="查看文件" style='background:#336699' class='Font9BoldWhite' onClick="if(checkSelected(document.mainform.fsel.selectedIndex)) viewfile(document.mainform.fsel[document.mainform.fsel.selectedIndex].value);">

</td>
</tr>

</table><br></form>

<form method="post" name="FileUploads" enctype="multipart/form-data" action="FileUpload.asp?RootDir=<%=RootDir%>&FileUpFolder=<%=currentFolder%>">
<table border=0 cellpadding=3 cellspacing=1 bgcolor=#0047b0 width="100%">
<tr bgcolor=#ffffff><td><font color=red>提醒：如果您的文件是 Word、Excel、PowerPoint等文档建议压缩成 .zip文件再上传！</font>
</td></tr>
<tr bgcolor=#ffffff><td>
<table border="0" cellspacing="0" width="100%">
<tr>
<td>文件：</td><td><input type="file" name="File1" size=20 class="input"></td>
</tr>
<tr>
<td>主题：</td><td><input type="text" name="Text1" size=20 maxlength=50 class="input"></td>
</tr>
</table>
</td></tr>

<tr bgcolor=#ffffff><td>
<table border="0" cellspacing="0" width="100%">
<tr>
<td>文件：</td><td><input type="file" name="File2" size=20 class="input"></td>
</tr>
<tr>
<td>主题：</td><td><input type="text" name="Text2" size=20 maxlength=50 class="input"></td>
</tr>
</table>
</td></tr>

<tr bgcolor=#ffffff><td>
<table border="0" cellspacing="0" width="100%">
<tr>
<td>文件：</td><td><input type="file" name="File3" size=20 class="input"></td>
</tr>

<tr>
<td>主题：</td><td><input type="text" name="Text3" size=20 maxlength=50 class="input"></td>
</tr>
</table>
</td></tr>
</table>

<%if instr(RootDir,LoginID&"_")>1 or instr(RootDir,"/FileDir/Public")>0 then%>
<INPUT TYPE="submit" name="cmdUp" value="执行文件上传" style='background:#336699' class='Font9BoldWhite' onClick="return CheckFileData();">
<%elseif trim(RootDir)="../FileDir/"&LoginID or trim(RootDir)="/FileDir/"&LoginID then%>
<INPUT TYPE="submit" name="cmdUp" value="执行文件上传" style='background:#336699' class='Font9BoldWhite' onClick="return CheckFileData();">
<%else%>
<INPUT TYPE="submit" name="cmdUp" value="执行文件上传" style='background:#336699' class='Font9BoldWhite' onClick="return CheckFileData();" disabled>

<%end if%>
</form>

</td>
</tr>

</table>
</div><BR>
</body>
</html>

明珠佩佩 2009-01-05

打赏
举报

<HTML>
<HEAD>
<TITLE> File System Manager </TITLE>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link rel="stylesheet" type="text/css" href="../css/main.css">
</HEAD>
<BODY topmargin=0 marginheight=0>
<form name=deleteform action='FileManager.asp' method=post>
<input type=hidden name=faction value=del>
<input type=hidden name=nf value="">
<input type=hidden name=fsel value="">
<input type=hidden name="RootDir" value="<%=RootDir%>">
</form>
<form name=renameform action='FileManager.asp' method=post>
<input type=hidden name=faction value=ren>
<input type=hidden name=nf value="">
<input type=hidden name=fsel value="">
<input type=hidden name=newname value="">
<input type=hidden name="RootDir" value="<%=RootDir%>">
</form>
<form name=cdir action='FileManager.asp' method=post>
<input type=hidden name=faction value=cdir>
<input type=hidden name=nf value="">
<input type=hidden name=newdir value="">
<input type=hidden name="RootDir" value="<%=RootDir%>">
</form>
<form name=makeonefiles action='FileManager.asp' method=post>
<input type=hidden name=faction value=makefiles>
<input type=hidden name=nf value="">
<input type=hidden name=newfile value="">
</form>
<form name=editform action='FileEdit.asp' method=post>
<input type=hidden name=faction value=editfile>
<input type=hidden name=file2edit value="">
</form>
<form name=viewfileform action='FileManagerViewFile.asp' method=post target="_blank">
<input type=hidden name=f2v value="">
</form>
<form name=writepermform action='FileManager.asp' method=post>
<input type=hidden name=faction value=mfilewrite>
<input type=hidden name=f2mwrite value="">
</form>
<form name=instexform action='FileManager.asp' method=post>
<input type=hidden name=faction value=installex>
<input type=hidden name=exnum value="">
<input type=hidden name="RootDir" value="<%=RootDir%>">
</form>
<form name="mainform" action='FileManager.asp' method=post>
<input type=hidden name=faction value=''>
<input type=hidden name=nf value=''>
<input type=hidden name="RootDir" value="<%=RootDir%>">

<div align="center">
<table border=0 width="98%">
<tr>
<td>
<%if errmsg="1" then
response.write "<font color=#ff0000>"& msginfo1 &"</font>"
elseif errmsg="2" then
response.write "<font color=#ff0000>"& msginfo2 &"</font>"
elseif errmsg="3" then
response.write "<font color=#ff0000>"& msginfo3 &"</font>"
end if
%></td>
<td></td>
</tr>
<tr>
<td width="50%">
<a href="<%=Request.ServerVariables("SCRIPT_NAME")%>?RootDir=<%=RootDir%>">
<img src="icon_home.gif" alt="Root DIR" border=0></a><b>
<%
GetOneFolder (currentfolder)

if ".."&lcase(trim(currentfolder))&"/"= lcase(RootDir) or ".."&lcase(trim(currentfolder))= lcase(RootDir) or lcase(trim(currentfolder)) = lcase(RootDir) then
response.write "根目录 <img src=""icon_upone.gif"" border=0><BR>"
else
response.write replace(currentfolder,"/FileDir","根目录")%>
<a href="<%=Request.ServerVariables("SCRIPT_NAME")%>?nf=<%=UnMappath(strParentFolder)%>&RootDir=<%=RootDir%>"><img src="icon_upone.gif" border=0></a><BR>
<%end if%>
</b>

<select size=22 name=fsel ONDBLCLICK="if((checkSelected(document.mainform.fsel.selectedIndex)&&(checkFolder(document.mainform.fsel[document.mainform.fsel.selectedIndex].value))))
opendir(document.mainform.fsel[document.mainform.fsel.selectedIndex].value);else viewfile(document.mainform.fsel[document.mainform.fsel.selectedIndex].value);">
<%
if str ="" then
response.write "<option value="& currentfolder &"> "
else
response.write str
end if
%>
</select>
</td>

明珠佩佩 2009-01-05

打赏
举报

这里面有你所想要的方法

<%response.buffer= true%>



<%
LoginID=Session("LoginID")
if LoginID="" then response.end

CheckRootDir (RootDir)

dim str,msginfo,strParentFolder
str=""
msginfo1 = "您选择的不是一个合法目录，请重新选择"
msginfo2 = "该目录名已存在或输入错误格式的目录名，请重新输入!"
msginfo3 = "该文件名已存在或输入错误格式的文件名，请重新输入!"

errmsg=trim(request.QueryString("errmsg"))
currentFolder=trim(request.QueryString("nf"))

if currentFolder="" then currentFolder=trim(request.form("nf"))
if currentFolder="" then currentFolder= RootDir

if request.form("faction") = "del" and trim(request("fsel"))<>"" then
DeleteFiles (trim(request("fsel")))
end if

if request.form("faction") = "ren" and trim(request("newname"))<>"" then
RenameFiles trim(request("fsel")), trim(request("newname"))
end if

if request.form("faction") = "cdir" and trim(request("newdir"))<>"" then
CreatDir currentfolder&"/"&trim(request("newdir"))
end if

if request.form("faction") = "makefiles" and trim(request("newfile"))<>"" then
MakeFiles currentfolder&"/"&trim(request("newfile"))
end if

%>

谁有类似网络硬盘的功能的源码吗？

相关推荐