Error con mysql...

[yampoo]

Estoy pasando el buscador a MySQL y me queda el último archivo que me está dando dolor de cabeza... a ver que le pasa.

Set conn = Server.CreateObject("ADODB.Connection")
conn.Open("Driver={MySQL};SERVER=***;DATABASE=***; UID=***PASSWORD=***")


Dim mypage, mypagesize
mypage=request.querystring("whichpage")
mypagesize=request("pagesize")
If mypage="" then
mypage=1
end if
If mypagesize="" then
mypagesize=10
end if

Dim RS, sql
set RS = Server.CreateObject("ADODB.Recordset")
keyword = request("keyword")
sql = "select * from tabla where '"&idioma&"' name like '%" & keyword & "%' or link like '%" & keyword & "%' or description like '%" & keyword & "%' or keywords like '%" & keyword & "%' order by interes desc;"
RS.Open sql, conn, adOpenStatic, adLockReadOnly, adCmdText
if NOT RS.EOF then
RS.movefirst