inserción

[aviana]

Gracias por responder. La función donde da error es la siguiente y el error lo da en el insert. existe_usuario es otra función que devuelve 1 si el usuario ya está en la BD


Public Function graba_usuario(usuario, clave, correo)
if ((existe_usuario (usuario)<>1) and (existe_clave (clave)<>1) and (existe_correo (correo)<>1)) then
conexion.Execute ("INSERT into usuario values ('"&usuario&"', '"&clave&"', '"&correo&"')")
graba_usuario=1
else
graba_usuario=0
end if
End Function