同样是磁盘配额,但用的是ASP,不过好像简单多了.
2004-06-22 21:13
411 查看
ASP的:
<%
disk=request.QueryString("disk")
user=request.QueryString("user")
if disk="" or user="" then
Response.Write "没有指定硬盘或用户(disk,user)"
else
Set colDiskQuotas = CreateObject("Microsoft.DiskQuota.1")
colDiskQuotas.Initialize disk, True
set objUser = colDiskQuotas.FindUser(user)
Response.write "警告等级:"
Response.write objUser.QuotaThreshold
Response.write "<p>配额限制:"
Response.write objUser.QuotaLimit
Response.write "<p>使用数量:"
Response.write objUser.QuotaUsed
Response.write "<p>状态:"
Response.write colDiskQuotas.QuotaState
end if
%>
ASP.NET的:
<%@ Page language="c#" aspcompat="true" AutoEventWireup="false" %><%@ Page language="c#" aspcompat="true" AutoEventWireup="false" %>
<%@ Import Namespace= "DiskQuotaTypeLibrary"%>
<%
string disk = Request.Params("disk");
stirng user = Request.Params("user");
if (disk==null || user==null){
Response.Wirte("没有输入盘或用户名(disk,user).");
return;
}
try{
DiskQuotaControlClass diskQuotaControl = new DiskQuotaControlClass();
//Initializes the control to the specified path
diskQuotaControl.Initialize ("f://", true);
DIDiskQuotaUser dskuser = diskQuotaControl.FindUser("staff");
Response.Write("磁盘配额:" +dskuser.QuotaLimitText + "<br>");
Response.Write("警告容量:" + dskuser.QuotaThresholdText + "<br>");
Response.Write("已用容量:" + dskuser.QuotaUsedText + "<br>");
Response.Write("状态:" + dskuser.AccountStatus + "<br>");
Response.Write( "用户名:" + dskuser.LogonName);
}catch{
%><%@ Import Namespace= "DiskQuotaTypeLibrary"%><% string disk = Request.Params("disk"); stirng user = Request.Params("user"); if (disk==null || user==null){ Response.Wirte("没有输入盘或用户名(disk,user)."); return; } try{ DiskQuotaControlClass diskQuotaControl = new DiskQuotaControlClass(); //Initializes the control to the specified path diskQuotaControl.Initialize ("f://", true); DIDiskQuotaUser dskuser = diskQuotaControl.FindUser("staff"); Response.Write("磁盘配额:" +dskuser.QuotaLimitText + "
"); Response.Write("警告容量:" + dskuser.QuotaThresholdText + "
"); Response.Write("已用容量:" + dskuser.QuotaUsedText + "
"); Response.Write("状态:" + dskuser.AccountStatus + "
"); Response.Write( "用户名:" + dskuser.LogonName); }catch{ %><%@ Import Namespace= "DiskQuotaTypeLibrary"%><% string disk = Request.Params("disk"); stirng user = Request.Params("user"); if (disk==null || user==null){ Response.Wirte("没有输入盘或用户名(disk,user)."); return; } try{ DiskQuotaControlClass diskQuotaControl = new DiskQuotaControlClass(); //Initializes the control to the specified path diskQuotaControl.Initialize ("f://", true); DIDiskQuotaUser dskuser = diskQuotaControl.FindUser("staff"); Response.Write("磁盘配额:" +dskuser.QuotaLimitText + "
"); Response.Write("警告容量:" + dskuser.QuotaThresholdText + "
"); Response.Write("已用容量:" + dskuser.QuotaUsedText + "
"); Response.Write("状态:" + dskuser.AccountStatus + "
"); Response.Write( "用户名:" + dskuser.LogonName); }catch{ %>
<%
disk=request.QueryString("disk")
user=request.QueryString("user")
if disk="" or user="" then
Response.Write "没有指定硬盘或用户(disk,user)"
else
Set colDiskQuotas = CreateObject("Microsoft.DiskQuota.1")
colDiskQuotas.Initialize disk, True
set objUser = colDiskQuotas.FindUser(user)
Response.write "警告等级:"
Response.write objUser.QuotaThreshold
Response.write "<p>配额限制:"
Response.write objUser.QuotaLimit
Response.write "<p>使用数量:"
Response.write objUser.QuotaUsed
Response.write "<p>状态:"
Response.write colDiskQuotas.QuotaState
end if
%>
ASP.NET的:
<%@ Page language="c#" aspcompat="true" AutoEventWireup="false" %><%@ Page language="c#" aspcompat="true" AutoEventWireup="false" %>
<%@ Import Namespace= "DiskQuotaTypeLibrary"%>
<%
string disk = Request.Params("disk");
stirng user = Request.Params("user");
if (disk==null || user==null){
Response.Wirte("没有输入盘或用户名(disk,user).");
return;
}
try{
DiskQuotaControlClass diskQuotaControl = new DiskQuotaControlClass();
//Initializes the control to the specified path
diskQuotaControl.Initialize ("f://", true);
DIDiskQuotaUser dskuser = diskQuotaControl.FindUser("staff");
Response.Write("磁盘配额:" +dskuser.QuotaLimitText + "<br>");
Response.Write("警告容量:" + dskuser.QuotaThresholdText + "<br>");
Response.Write("已用容量:" + dskuser.QuotaUsedText + "<br>");
Response.Write("状态:" + dskuser.AccountStatus + "<br>");
Response.Write( "用户名:" + dskuser.LogonName);
}catch{
%><%@ Import Namespace= "DiskQuotaTypeLibrary"%><% string disk = Request.Params("disk"); stirng user = Request.Params("user"); if (disk==null || user==null){ Response.Wirte("没有输入盘或用户名(disk,user)."); return; } try{ DiskQuotaControlClass diskQuotaControl = new DiskQuotaControlClass(); //Initializes the control to the specified path diskQuotaControl.Initialize ("f://", true); DIDiskQuotaUser dskuser = diskQuotaControl.FindUser("staff"); Response.Write("磁盘配额:" +dskuser.QuotaLimitText + "
"); Response.Write("警告容量:" + dskuser.QuotaThresholdText + "
"); Response.Write("已用容量:" + dskuser.QuotaUsedText + "
"); Response.Write("状态:" + dskuser.AccountStatus + "
"); Response.Write( "用户名:" + dskuser.LogonName); }catch{ %><%@ Import Namespace= "DiskQuotaTypeLibrary"%><% string disk = Request.Params("disk"); stirng user = Request.Params("user"); if (disk==null || user==null){ Response.Wirte("没有输入盘或用户名(disk,user)."); return; } try{ DiskQuotaControlClass diskQuotaControl = new DiskQuotaControlClass(); //Initializes the control to the specified path diskQuotaControl.Initialize ("f://", true); DIDiskQuotaUser dskuser = diskQuotaControl.FindUser("staff"); Response.Write("磁盘配额:" +dskuser.QuotaLimitText + "
"); Response.Write("警告容量:" + dskuser.QuotaThresholdText + "
"); Response.Write("已用容量:" + dskuser.QuotaUsedText + "
"); Response.Write("状态:" + dskuser.AccountStatus + "
"); Response.Write( "用户名:" + dskuser.LogonName); }catch{ %>
相关文章推荐
- 一个使用ASP.NET来操作COM的磁盘配额代码.
- HI,各位,我是mdot
- 如何做:创建自定义帐户来运行 ASP.NET
- Asp.Net安全验证小结
- ASP.NET比ASP好在哪
- Asp.Net安全验证小结
- Asp.Net在SqlServer中的图片存取技术
- Asp.net中使用javascrip的模态窗体的一点体会。
- ASP.NET features we use, ASP.NET experience I have
- ASP在中小企业中具有巨大的潜在市场
- 使用 C# .NET 在 ASP.NET 应用程序中实现基于窗体的身份验证
- Life Cycle Stages of ASP.NET Web Page.
- 出错后导向Error.aspx
- Some Articles Help You To Understand ASP.NET ViewState
- Top Ten Tips for Programming ASP.NET
- ASP.NET与非.NET语言进行交互心得
- 如何用Asp判断你的网站的虚拟物理路径
- URL Rewriting with ASP.NET
- Implement Membership & Roles & Personalization in ASP.NET 1.1
- 任何共享软件作者都能挣到一年10万美金以上的收入,只要他想的话