找回密码
 注册

QQ登录

只需一步,快速开始

搜索
查看: 7774|回复: 4

[pppoe] 发个PPPOE 管理工具..

[复制链接]
发表于 2011-10-11 15:46:09 | 显示全部楼层 |阅读模式

马上注册,结交更多好友,享用更多功能,让你轻松玩转社区。

您需要 登录 才可以下载或查看,没有账号?注册

×
本帖最后由 rains 于 2011-10-11 16:23 编辑

本软件需要安装.net2.0才能运行,win7系统下可直接运行
.net2.0下载地址http://file2.mydrivers.com/others/microsfot_framework20chs.exe
小庞的密码123456
第一次登录先设置好你的服务器。
服务器ip和帐号密码和winbox的一样
请确认你已在winbox开启api服务(ip service api)
如果你碰到bug请与我反馈
我的QQ83356005
邮箱83356005@qq.com
如果你对我的软件支持。欢迎给我赞助。赞助的朋友我将提供特别定制的版本
1.0版本将支持sql数据库
增加用户自助系统。并支持用户自动冲值。
更多功能请与我联系。欢迎你的建议和意见。


:local tz
:local prof
:local tj
:set tz 4
:set prof ting
:set tj 0
#tz为提前发送到期通知的天数
#prof为提前发送到期通知的模板
#tj为到期后几天停用用户账号,0为到期即停机
:local nyr [/system clock get date]
:local yy ([:find jan,feb,mar,apr,may,jun,jul,aug,sep,oct,nov,dec [:pick $nyr 0 3]]+1)
#查到当前月份
:if ($yy<10) do={:set yy (0 . $yy)}
:set nyr ([:pick $nyr 7 11] . $yy . [:pick $nyr 4 6])
:local ii "0"
:local pcom8 ""
/ppp secret
:foreach puse in [find disabled=no] do={
:local pcom [get $puse comment]
:local pnam [get $puse name]
:local tzprof [get $puse profile]
:set ii ($ii + 1)
:if ($pcom!="" && $pcom!="admin") do={
:if ([:len $pcom]<10) do={
:log error ("账号【".$pnam."】日期备注不足8位,现备注日期:【" . $pcom . "】");:beep frequency=2080;
} else={
:set pcom8 [:tonum [:pick $pcom ([:find $pcom "["]+1) [:find $pcom "]"]]]
:if ($pcom8>1) do={
:if ($pcom8>$nyr && ($pcom8 - $nyr)=73) do={
/ppp secret set [/ppp secret find name=$pnam] profile=$prof;:set ii ($ii - 1)
:log error ("用户【" . $pnam . "】即将到期,通知已下发!");}
:if ($pcom8>$nyr && ($pcom8 - $nyr)=8873) do={
/ppp secret set [/ppp secret find name=$pnam] profile=$prof;:set ii ($ii - 1)
:log error ("用户【" . $pnam . "】即将到期,通知已下发!");}
:if ($pcom8>=$nyr && ($pcom8 - $nyr)<=$tz && $tzprof!=$prof) do={
/ppp secret set [/ppp secret find name=$pnam] profile=$prof;:set ii ($ii - 1)
:log error ("用户【" . $pnam . "】即将到期,通知已下发!")
}}
:if ($nyr>=$pcom8 && ($nyr - $pcom8)>=$tj) do={
/ppp active remove [/ppp active find name=$pnam];
/ppp secret disable [/ppp secret find name=$pnam];:set ii ($ii - 1)
:log error ("用户【" . $pnam . "】已过期停用并强制下线!")
}}} else={:log error ("用户【" . $pnam . "】的备注【".$pcom."】格式有误,请重新备注!")}
}
:log warning ("有效用户数【" . $ii . "】")

RosApi0.96.rar (133.9 KB, 下载次数: 7, 售价: 3 铜板)

rosApi运行库-CHS.rar

1.14 MB, 下载次数: 11

售价: 1 铜板  [记录]

routeros
发表于 2011-10-11 15:51:08 | 显示全部楼层
本帖最后由 47771885 于 2011-10-11 15:51 编辑

看着挺眼熟。。。 是比较老的了 呵呵 精髓没有
routeros
回复

使用道具 举报

发表于 2011-11-8 22:09:27 | 显示全部楼层
版主,请教一下我吧、、、、、、、、、、、怎么设置的这个脚本
routeros
回复

使用道具 举报

发表于 2011-11-8 22:16:47 | 显示全部楼层
请版主教我一下啦,QQ237903048
routeros
回复

使用道具 举报

发表于 2011-11-9 14:15:15 | 显示全部楼层
怎么没有图来的????????
routeros
回复

使用道具 举报

您需要登录后才可以回帖 登录 | 注册

本版积分规则

QQ|Archiver|手机版|小黑屋|软路由 ( 渝ICP备15001194号-1|渝公网安备 50011602500124号 )

GMT+8, 2024-11-6 07:53 , Processed in 0.108836 second(s), 6 queries , Gzip On, Redis On.

Powered by Discuz! X3.5 Licensed

© 2001-2024 Discuz! Team.

快速回复 返回顶部 返回列表