一小偷类!!有兴趣的可以看看

类代码 (cls.asp) <% Class clsThief Private strUrl    ‘ 偷取地址 Private strValue  ‘ 偷取的内容,所有内容 Private strResult ‘ 偷取结果,可以具体某一块内容 Private flag      ‘ 是否已经偷过 ‘——-初始化类——–‘ Private Sub Class_Initialize()     strUrl=””  strValue=””  strResult=””  flag=false