十
31
2008
主要用到了 Microsoft HTML Object Library
用createDocumentFromUrl这个方法可以下载一个网页的内容并且得到一个HTMLDocument对象,
利用HTMLDocument的一些属性就很容易把网页内容分析出来。
例如用 outerHTML 可以得到HTML文本
用 links 可以得到网页里面所有的链接
注:当时没有想到用正则表达式,实现的方法很笨。其实用正则表达式分析网页内容非常方便,在以后我会有实例。
下面是代码:
Option Explicit
Private mintSubCat As Integer
阅读全文——共13280字
十
28
2008
Sub Goto163()
With CreateObject(“InternetExplorer.Application”)
.Visible = True
.navigate “http://mail.163.com”
Do Until .Readystate = 4
DoEvents
Loop
.Document.Forms(0).All(9).Value = “myusername”
.Document.Forms(0).All(13).Value = “mypassword”
.Document.Forms(0).All(35).Click
阅读全文——共1037字
十
28
2008
以摩托罗拉的九月大奖赛为例,下面介绍用 VB 实现带校验码的网页表单的自动提交。我们现看看摩托罗拉的投票页面:http://www.motorola.com.cn/news/925/photo.asp?id={525147E1-C4A7-41EE-9190-95800AC81E29}
如果要对用户投票的话就必须先填写验证码!由于验证码是图片,而且是随即的,所以对自动提交数据增加了很大的难度。因此,如果要提交投票就必须先得到验证码!
难点:(1)取得验证码图片并识别成相应数据;(2)提交数据表单。
首先我们来剖析一下本页面的 HTML 源代码,代码如下:
… …
<table>
<form name=”form1″ method=”post” action=”photo_vote.asp”>
阅读全文——共3729字
十
28
2008
最近研究了一下vba编程,主要是针对excel的,现在为了学习,特别从网上搜集了300句常用语句,以备不时之需,也留给网友,不方便的时候查询一下。
定制模块行为
(1) Option Explicit ‘强制对模块内所有变量进行声明
Option Private Module ‘标记模块为私有,仅对同一工程中其它模块有用,在宏对话框中不显示
Option Compare Text ‘字符串不区分大小写
Option Base 1 ‘指定数组的第一个下标为1
(2) On Error Resume Next ‘忽略错误继续执行VBA代码,避免出现错误消息
(3) On Error GoTo ErrorHandler ‘当错误发生时跳转到过程中的某个位置
(4) On Error GoTo 0 ‘恢复正常的错误提示
阅读全文——共25028字
十
25
2008
最近因为需要把excel里的内容拷贝复制到网页上去填表,一个一个的复制粘贴,甚是麻烦和枯燥。因为我是一个懒人,所以就开始想些简单的方法,记得以前在学校图书馆里看到excel的宏命令甚是强大,于是就自己编写了一段简单的宏命令,可以自动填写网页表格,也算懒一把啦。
下面给大家一个示例程序,可以自动读取表格第一行的数据登陆163邮箱。
代码如下:
Sub goto163()
Dim x, y As Integer
x = Selection.Row()
Dim urlstr As String
urlstr = Worksheets(“Sheet1″).Cells(x, 4).Value
With CreateObject(“InternetExplorer.Application”)
.Visible = True
阅读全文——共712字
七
19
2008
近日在调测一个UTF8编码的中文Zen Cart网站时遇到一件怪事,网页显示文字正常,用ie的察看源文件(记事本打开)却发现乱码,firefox没有这个问题。经在网上多方查证和多次测试,解决了这个问题,其实是UTF-8文件的Unicode签名BOM(Byte Order Mark)问题。
BOM(Byte Order Mark),是UTF编码方案里用于标识编码的标准标记,在UTF-16里本来是FF FE,变成UTF-8就成了EF BB BF。这个标记是可选的,因为UTF8字节没有顺序,所以它可以被用来检测一个字节流是否是UTF-8编码的。微软做这种检测,但有些软件不做这种检测,而把它当作正常字符处理。
微软在自己的UTF-8格式的文本文件之前加上了EF BB BF三个字节, windows上面的notepad等程序就是根据这三个字节来确定一个文本文件是ASCII的还是UTF-8的, 然而这个只是微软暗自作的标记, 其它平台上并没有对UTF-8文本文件做个这样的标记。
阅读全文——共1368字
六
22
2008
windows系统优化有一个地方从来没有动过,那就是内核的优化,没有这个功能也就没有了很多的个性定制,这也许就是开源与不开源的巨大差异。下面说正题吧,
一、内核简介
内核,是一个操作系统的核心。它负责管理系统的进程、内存、设备驱动程序、文件和网络系统,决定着系统的性能和稳定性。
linux的一个重要的特点就是其源代码的公开性,所有的内核源程序都可以在 /usr/src/linux下找到,大部分应用软件也都是遵循GPL而设计的,你都可以获取相应的源程序代码。全世界任何一个软件工程师都可以将自己认为优秀的代码加入到其中,由此引发的一个明显的好处就是Linux修补漏洞的快速以及对最新软件技术的利用。而Linux的内核则是这些特点的最直接的代表。
想象一下,拥有了内核的源程序对你来说意味着什么?首先,我们可以了解系统是如何工作的。通过通读源代码,我们就可以了解系统的工作原理,这在Windows下简直是天方夜谭。其次,我们可以针对自己的情况,量体裁衣,定制适合自己的系统,这样就需要重新编译内核。在Windows下是什么情况呢?相信很多人都被越来越庞大的Windows整得莫名其妙过。再次,我们可以对内核进行修改,以符合自己的需要。这意味着什么?没错,相当于自己开发了一个操作系统,但是大部分的工作已经做好了,你所要做的就是要增加并实现自己需要的功能。在Windows下,除非你是微软的核心技术人员,否则就不用痴心妄想了。
阅读全文——共9116字
三
31
2008
你使用Microsoft Windows Vista的时候遇到过系统狂读硬盘、硬盘灯狂闪的情况吗?是不是为你的硬盘感到心痛呢?那么可以试试下面的方法,保正让你的Vista安安静静的工作。
Win+R 运行以下命令:net stop sysmain
Vista瞬间就安静了。
如果还需要进一步的话,那么就照着下边的做吧
1. 关闭Volume Shadow Copy服务,在Vista里很多文件、文件夹看属性里都有一个 早期版本 选项,我想这个功能对绝大多数人都没有用吧?Win+R打开services.msc ,找到Volume Shadow Copy,设置为禁用
2. 关闭所有分区的系统还原:在我的电脑 属性 高级里关闭所有分区的系统还原
3. 关闭所有分区的 磁盘清理 计划任务,在盘符上点属性,找到磁盘整理,把“计划磁盘整理”的钩去掉
4. 关闭包含大块文件的文件压缩和索引,在盘符/文件夹上点右键,取消 索引文件以加快搜索速度,在文件夹上点右键,属性,高级,关闭 压缩文件以节省空间 索引文件以加快搜索速度
阅读全文——共563字