asp版域名查询的数据库接口

时间：2011-05-19 09:32:39 来源：站内作者：潘春会

                          d_exsit   =   3
                          Exit   Function
                    Else
                          pagestart   =   pagestart   +   Len(pageafter)   +   1
                          pageend   =   InStr(pagestart,   tempcontent,   pagebefore,1)
                              If   pageend   =   0   Then
                                  dowith   =   "<font   color=""red"">意外的错误!</font>"
                                  d_exsit   =   3
                                  Exit   Function
                            Else
                                pageend   =   pageend   -   pagestart   '得到内容长度
                                tempcontent   =   Mid(tempcontent,   pagestart,   pageend)
                            End   If
                    End   If
              Set   pageregexp   =   New   RegExp
              pageregexp.Global   =   True
              pageregexp.Pattern   =   "<[^>]*>"
              tempcontent   =   pageregexp.Replace(tempcontent,   "")
              Set   pageregexp   =   Nothing
              dowith   =   tempcontent
      End   If
End   Function
本文来自: 动态网站制作(www.knowsky.com) 详细出处参考：http://www.knowsky.com/538569.html

3/3 首页上一页 1 2 3

来顶一下

返回首页

推荐资讯

如何找出DHCP地址池里	国内常用的DNS列表
Linux邮件服务器软件比	学用纯CSS打造可折叠树

相关文章

栏目更新

栏目热门