导入网卡控件

定义获取代理IP函数
  IP$="http://api.ip.data5u.com/dynamic/get.html?order=你的提取码&sep=3"
  数据$=网卡控件.获取数据(IP$) 
  如果 找到字串(数据$,":")>0 那么
    IP=取字串(数据$,1,找字串(数据$,":")-1)
    端口=取字串(数据$,找字串(数据$,":")+1,串长度(数据$))
  结束如果
返回 IP$,端口$

定义页面抓取函数
  参数 IP$,端口$
  地址$="www.bing.com" 
  网页$=网卡控件.获取数据(地址$,代理服务器=IP$,代理端口=端口$)
  返回 网页$

'获取代理IP
IP$,端口$=获取代理IP()

'使用代理抓取目标页面 
网页$=页面抓取(IP$,端口$)

弹出网页$ '弹框显示结果