显示URL是指,显示在广告内文字下方的一个展示性的网站地址。
一般来说,访问URL是根据你的关键词性质,或者根据的推广着陆页,网站活动页的地址。而显示URL,一般都是用网站的一级域名,也就是网站首页地址。
用这个自定义函数
Public Function UrlDecode(ByVal strText As String) As String '如果值中带有非英文和数字,则需转换成%形式'url编码 utf-8
Dim js
Set js = CreateObject("msscriptcontrol.scriptcontrol")
js.Language = "JavaScript"
'UrlDecode = js.eval("decodeURI('" & strText & "')") '忽略! @ # $& * ( ) = : / + '
'UrlEncode = js.Eval("escape('" & Replace(strText, "'", "\'") & "')") '汉字转换为%u开头的Unicode码 不会被此方法编码的字符: @ * / +
UrlDecode = js.Eval("decodeURIComponent('" & strText & "')") '包含://
End Function
欢迎到EXCEL880工作室来看实例视频
欢迎分享,转载请注明来源:夏雨云
评论列表(0条)