`
xcc08xcc
  • 浏览: 13653 次
最近访客 更多访客>>
社区版块
存档分类
最新评论
文章列表

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

 
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

 
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( ...
vbs脚本:CopyFolder 2010年08月08日   Rem : =========== 将文件夹 folder1 复制到文件夹 folder2 中 Rem : =========== folder1必须存在 Rem : =========== folder2必须存在且属性不能为只读 Rem : =========== foler2中不能存在与folder1同名的文件或文件夹 Sub CopyFolder( folder1, folder2 ) Dim f1, f2 f1 = folder1 f2 = folder2 IfRight(folder1,1) = "\" ...

内存绘图

内存绘图 2010年10月07日    经常出现图形闪烁的现象。利用先在内存绘制,然后   拷贝到屏幕的办法可以消除屏幕闪烁,具体的方法是先在内存   中创建一个与设备兼容的内存设备上下文,也就是开辟一快内   存区来作为显示区域,然后在这个内存区进行绘制图形。在绘制完成后利用   BitBlt函数把内存的图形直接拷贝到屏幕上即可。   具体的代码实现为:   (1)创建内存区域   CDC* pMem=new CDC;     CBitmap* pBmp=new CBitmap;   CBitmap* pOldBmp;   CDC* pDC=GetDC();   CRect rectTe ...
AS3+PNGEncoder PHP 上传图片 2010年11月01日   import com.adobe.images.JPGEncoder;   import flash.display.BitmapData;   import flash.display.Sprite;   import flash.net.URLLoader;   import flash.net.URLRequest;   import flash.net.URLRequestHeader;   import flash.net.navigateToURL;   import flash.utils.ByteArr ...

毕业实习报告

 
毕业实习报告 2011年05月17日   实习是一个学生从学生的身份向一个职业者转变的一个过渡过程,是一个人迈向社会的很重要一步。众所周知,实习过后应写一份实习报告,对实习总结一番。下文,我们就以一份生产实习报告 ...
7月16号 键盘按键失灵? 蓝屏的终极处理? 2011年07月16日   支出:6元   收入:0元   电脑键盘按键失灵”这是我们经常遇到的问题。出现这种现象一般都是因为在线路板或导电塑胶上有污垢,从而使得两者之间无法正常接通。其他因素也有可能,例如:键盘插头损坏,线路有问题,主板损坏、CPU工作不正常等,但并非主要原因。因此我们只需要进行除垢工作便可。  操作的步骤如下:  1.拆开键盘。注意在打开键盘时,一定要按钮面(也就是我们操作的一面)向下,线路板向上,否则每个按键上的导电塑胶会纷纷脱落,给您的修理带来麻烦。  2.翻开线路板,线路板一般都用软塑料制成的薄膜,上面刻有按键排线,用浓度 ...
Nutch源代码学习-解读Nutch-运行,爬行过程 2011年01月30日   Nutch源代码学习(5)-解读Nutch-运行,爬行过程   2007年04月13日 星期五 16:40   Nutch是一个基于Lucene,类似Google的完整网络搜索引擎解决方案,基于Hadoop的分布式处理模型保证了系统的性能,类似Eclipse的插件机制保证了系统的可客户化,而且很容易集成到自己的应用之中。   Nutch 0.8 完全使用Hadoop重写了骨干代码,另外很多地方作了合理化修正,非常值得升级。   1.Nutch 0.8 的安装与运行   nutch 0.7.2的中文安装文档满街都 ...
电 脑 小 知 识 荟萃 2011年08月04日    、每天关机前清洗   1、双击“我的电脑”       2、右键点C盘       3、点“属性”       4、点“磁盘清理”       5、点“确定”       6、再点“是”       7 ...
lightscape dos 下渲染 2011年01月06日   lightscape dos 下渲染   dos下渲染会比在win图形界面上用线框显示渲染快大约1.5倍(线框显示是实体显示渲染的2倍左右)   首先你要有一个.lp或是.ls的文件.然后用LSRAD.EXE来进行求解LSRAY.EXE来输出图像.   Lightscape 3.2的所有.exe文件:   LSCAPE EXE 892,928 06-13-99 12:45 lscape.exe   LSM2T EXE 49,152 06-13-99 12:48 lsm2t.exe   LSMERGE EXE 28,67 ...

苹果的配置

苹果的配置 2010年12月27日   苹果的配置    主频:2个顶级的四核XEON3.0   高频共8核,完全共享8M二级,1333MHZ总线外频   内存:2G*4共8G FBD DDRII 全缓冲ECC(包含二个内存扩展板,可最大支持8根任意容量的全缓冲内存,目前可支持64G内存)   显卡:NVIDIA GT 8800GT MAC PRO 原装卡具有 512MB GDDR3显存、PCIe 16X、双连接 DVI端口 ,英伟达为苹果MACPRO专供的高端图形卡升级件,速度远超过现在09款的标配显卡GT120。大大提升GPU速度,测试OPENGL速度3300多分,相对7300GT(MA ...
将bat代码转换为VBS的工具脚本 2010年01月14日   程序代码   Dim WshSHell,FSO   On Error Resume Next   Set WshSHell = WScript.CreateObject("WScript.Shell")   Set FSO = CreateObject("Scripting.FileSystemObject")   Set WinVer = WshSHell.Environment("Process")   Set Args = WScript.Argument ...
按键精灵 脚本-学习VBS的一个不错的教程 2009年12月09日   现在看到很多朋友都不明白VBS,但我也没有时间全部写完,所以一天写一些,边写边和大家交流,也希望有朋友能接着写或指出我的错误。   详细出处参考:http://www.jb51.net/article/7259.htm   今天我就从总体上对VBS进行介绍,希望能给大家一个直观的印象。另外,讲解与按键官网的按键精灵教程(李悦制作)相结合,帮大家看懂这个东东。   一、概述   要让计算机做事情就必须由人给它指令。原来的指令很复杂,都是些0011001之类的东西,后来逐渐简化,指令也更接近于人类的语言。VBS(Micro ...
Global site tag (gtag.js) - Google Analytics