如何实现局域网内用户登陆验证后才能上网？ ( 积分: 100 )

光纤接一个主交换机然后连到n个小交换机上再直接联到用户网卡上，问怎样才能实现控制用户上网，也就是想让某个用户上网就上，不让上就不能上网，请给个思路解决这个问题，很急啊，谢谢！

{=================================================================
功 能 : 指定用户名和密码连接到指定主机
参 数 : 用户名称，密码，主机名称
返回值: 连接成功: True；连接不成功: False
作者： ，，，，，
版 本 : 1.0 2003/7/22/ 15:42
=================================================================}
function ConnectToHost(const user:string;const password:string;const Host:string):boolean;
var
netresource:Tnetresource;
re:dword;
begin
netresource.dwScope:=RESOURCE_GLOBALNET;
netresource.dwUsage:=RESOURCEUSAGE_CONNECTABLE;
netresource.dwType:=RESOURCETYPE_DISK;
netresource.dwDisplayType:=RESOURCEDISPLAYTYPE_SERVER;
netresource.lpLocalName:='';
netresource.lpRemoteName:=pchar('//'+Host); //远程主机名称。
netresource.lpProvider:='';
re:=WNetAddConnection3(
0,
netresource,
pchar(password),//密码
pchar(user), //用户名称
CONNECT_UPDATE_PROFILE
);
result:= re = NO_ERROR;
end;

路由器里设置用户的MAC码

做个屏幕保护，将网卡禁用` oh yeh!

装个ISA到网关上啊