- 1、原创力文档(book118)网站文档一经付费(服务费),不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。。
- 2、本站所有内容均由合作方或网友上传,本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供研究参考,付费前请自行鉴别。如您付费,意味着您自己接受本站规则且自行承担风险,本站不退款、不进行额外附加服务;查看《如何避免下载的几个坑》。如果您已付费下载过本站文档,您可以点击 这里二次下载。
- 3、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等,请点击“版权申诉”(推荐),也可以打举报电话:400-050-0827(电话支持时间:9:00-18:30)。
- 4、该文档为VIP文档,如果想要下载,成为VIP会员后,下载免费。
- 5、成为VIP后,下载本文档将扣除1次下载权益。下载后,不支持退款、换文档。如有疑问请联系我们。
- 6、成为VIP后,您将拥有八大权益,权益包括:VIP文档下载权益、阅读免打扰、文档格式转换、高级专利检索、专属身份标志、高级客服、多端互通、版权登记。
- 7、VIP文档为合作方或网友上传,每下载1次, 网站将根据用户上传文档的质量评分、类型等,对文档贡献者给予高额补贴、流量扶持。如果你也想贡献VIP文档。上传文档
查看更多
在我们上网时,特别是使用ADSL上网时,你访问任何页面会弹出广告页面,电信运营上使用BRAS设备实现。现在介绍以下使用routeros如何实现。如果有哪位朋友有例如在自己的单位或内网中弹出页面下发通知等,可以一起琢磨琢磨。本人对routeros不是很熟悉,希望得到大家的完善。
思路:首先你内网中所有用户通过你的routeros上网,当首次访问网页的所有数据包通过你routeros时,我们包数据包重新定向到你web服务器,并且把目标地址转换成你web服务器的地址。此时访问任何网站的数据相当于访问你的web服务器,你在web服务器的网页上你弹出你的通知,然后把页面重定向到他刚开始要访问的页面。
实施:routeros上
ip firewall mangle addchain=postrouting protocol=tcp dst-port=80action=add-src-to-address-list address-list=src1address-list-timeout=2m
命令解释:我们首先建立一条mangle,让访问HTTP的数据把源地址加在src1这个列表中,address-list-timeout意思是源地址存在与src1列表里的时间。
ipfirewall nat add chain=dstnat protocol=tcp dst-port=80 action=dst-natto-addresses=9 to-ports=80 src-address-list=!src1
命令解释:然后建立一条目标地址转换,把访问页面的数据的目标地址转换成你服务器的地址这里服务器的地址为9,src-address-list=!src1的意思为,只有对源地址没有在src1列表中的数据进行转换,意思也就是说,当你的内网机器再次访问网页时不再弹出页面。
两步就可以,当然前提是之前你内网机器能正常上网,且你web服务器能访问你内网。
至于web服务器及web页面怎么写,可以问问搞ASP的。我这里有一简单的。
HTML
head
title/titleMETAHTTP-EQUIV=Pragma CMETAhttp-equiv=Content-Typecmeta http-equiv=Refreshc
/head
scriptlanguage=JavaScriptfunction newwin(){var urlname;varwin_attr;win_attr=toolbar=no,menubar=no,scrollbars=no,status=no,location=no,resizable=yes,fullscreen=no,directories=no,width=300,height=250,top=0,left=0;window.open(9/index.htm,ips_win0,win_attr); }/script
%Function GetUrl()
On Error Resume Next
Dim strTemp
If LCase(Request.ServerVariables(HTTPS))=off Then
strTemp = http://
Else
strTemp = http://
End If
strTemp = strTemp Request.ServerVariables(HTTP_HOST)
If Request.ServerVariables(SERVER_PORT) 80 Then strTemp =strTemp : Request.ServerVariables(SERVER_PORT)
strTemp = strTemp Request.ServerVariables(URL)
If Trim(Request.QueryString) Then strTemp = strTemp ? Trim(Request.QueryString)
GetUrl = strTemp
End Function %
body text=#FFFFFF bgcolor=#000000bfont size=5尊敬的涉外花园用户: /body
/font/b
pbfont size=5
body text=#FFFFFF bgcolor=#000000您好! /body/font/b/p
pbfont size=5
body text=#FFFFFF bgcolor=#000000卖盒
文档评论(0)