hta查看磁盘空间的脚本_hta

<html>
<head>
<title>磁盘空间查看脚本</title>
<hta:application
     applicationname="磁盘空间查看脚"     
     border="dialog"
     borderstyle="normal"
     caption="yes"
     contextmenu="no"
     maximizebutton="no"
     minimizebutton="yes"
     navigable="no"
     scroll="yes"
     selection="no"
     showintaskbar="yes"
     singleinstance="yes"
     sysmenu="yes"
     version="1.0"
     windowstate="normal"
>

<script language="vbscript">
<!-- Insert code, subroutines, and functions here -->
window.resizeTo 500, 420
     ileft=(window.screen.width-500)/2
     itop=(window.screen.height-420)/2         
     window.moveTo ileft,itop                             

Sub Window_onLoad 
     GetDiskSpace 
End Sub

Sub GetDiskSpace
Const HARD_DISK = 3
Const Size = 1048576

strComputer = "."
Set objWMIService = GetObject("winmgmts:" _
     & "{impersonationLevel=impersonate}!\\" & strComputer & "\root\cimv2")
Set colDisks = objWMIService.ExecQuery _
     ("Select * from Win32_LogicalDisk Where DriveType = " & HARD_DISK & "")
     strHTML = "<table align=center width=95% borderColor=#698cc2 border='1' cellSpacing='0' cellpadding='1'>"         
                     strHTML = strHTML & "<tr>"
             strHTML = strHTML & "<td width=110px align=center><font size=2><b>" & "分区" & "</b></td>"
             strHTML = strHTML & "<td width=110px align=center><font size=2><b>" & "容量" & "</b></td>"
             strHTML = strHTML & "<td width=110px align=center><font size=2><b>" & "已用" & "</b></td>"
             strHTML = strHTML & "<td width=110px align=center><font size=2><b>" & "未用" & "</b></td>"
             strHTML = strHTML & "<td width=110px align=center><font size=2><b>" & "空闲" & "</b></td>"

     
For Each objDisk In colDisks     
intFreeSpace = objDisk.FreeSpace/Size
intTotalSpace = objDisk.Size/Size
pctFreeSpace = intFreeSpace/Size/ intTotalSpace/Size
infFuLin = intTotalSpace-intFreeSpace
DeviceID = objDisk.DeviceID
             strHTML = strHTML & "<tr>"
             strHTML = strHTML & "<td width=110px align=center>" & DeviceID & "</td>"
             strHTML = strHTML & "<td width=110px align=right>" & FormatNumber(intTotalSpace,2,-1,-1,0) & "</td>"
             strHTML = strHTML & "<td width=110px align=right><font color=#DB2C00>" & FormatNumber(infFuLin,2,-1,-1,0) & "</td>"
             strHTML = strHTML & "<td width=110px align=right><font color=#008080>" & FormatNumber(intFreeSpace,2,-1,-1,0) & "</td>"
             strHTML = strHTML & "<td width=110px align=right>" & FormatPercent(intFreeSpace/intTotalSpace) & "</td>"

Next
strHTML = strHTML & "</table>"
DataArea.InnerHTML = strHTML
End Sub

</script>
</head>

<body>
<!-- HTML goes here -->
<table align=center width=95%><font color="#C63358"><b>磁盘空间查看脚本</b></font><br>
     <font size="2">显示各磁盘分区使用情况(<font color="#FF0000">/MB</font>)</font></font></table>
<body bgcolor="#99CCFF">
     <span id = "DataArea"></span>
</body>
</html> 
保存为hta文件.

时间: 2024-11-10 01:15:40

hta查看磁盘空间的脚本_hta的相关文章

linux centos系统硬盘已经满了(提示超过90%使用),但是df查看磁盘空间只占用了40%

问题描述 linux centos系统硬盘已经满了(提示超过90%使用),但是df查看磁盘空间只占用了40% linux centos系统硬盘已经满了(提示超过90%使用),但是df查看磁盘空间只占用了40%为什么?该如何解决呢?谢谢 解决方案 1.centos有时在统计磁盘空间的时候存在误差,特别是在虚拟机上,建议你先重启一下系统,然后再用df命令看看磁盘空间. 解决方案二: 先用df查看一下磁盘空间分布状态.是不是有临时文件占用了 解决方案三: find path -type f -size

Linux:centos释放缓存,查看磁盘空间大小,xxx文件夹, 查看文件夹大小,查看剩余内存,查看xxx软件位置,统计某文件夹,统计某文件夹下目录数量,查看文件夹大小,给文件夹下所有的文件赋值权限

一台老的PHP后台服务器,今天用 free -m 查看,发现内存跑满了. 再 top,然后按下shift+m,也就是按内存占用百分比排序,发现排在第一的进程,才占用0.9%,那是什么占用的呢?谷歌了一下,据说是centos为了提高效率,把部分使用过的文件缓存到了内存里.如果是这样的话,我又不需要这样的文件性能,那就可以释放.如下两个命令就可以: #sync #echo 3 > /proc/sys/vm/drop_caches 内存释放后,就占用很低了,如下: Centos上的最终命令是: [ro

linux 查看磁盘空间大小命令_Linux

Ubuntu 查看文件以及磁盘空间大小管理 (1)查看文件大小  查看当前文件夹下所有文件大小(包括子文件夹) du -sh # du -h 15M ./package 16K ./.fontconfig 4.0K ./.cache 5.1M ./.rpmdb 20M . 查看指定文件夹下所有文件大小(包括子文件夹) # du -h ftp 3.8G ftp/sanya/doc 3.8G ftp/sanya 4.0K ftp/testftp/doc 1.4M ftp/testftp 875M f

linux怎么查看磁盘空间

  一.df 命令; df 是来自于coreutils 软件包,系统安装时,就自带的;我们通过这个命令可以查看磁盘的使用情况以及文件系统被挂载的位置; 举例: [root@localhost beinan]# df -lh Filesystem 容量 已用 可用 已用% 挂载点 /dev/hda8 11G 6.0G 4.4G 58% / /dev/shm 236M 0 236M 0% /dev/shm /dev/sda1 56G 22G 35G 39% /mnt/sda1 我们从中可以看到,系统

linux下查看磁盘空间

  如果要查看磁盘还剩多少空间,当然是用df的命令了. [root@localhost ~]# df -h 文件系统 容量 已用 可用 已用% 挂载点 /dev/sda2 14G 11G 2.6G 82% / /dev/sda1 99M 14M 81M 14% /boot tmpfs 442M 275M 168M 63% /dev/shm /dev/mapper/vg_test-lv_test 24M 1.3M 21M 6% /mnt/lvm [root@localhost ~]# 当然你可能并

HTA编辑HOST文件的脚本_hta

<HTML> <HEAD> <TITLE>HOSTS 文件编辑器</TITLE> <meta http-equiv="Content-Type" content="text/html; charset=gb2312"> <meta http-equiv="Content-Language" content="zh-CN"> <HTA:APPLICAT

ORA-00257错误:归档日志所在磁盘空间使用100%出错解决

现象: 正在进行DML操作时,操作一直无法完成.退出SQLPLUS时一直无响应--卡着不动无法正常退出. 登陆数据库所在主机,使用SQLPLUS登陆DBA用户时,提示归档出错. [oracle@oel-01 ~]$ sqlplus bys/bys SQL*Plus: Release 11.2.0.1.0 Production on Sun Jul 21 17:55:09 2013 Copyright (c) 1982, 2009, Oracle.  All rights reserved. ER

SQL Server--获取磁盘空间使用情况

原文:SQL Server--获取磁盘空间使用情况 对于DBA来说,监控磁盘使用情况是必要的工作,然后没有比较简单的方法能获取到磁盘空间使用率信息,下面总结下这些年攒下的脚本: 最常用的查看磁盘剩余空间,这个属于DBA入门必记的东西: -- 查看磁盘可用空间 EXEC master.dbo.xp_fixeddrives xp_fixeddrives方式有点是系统自带,可直接使用,缺点是不能查看磁盘总大小和不能查看SQL Server未使用到的磁盘信息 ======================

SQL Server获取磁盘空间使用情况

对于DBA来说,监控磁盘使用情况是必要的工作,然后没有比较简单的方法能获取到磁盘空间使用率信息,下面总结下这些年攒下的脚本: 最常用的查看磁盘剩余空间,这个属于DBA入门必记的东西: -- 查看磁盘可用空间 EXEC master.dbo.xp_fixeddrives xp_fixeddrives方式有点是系统自带,可直接使用,缺点是不能查看磁盘总大小和不能查看SQL Server未使用到的磁盘信息 使用sys.dm_os_volume_stats函数 --===================