Excel Vba 过滤主域名
摘要：
Sub FilterSiteDomain() Dim siteUrl As String Dim siteDomain As String Dim siteMainDomain As String siteUrl = "http://www.baidu.com/a/b/index.html" '获取URL域名 siteDomain = GetSiteByUrl(siteUrl) MsgBox siteDomain '获取URL主域名 siteMainDomain = GetSiteDomain(siteDomain) MsgBox s... 阅读全文
posted @ 2011-11-02 12:18 blackcore 阅读(699) 评论(1) 推荐(0) 编辑