获得网页链接,可以按照这个思路来写代码:
获取网页代码
Do 循环:当找不到 <a 标签开头时跳出
找到 <a 标签开头位置(InStr,下同),赋给 i
从 i 开始找 src=" 这个字符串的位置,赋给 j
如果 j 不等于 0 (即找到了 "src=" 字符串):
从 j 开始找一个引号( " ),赋给 k
如果 k 不等于 0:
通过 Mid 方法获取地址
Loop
将程序转为 XP 风格可以使用这个程序: