besøgs farve

Min kode ser således ud, og kan ses som banner rotation i toppen af www.zequenze.dk



<head>
<style TYPE=\"text/css\">
    <!--
      A:link    {    text-decoration: None;    color: #000000;}
      A:visited {    text-decoration: None;    color: #000000;}
      A:active  {    text-decoration: None;    color: #000000;}
      A:hover  {    text-decoration: None;    color: #000000;}
    -->
</style>
<%

Function Show()
Randomize
RandNum = Int(Rnd * Ialt) + 1
Record.MoveFirst
For i = 1 to RandNum - 1
Record.MoveNext
next
Response.Write \"<a href=\'http://\" & Record(\"http\") & \"\'><img src=\'\" & Record(\"banner\") & \"\' alt=\'\" & Record(\"info\") & \"\' border = \'1\'></a>\"
end function

\' *******************************************************
\' * Vælg den connection type der passer dig bedst :-) *
\' *******************************************************

\' *******************************************************
\' * DSN, bruger dsn = testdb der peger på banner.mdb *
\' *******************************************************
\' Set Rs = Server.CreateObject(\"ADODB.Connection\")
\' Rs.Open \"DSN=testdb;uid=;pwd=\"

\' *******************************************************
\' * DSN Less, banner.mdb i samme katalog som banner.asp *
\' *******************************************************
Set Rs = Server.CreateObject(\"ADODB.Connection\")
DBPath = \"DBQ=\" & server.mappath(\"/banner/banner.mdb\")
Rs.Open \"DRIVER={Microsoft Access Driver (*.mdb)}; \" & DBPath

Sql = \"Select count(*) as Found from T_Banner\"
Set Record = Rs.Execute(Sql)

Ialt = Record(\"found\")

Sql = \"Select * from T_Banner\"
Set Record = Rs.Execute(Sql)

\' *******************************************************
\' * Her kan man selv sætte hvor mange bannere man *
\' * ønsker, kald show() X antal gange, samt hvordan *
\' * disse skal placeres. *
\' *******************************************************
Response.Write \"<center>\"
Show()

%>

</head>

Men lige meget om man har trykket på banneret skal det være en sort border, ikke blå eller lilla som nu, hvad gør jeg