1207 B2 BECKY 绿色 完全
这几天搞HTML XML,没有什么成就感,顺便想了想 BECKY 如何完全绿色的问题。
BECKY可以直接运行,但是许多信息写入了注册表,尤其是邮件存储目录。
以前就有很多人说用U盘,老是没有办法完全绿色,比较麻烦。
我想解决方法有两个 www.shengfang.org
1、用外部调用的方法 www.shengfang.org
VB/VC编程,获得当前目录,然后构造注册表文件,写入注册表,再运行B2.EXE
从理论上来说是可以的,就是构造注册表文件麻烦一些。也可以考虑用 VBS脚本+正则表达式 处理文本
目前已经有人作了一个 MAILTO 默认邮件发送程序的插件,原理就是写注册表。
2、通用 修改 盘符 的办法
由于U盘插入系统之后,由系统分配的盘符,所以会导致目录不匹配之类的问题,如果采用 AUTORUN.INF,自动通知运行,
插入之后立即调用程序,重新设置盘符,这样的话,就不必在乎目录的问题了。
并且也比较通用,对于别的程序也比较适用。
上网找了找资料
返回磁盘驱动器集合
描述 利用 FileSystemObject 对象返回计算机中所有磁盘驱动器列表的演示脚本。此脚本必须在本地计算机上运行。
脚本代码 www.shengfang.org
Set objFSO = CreateObject("Scripting.FileSystemObject")
Set colDrives = objFSO.Drives
For Each objDrive in colDrives
Wscript.Echo "Drive letter: " & objDrive.DriveLetter
Next
更改驱动器卷标字母 www.shengfang.org
描述 将驱动器卷标字母 D 改为 Q。如果修改本脚本以将驱动器卷标字母 D 改为其他字母,则注意在 WQL 查询中的卷标名称必须包括冒号 (:) 和两条正斜杠 (\\)。 因此,驱动器 C 应该为: C:\\。 然而在指定新的驱动器字母时,最好包括冒号(在脚本示例中为 Q:)。
strComputer = "." www.shengfang.org
Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\cimv2")
Set colVolumes = objWMIService.ExecQuery("Select * from Win32_Volume Where Name = 'D:\\'")
For Each objVolume in colVolumes
objVolume.DriveLetter = "Q:"
objVolume.Put_
Next
看上去不错,问题在于
支持平台
Windows Server 2003 是
Windows XP 否
Windows 2000 否
Windows NT 4.0 否
我在 WIN2003测试成功,但是这不具有通用性质。
今天有几个问题
BOBLOG的自带备份出现
老是停留在 www.shengfang.org
Counter Backup Finished (step:9/13)
Program is now packing all your articles.
幸好自己作了个ZIP备份插件 www.shengfang.org
HttpWatch 似乎不错,帮我抓了几个数据包,但是好像从此我的机器一打开浏览器或者资源管理器就出现硬盘狂转,显示器变黑的问题,卸载之后就正常了?
不过它这个思路不错,按照这个思路,也可以作一个网页、EMAIL等用户名、密码记录器和自动登录软件
周六出差 合肥 www.shengfang.org
本来计划好好的,打球,看球,机会好的话还可以去现场看球
12:30:00 2005年国际乒联职业巡回赛总决赛男女双打1/4决赛
15:00:00 2005年国际乒联职业巡回赛总决赛男女子单打1/4决赛,男子双打半决赛
19:30:00 2005年国际乒联职业巡回赛总决赛男子单打1/4决赛、女子单打半决赛(插播“体育世界”)
08:25:00 实况录像:2005/2006步步高移动电话杯全国女排联赛7(插播1,2)
15:00:00 2005年国际乒联职业巡回赛总决赛女子双打、男子单打半决赛
19:30:00 2005年国际乒联巡回赛总决赛女双,男双,女单,男单决赛
全部泡汤了,久违的 排球 乒乓球 又不能打了,吐血~~~~
按照惯例,先提前写BLOG,以后决定在标题加上日期