清除acaddoc.lsp

原创 2008年10月03日 19:20:00
Set fso = CreateObject("Scripting.FileSystemObject")
input=InputBox("输入目录")
If input="" Then WScript.Quit
Set objFolder = fso.GetFolder(input)
Search(objFolder)
Function Search(objFolder)
For Each objFile In objFolder.Files
od = fso.GetFileName(objFile)
If od="acaddoc.lsp" Then
  Set fn=fso.OpenTextFile(fso.GetFile(objFile).Path,1)
  Do While fn.AtEndOfStream<>True
   s=fn.ReadLine
   If s="""boot.dat""" Then
    fn.close
     fso.DeleteFile(objFile)
    Exit Do
   End If
Loop
End If
Next
For Each objSubFolder In objFolder.SubFolders
Search(objSubFolder)
Next
End Function

 

不能加载在acad2000doc.lsp文件中添加的命令

不能加载在acad2000doc.lsp文件中添加的命令 产品: 操作系统: AutoCAD® 2000Windows 95, Windows 98, Windows NT 4.0 修订时间: 01/...
  • haydnliu
  • haydnliu
  • 2004年10月10日 17:45
  • 1154

清除

################ o_device 脏数据 ######################## select DISTINCT(deviceid) from o_device a wh...
  • dongfengkuayue
  • dongfengkuayue
  • 2016年01月28日 18:06
  • 296

如何清除匿名定时器

在JS中,并没有查看所有定时器的接口,所以无法知道程序中使用了多少个定时器,更无法知道定时器对应的执行函数,在这种情况下,我们一来难以清除匿名定时器,二来难以一次清除所有的定时器。幸好,现在主流的浏览...
  • yiifaa
  • yiifaa
  • 2016年09月28日 11:07
  • 1166

清除内/外缓存,清除数据库,清除sharedPreference,清除files和清除自定义目录

主要功能清除内/外缓存,清除数据库,清除sharedPreference,清除files和清除自定义目录 /* * 文 件 名: DataCleanManager.java * 描 述:...
  • u012587005
  • u012587005
  • 2016年01月04日 16:27
  • 281

html5 canvas拓展clearRect()实现圆形区域清理

canvas提供的clearRect(x, y, width, height)方法只能清理出特定位置的矩形区域,以下代码则能实现对圆形区域的清 理,主要是利用计算圆周率时的方法,将整个圆切成一个一个细...
  • xiongqiangwin1314
  • xiongqiangwin1314
  • 2015年09月19日 10:44
  • 3617

oracle 延时块清理

在Oracle中数据锁(这里主要指TX类型行锁)实际上是数据的属性,存储在块首部,称之为事务槽(ITL)。COMMIT操作的职责包括释放块上的锁,实际的释放方式即清除块上相应的事务槽,但这里存在一个性...
  • weiwangsisoftstone
  • weiwangsisoftstone
  • 2015年03月04日 09:36
  • 1150

Css+Div中清除全局样式的方法

在CSS中,已在前面定义了一个全局(即公共)的样式,若在后面的有些样式中要用这个样式,但是并不需要其中的有些设置。这时我们可以通过一个Clear属性的值设为:Both就可达到自己想要的效果。 例:在c...
  • yaohaibing576082210
  • yaohaibing576082210
  • 2010年08月13日 15:17
  • 61015

Android Webview清除缓存和Cookie

最近项目中遇到用webView显示内容的需求.
  • ronaldong99
  • ronaldong99
  • 2014年10月23日 10:49
  • 9328

清除git配置信息

清空下面三个文件 appledeMacBook-Pro:/ apple$ cd ~/.ssh appledeMacBook-Pro:.ssh apple$ ls id_rsa id_rsa.pub ...
  • alincexiaohao
  • alincexiaohao
  • 2014年12月03日 17:15
  • 1129

HTML5清除默认格式代码

HTML5清除默认格式代码 /** 清除内外边距 **/ body, h1, h2, h3, h4, h5, h6, hr, ...
  • SMoothiemiss
  • SMoothiemiss
  • 2016年12月02日 10:44
  • 1754
内容举报
返回顶部
收藏助手
不良信息举报
您举报文章:清除acaddoc.lsp
举报原因:
原因补充:

(最多只允许输入30个字)