按照来路显示广告的asp怎么写

asdfbn 2009-07-24 10:27:09
我想加一段asp代码,如果来路是百度的话,广告位就显示百度联盟的广告,如是来路是GG的话就显示GG联盟的广告,应该怎么写啊,求高手帮忙
...全文
89 7 打赏 收藏 转发到动态 举报
AI 作业
写回复
用AI写文章
7 条回复
切换为时间正序
请发表友善的回复…
发表回复
ishion 2009-07-25
  • 打赏
  • 举报
回复
Refer= Request.ServerVariables("HTTP_REFERER")
if instr(Refer,"baidu.com")>1 then
'输出百度广告
elseif instr(Refer,"google.com")>1 or instr(Refer,"google.cn")>1 then
'输出GG广告
end if
街头小贩 2009-07-25
  • 打赏
  • 举报
回复
如果没有来路不显示广告
MR丶CHAN 2009-07-25
  • 打赏
  • 举报
回复
学习
绿绦 2009-07-25
  • 打赏
  • 举报
回复
[Quote=引用 2 楼 chinmo 的回复:]
获取来源,然后判断啊
比如:
VBScript codeRefer= Request.ServerVariables("HTTP_REFERER")
Refer=replace(Refer,"http://","")
Refer=split(Refer,"/")
Refer= Refer(0)if Refer="www.baidu.com"or Refer="baidu.com"then'这里是你要显示的东西elseif Refer="www.google.com"or Refer="google.com"or Refer="www.google.cn"or Refer="google.cn"then'这里是你要显示的东西endif
[/Quote]

应该是你要的东西赛

绿绦工作室http://www.lvtaostudio.com
asdfbn 2009-07-25
  • 打赏
  • 举报
回复
正解,多谢大家哈,每人给点分
  • 打赏
  • 举报
回复
获取来源,然后判断啊
比如:
Refer= Request.ServerVariables("HTTP_REFERER") 
Refer= replace(Refer,"http://","")
Refer= split(Refer,"/")
Refer= Refer(0)
if Refer="www.baidu.com" or Refer="baidu.com" then
'这里是你要显示的东西
elseif Refer="www.google.com" or Refer="google.com" or Refer="www.google.cn" or Refer="google.cn" then
'这里是你要显示的东西
end if
asdfbn 2009-07-24
  • 打赏
  • 举报
回复
为什么都没人来帮帮我啊

28,408

社区成员

发帖
与我相关
我的任务
社区描述
ASP即Active Server Pages,是Microsoft公司开发的服务器端脚本环境。
社区管理员
  • ASP
  • 无·法
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧