eliminar un usuario (error ADODB.Recordset (0x800A0E78)

[cxbxvx]

holas soy yo de nuevo, lo que pasa que quiero borrar un usuario , el codigo al ejecutarlo no me arroja ningun error pero lo que le pasa que al revisar la base de datos para ver si lo borro to do sigue igual como esta no se que pasa , aqui les muestro el codigo haber que me dicen :
<%




Response.Buffer = true
dim cnn,rst
' Creamos la conexión a la base de datos sin DSN
set cnn = Server.CreateObject("ADODB.Connection")
set rst = Server.CreateObject("ADODB.RecordSet")
cnn.Open "Driver={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("inventario.mdb")
sqltext = "delete * FROM usuario where (usuario='"&usuario&"' and password='"&password&"')"
rst.Open sqltext,cnn,3,3
'Recogemos los datos y validamos que no haya ningun campo vacio
dim usuario,password
usuario = Request.Form("usua")
password = Request.Form("pass")
if usuario = "" or password ="" then
error = "Debe completar todos los datos."
Response.Write error
Response.End

end if
'Terminamos e imprimimos un mensaje
Response.Write " "
%>