删除以下目录下的以.cll文件为扩展名的所有文件（可以修改扩展名，删除对应的文件）
C:\Documents and Settings\系统登陆名\Local Settings\Temp
下面是第一种方法，比较复杂：
<html>
<script type="text/javascript">
function test(){
var WshShell =new ActiveXObject("WScript.Shell");
//fso为FileSystemObject;
//f为Folder对象;
//fc为要赋值为 Enumerator 对象的变量名
//f1为File对象
//s判断是否删除，s=1表示删除成功
var fso,f,fc,f1,s=0;
fso = new ActiveXObject("Scripting.FileSystemObject");
//根据指定路径中的文件夹返回相应的 Folder 对象
//WshShell.ExpandEnvironmentStrings("%USERNAME%")获取当前系统登陆用户名
f = fso.GetFolder("c:\\Documents and Settings\\"+WshShell.ExpandEnvironmentStrings("%USERNAME%")+"\\Local Settings\\Temp");
//返回一个 Files 集合，由指定文件夹中包含的所有 File 对象组成，包括设置了隐藏和系统文件属性的文件。
fc = new Enumerator(f.files);
//循环判断
for (; !fc.atEnd(); fc.moveNext())
{
//如果为CLL 文件
if(fso.getFile(fc.item()).type=="CLL 文件")
{
//根据指定的路径(fc.item())中的文件返回相应的 File 对象。
f1 = fso.GetFile(fc.item());
//执行删除
f1.Delete();
//删除标记
s=1;
}
}
if(s==1){
alert("删除成功");
}else{
alert(".cll文件不存在");
}
}
</script>
<body>
<input value="测试" type="button" onclick="test();">
</body>
</html>
下面是第二种方法：
<html>
<body>
<input value="测试" type="button" onclick="test();">
</body>
<script type="text/javascript">
function test(){
var wshShell =new ActiveXObject("WScript.Shell");
//username 存放登陆用户名
var username = wshShell.ExpandEnvironmentStrings("%USERNAME%");
//fso用来处理文件和文件夹
var fso = new ActiveXObject("Scripting.FileSystemObject");
//path删除文件的路径
var path = "c:\\Documents and Settings\\"+username+"\\Local Settings\\Temp";
//如果指定的文件夹存在则返回 True ；否则返回 False
if(fso.FolderExists(path))
{
try{
fso.DeleteFile(path+"\\*.cll");
alert("删除成功！");
}catch(e){
alert(".CLL" + e.message);
}
}else
{
alert("不存在这个目录："+path);
}
}
</script>
</html>
下边是用javascript中获取机器名和window登录名
<!--在javascript中获取机器名和window登录名-->
<script language=javascript>
var WshShell =new ActiveXObject("WScript.Shell");
alert("计算机名 = "+ WshShell.ExpandEnvironmentStrings("%COMPUTERNAME%"));
alert("登录用户名 = "+ WshShell.ExpandEnvironmentStrings("%USERNAME%"));
</script>
<script language=javascript>
var wshNetwork = new ActiveXObject("WScript.Network");
alert("域名 = "+ wshNetwork.UserDomain);
alert("计算机名 = "+ wshNetwork.ComputerName);
alert("登录用户名 = "+ wshNetwork.UserName);
</script>
要运行上述脚本，需要放宽IE的权限
需要下面选项内容
工具>Internet选项>安全>Internet>自定义级别>ActiveX控件和插件>对没有标记为安全的ActiveX控件进行初始化和脚本运行
设置为启运
//获取计算机名
var wsh=new ActiveXObject("WScript.Network");
alert(wsh.ComputerName);
有什么不对的地方大家评论下吧
分享到：
相关推荐
选择的的文件类型也是可以被限制的，因此用户只能选择指定的适当的文件，例如*.jgp;*.gif。 当选定文件以后，每个文件都会被验证和处理。当Flash上传文件的时候，由开发人员预定义的Javascript事件会被定时触发...
③ “文件－新建－text”，就可以建立一个空的文本文件，保存时，这个文件自动带有扩展名".txt"，也就避免了令人头疼的确认 ④ 模板设置文件名称为“template.ini”，如果和主程序同一路径，可以使用相对路径 罗嗦了...
在通过名称搜索文件的情况下，您还必须能够指定其扩展名作为名称的一部分。 浏览建立的初始路径以及从该路径创建的所有文件夹。 因此，用户将无法查看或导航到“根”文件夹的父文件夹。 将文件上传到目录 请参阅...
去掉文件的后缀名... 12 验证邮箱的正则表达式... 12 匹配源代码中的链接... 13 匹配链接的文字... 14 正则判断标签是否闭合... 14 用正则获得指定标签的内容... 15 正则判断是否为数字与字母的混合... 16 空格与...
4、修正“文件_改扩展名”当后缀名错误情况下会删除原文件的BUG。 5、新增“进程_取同名ID”取相同进程ID，成功返回相同进程ID数量，失败返回-1。 6、修正“键盘_单击”当参数2为空时，按下未放开的问题，感谢易友...
量化应用于灰度图像更改图像颜色深度从图像边缘提取高频颜色从图像中删除边距通过限制搜索深度递归遍历路径移动文件夹的所有内容以指定格式的字符串获取文件的最后修改时间合并父路径和子路径获取目录中经过过滤的...
★★★常见文件扩展名和它们的说明 常见文件扩展名和它们的说明 A ACE：Ace压缩档案格式 ACT：Microsoft office助手文件 AIF，AIFF：音频互交换文件，Silicon Graphic and Macintosh应用程序的声音格式 ANI：...
2.获取文件扩展名 3.获取文件类型 4.视频格式转为Flv 5.生成Flv视频的缩略图 6.转换文件并保存在指定文件夹下 7.转换文件并保存在指定文件夹下 8.运行mencoder的视频解码器转换 复制代码 21.随机数类 BaseRandom 1....
2.获取文件扩展名 3.获取文件类型 4.视频格式转为Flv 5.生成Flv视频的缩略图 6.转换文件并保存在指定文件夹下 7.转换文件并保存在指定文件夹下 8.运行mencoder的视频解码器转换 复制代码 21.随机数类 BaseRandom 1....
取文件大小文件_取最近访问时间文件_取创建时间文件_取修改时间文件_取文件目录文件_取路径文件名文件_文件扩展名分割文件_目录文件名分割文件_创建文件文件_检测权限文件_写入文件文件_读取文件文件_读取某行数据_...
- 增添文件类型扩展名 - AutoUpdate - 缓冲区溢出保护 - 日志文件格式 - Lotus Notes - 镜像任务 - 扫描 - 有害程序策略 - 文档 - 参与 McAfee 测试程序的测试 - 联系信息 - 版权和商标归属 ...
③ “文件－新建－text”，就可以建立一个空的文本文件，保存时，这个文件自动带有扩展名".txt"，也就避免了令人头疼的确认 ④ 模板设置文件名称为“template.ini”，如果和主程序同一路径，可以使用相对路径 罗嗦了...
upLinkExt：超链接上传前限制本地文件扩展名 参数值：超链接上传前限制的文件扩展名列表，默认为：zip,rar,txt，建议与服务端扩展名检查列表一致 upImgUrl：图片文件上传接收URL 参数值：接收用户上传的服务器端程序...
------------------------- DotNetTextBox 更新历史 ----------------------------- 2007/8/18 Version 3.3.1 Free <br>Updates: 1) 改进文件重命名的安全BUG,现在重命名功能不可修改文件后缀名称...
5个目标文件，演示Address EJB的实现，创建一个EJB测试客户端，得到名字上下文，查询jndi名，通过强制转型得到Home接口，getInitialContext()函数返回一个经过初始化的上下文，用client的getHome()函数调用Home接口...
1.完善“文件_改扩展名”的参数备注 感谢 落雪 的提醒 精易模块 V3.53 what’s new：（20131220） 1.完善 “编码_URL编码”对 参数 欲编码的文本 是否为空进行判断 2.完善 “普通填表.网页_验证码同步”的备注,...
5个目标文件，演示Address EJB的实现，创建一个EJB测试客户端，得到名字上下文，查询jndi名，通过强制转型得到Home接口，getInitialContext()函数返回一个经过初始化的上下文，用client的getHome()函数调用Home接口...
5)修正上传文件、上传模板及上传媒体文件功能中文件无法删除的BUG! 6)调整了控件弹出窗口的方式,部分功能的模式窗口转换为Div+CSS的窗口! 7)调整pathtype属性默认值为AbsoluteFull(绝对全路径)! 8)增加对VS2008的...
文件的后缀名, *号任意的文件名 44 二．内存出错或是系统出错引起蓝屏 48 三．本机病毒删除不了，解决方法是把硬盘拆下来换到别台主机上进行杀毒，要求挂上去的主机要采用正版杀毒软件，升过级的才可以 49 四．识别...