dim link(20) as string
do
i=instr(1,lcase(src),"")
if i=0 or j=0 then exit do
link(count)=mid(src,i+8,j-i-8)
count=count+1
loop
for i = 0 to count-1
print link(i)
next
----------------------------------
程序有问题找我
用正则表达式
你先找到href=" 然后提取从这个字串开始，终止于其后第一个"，就可以了
内容全部来源于网络收集，如有侵权，请联系网站删除：QQ号：24596024