`
doz791zo
  • 浏览: 12397 次
最近访客 更多访客>>
社区版块
存档分类
最新评论
文章列表
vbs脚本:CreateFolder 2010年08月09日   Rem : =========== 创建文件夹 Rem : =========== 不能有同名的文件或文件夹 Rem : =========== 父文件夹必须存在 Sub CreateFolder( folder ) Dim f f = Trim( folder ) IfRight(f,1) = "\" Then f = Left(f,Len(f) -1 )If fso.fileexists(f) = True Or fso.folderexists(f) = True ThenErr.Raise vbObj ...

vbs脚本:WriteText

 
vbs脚本:WriteText 2010年08月09日   Rem : =========== 写入多行文本,会覆盖文件中已有的内容 Rem : =========== 文件必须存在 Rem : =========== text 中可以是单行,也可以是多行文本, Sub WriteText( file, text ) Dim f f = Trim( file ) IfRight(f,1) = "\" Then f = Left(f,Len(f) -1 )If fso.fileexists(f) = False ThenErr.Raise vbObjectError+128, ...
VBS脚本:CopyFile 2010年08月08日   2010-08-08 个人认为自己编写的代码执行条件越严格越好,并且竟可能对所有可能的情况进行错误处理 Rem : =========== 将文件 file 复制到文件夹 folder 中 Rem : =========== file必须存在 Rem : =========== folder必须存在 Rem : =========== foler中不能存在与file同名的文件或文件夹 Sub CopyFile( file, folder ) If fso.fileexists(file)=False Then Err.Raise vbO ...
vbs 脚本:CopyFile 2010年08月08日   Rem : =========== 将文件 file 复制到文件夹 folder 中 Rem : =========== file必须存在 Rem : =========== folder必须存在且属性不能为只读 Rem : =========== foler中不能存在与file同名的文件或文件夹 Sub CopyFile( file, folder ) Dim f1, f2 f1 = file f2 = folderIfRight(f1,1) = "\" Then f1 = Left(f1,Len(f1) -1 ...
vbs脚本:MoveFile 2010年08月08日   Rem : =========== 将文件 file 移动到文件夹 folder 中,相当于剪切操作 Rem : =========== file必须存在 Rem : =========== folder必须存在且属性不能为只读 Rem : =========== foler中不能存在与file同名的文件或文件夹 Sub MoveFile( file, folder ) Dim f1, f2 f1 = file f2 = folderIfRight(f1,1) = "\" Then f1 = Left(f1,Len( ...
中华帝国:兴于礼,覆于礼(下)礼制之下的朝臣 2011年10月13日   搁置了一个星期,终于有了在续写的想法。这一个星期以来日子都过得有点浑浑噩噩,就是因为有这么一个结一直放在这没有解开。本来都打算不了了之了,但一想 ...
中国古代漆器源流 2011年07月21日    用漆涂在各种器物的表面上所制成的日常器具及工艺品、美术品等,一般称为“漆器”。生漆是从漆树割取的天然液汁,主要由漆酚、漆酶、树胶质及水分构成。用它作涂料,有耐潮、耐高温、耐腐蚀等特殊功能,又可以配制出不同色漆,光彩照人。在中国,从新石器时代起就认识了漆的性能并用以制器。历经商周直至明清,中国的漆器工艺不断发展,达到了相当高的水平。中国的炝金、描金等工艺品,对日本等地都有深远影响。漆器是中国古代在化学工艺及工艺美术方面的重要发明。   新石器时期的漆器     浙江余姚河河姆渡文化的第三文化层出土一木碗,造型美观,内外都有朱红色涂料,色泽鲜艳, ...
中国古代建筑模拟题 2011年10月24日   1、单项选择题   中国佛塔可分为楼阁式、密檐式、覆
中古史研究的新视角:礼制、宗教与民间社会 2011年05月11日   发布时间: 2007-5-21 11:29:49 被阅览数: 194 次 来源: 中国社会科学院院报   文字 〖 大 中 小 〗 )   近二十年来,随着中国社会史研究的蓬勃兴起,人类学、 ...
礼制”思想的阐述 2010年06月19日   、“礼制”思想的阐述   有人曾说:“提出问题比解决问题更伟大。”胡寄窗先生也说:“古代思想家的伟大,不在于他们能解决问题,而在于他们能提出问题”。 我们在评述古代思想 ...
windows编程经典书籍 2011年07月04日   [转]windows编程经典书籍http://blog.csdn.net/dadalan/article/details/3905388   本人是刚刚开始学习windows编程的,感觉看雪学院的大牛很NB.想找一些书籍来看学习学习,可是不知道看哪些书好.   驱动,对菜鸟们来说真是一个很深奥的话题,所以 ,我找来了这篇文章供大家分享,以后大家发现什么好书就在楼下跟贴吧!   作者:Harry Meng 来源:互联网.   也许我的阅读面过于狭小,书架里基本上都是Jeffrey Richter,Charles Petzold,侯捷老师以 ...
转: Boost下载安装编译配置使用指南(含Windows和Linux) 2011年10月01日   以下文字全转自网上,向作者致敬   原文出处:http://www.cnblogs.com/wondering/archive/2009/05/21/boost_setup.html【原】Boost下载安装编译配置使用指南(含Windows和Linux) ...
搭建Windows下的Android开发环境 2011年07月10日   本文描述了如何在Windows平台下,搭建Android开发环境。涉及Android SDK、Eclipse、ADT插件的安装及配置,并用Eclipse创建了第一个Android应用程序HelloWorld,引领大家进入Android开发的世界。   1、  操作系统环境   本文采用Windows Server 2003作为操作系统,具体安装不详述。为安全起见,将操作系统补丁更新到最新。   2、  下载安装Android SDK r12  以及 Java开发平台JDK6   下载网址:http://developer ...
升级android sdk碰到的不能重命名文件夹错误 2011年03月23日   今天在升级android sdk的时候碰到错误,提示不能重命名tools文件夹的错误。大概意思如下:   A folder failed to be renamed or moved. On Windows this typically means   >> > that   >> > a program is using that folder (for example Windows Explorer.) Please   close   具体内容记不得了。   对话框类 ...
Android 2.3 sdk 在 Ubuntu Karmic (9.04) 上的问题 2010年12月20日    Android 2.3 sdk 在 Ubuntu Karmic (9.04) 上的问题 (2010-12-09 17:55:08)      转载   用 Eclipse 直接从 Android 2.2 升级到 Android 2.3 有两个问题   1. adb 无法使用了   原因: adb 从 /tools 目录/platform-tools   解决办法:  edit /et ...
Global site tag (gtag.js) - Google Analytics