Deletando arquivos do Banco de dados

Ola pessoal, estou tentando deletar arquivos de um banco de dados. Tentei criar um script bem simples, mas esta dando erro.

o script eh:

<%cod = Request.form("cod") ' mapeia o caminho x = Server.MapPath("bd/medico.mdb")' cria o objeto Conexão Set Conexao = Server.CreateObject("ADODB.Connection")' concatena a string do driver com o caminho liga = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source="& x 'abre a conexão Conexao.Open liga' String SQL para inserir os dados na tabela chamada cadastrostrSQL = "DELETE * from medico WHERE codigo = cod"' executa a stringif cod <> "" then   Conexao.execute strSQLelse  response.redirect("exc_med.asp")end if' fecha a conexãoConexao.close' destrói o objeto Conexao para liberar memóriaSet Conexao = nothing %>

Alguem pode me ajudar a descobrir o que está errado??