På dine sider hvor du vil have dit banner skriver du :
<!--#include Virtual=\"/banner/banner.asp\" -->
Så laver du en mappe i roden der hedder banner, deri ligger vi en fil . asp med følgende :
<%
Set Rs = Server.CreateObject(\"ADODB.Connection\")
DBPath = \"DBQ=\" & server.mappath(\"/banner/banner.mdb\")
Rs.Open \"DRIVER={Microsoft Access Driver (*.mdb)}; \" & DBPath
Set Record = Rs.Execute(\"Select count(*) as Found from T_Banner\")
Ialt = Record(\"found\")
Set Record = Rs.Execute(\"Select * from T_Banner\")
Randomize
RandNum = Int(Rnd * Ialt) + 1
Record.MoveFirst
For i = 1 to RandNum - 1
Record.MoveNext
next
Response.Write \"<a href=\'
http://\" & Record(\"http\") & \"\'>\"
response.write \"<img src=\'\" & Record(\"banner\") & \"\' alt=\'\" & Record(\"info\") & \"\' border = \'1\'></a>\"
%>
<body link=\"#000000\" vlink=\"#000000\" alink=\"#000000\">
Dertil laver du en database magen til :
http://62.243.10.89/banner/banner.mdb