IntraWeb: Inserción con ADOQuery

[Brewster]

hola a todos.-

En Intraweb tengo el siguiente código.-

query.SQL.Text:='Insert into TPrueba(codigo) values (122)';
query.open;

Me da en esa línea el siguiente error.-

El proveedor actual no permite que una única ejecución devuelva múltiples recordsets.

Esto no tiene mucha lógica pues para devolver múltiples recordsets debería ser la consulta un select y no un insert.

¿Se hace con el AdoQuery de otra manera la insercción?

Gracias por adelantado.