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

asdfbn 2009-07-24 10:27:09
我想加一段asp代码,如果来路是百度的话,广告位就显示百度联盟的广告,如是来路是GG的话就显示GG联盟的广告,应该怎么写啊,求高手帮忙
...全文
73 7 打赏 收藏 举报
写回复
7 条回复
切换为时间正序
当前发帖距今超过3年,不再开放新的回复
发表回复
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
如果没有来路不显示广告
  • 打赏
  • 举报
回复
chenlongit 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
为什么都没人来帮帮我啊
  • 打赏
  • 举报
回复
相关推荐
发帖
ASP

2.8w+

社区成员

ASP即Active Server Pages,是Microsoft公司开发的服务器端脚本环境。
社区管理员
  • ASP
  • 无·法
加入社区
帖子事件
创建了帖子
2009-07-24 10:27
社区公告
暂无公告