træt af mig :o)

nu skal i ik blive trætte af mig, fordi jeg har oprettet mange spm inden for det sidste tid ;o)

well, jeg bruger denne script.
<% if mode= \"addlinks\" then
username            = Request( \"username\" )
password            = Request( \"password\" )
website_name        = Request( \"website_name\" )
website_url        = Request( \"website_url\" )
website_description    = Request( \"website_description\" )
name            = Request( \"name\" )
email            = Request( \"email\" )

    SQLserveradr=\"mysql.web-zone.dk\"
    SQLdatabase=\"webzonedk\"   
    SQLlogin=\"webzonedk\"
    SQLpassword=\"password\"

    Set Conn = Server.CreateObject(\"ADODB.Connection\")
    Conn.Open \"driver={MySql};server=\"& SQLserveradr &\";database=\"& SQLdatabase &\";uid=\"& SQLlogin &\";pwd=\"& SQLpassword

mySQL = \"INSERT INTO links (username,password,website_name,website_url,website_description,name,email,ip,date,time) VALUES (\'\" & username & \"\',\'\" & password & \"\',\'\" & website_name & \"\',\'\" &  website_url & \"\',\'\" &  website_description & \"\',\'\" & name & \"\',\'\" & email & \"\',\'\" & Request(\"REMOTE_ADDR\") & \"\',\'\" & date() & \"\',\'\" & time() & \"\')\"

Conn.Execute mySQL

Conn.Close
Set Conn = Nothing
%>
<Big> Tilføjet links! </big>
<% = end if %>


<% if mode= \"addkategori\" then
kategori            = Request( \"kategori\" )

    SQLserveradr=\"mysql.web-zone.dk\"
    SQLdatabase=\"webzonedk\"   
    SQLlogin=\"webzonedk\"
    SQLpassword=\"password\"

    Set Conn = Server.CreateObject(\"ADODB.Connection\")
    Conn.Open \"driver={MySql};server=\"& SQLserveradr &\";database=\"& SQLdatabase &\";uid=\"& SQLlogin &\";pwd=\"& SQLpassword

mySQL = \"INSERT INTO kategori (kategori) VALUES (\'\" & kategori & \"\')\"

Conn.Execute mySQL

Conn.Close
Set Conn = Nothing
%>
<Big> Tilføjet kateogori! </big>
<% = end if %>

og jeg får denne fejl meddelse :(
Microsoft VBScript compilation error \'800a03ea\'

Syntax error

/save.asp, line 26

Response.Write(end if)