Exclusão dando erro

Galera olha soh,

Eu estou usando o seguinte codigo para excluir uma entrada:

<%

dim rs,sql,rcod

rcod = Request.Form("cod")

sql = "delete * from visita where codigo = " & rcod & ""

set rs = conn.execute(sql)

%>

<%

Response.Write ("<center>Exclusão bem sucedida</center><BR>")

Response.Write ("<center><a href='java script:window.close()'>Fechar</a></center>")

%>

Soh que ele está dando o seguinte erro:

Tipo de erro:

Microsoft OLE DB Provider for ODBC Drivers (0x80040E14)

[MySQL][ODBC 3.51 Driver][mysqld-4.0.16-nt]You have an error in your SQL syntax. Check the manual that corresponds to your MySQL server version for the right syntax to use near '* from visita where codigo = 2' at line 1

/receita/receita_excluida.asp, line 9

sendo que a linha 9 eh a linha do comado sql.

Oque pode esta ocorrendo?