Mision imposible?

[bentox]

Antes de nada, darte las gracias por responder.

Tras mirar el código, era algo parecido a lo que estaba haciendo, pero lo único que consigo es que salga el texto que hay en el response.write, pero ni rastro del valor.

A que se puede deber?

Aqui tienes el código que utilizo.

<%@Language="VBScript"%>
<!--#include FILE="adovbs.inc" -->
<%

' RecordSet and Connection objects, and SQL string
Dim oRS, Conn, strSQL

Dim results
set Conn = server.createobject("ADODB.Connection")
set oRS=server.CreateObject("ADODB.Recordset&quot ;)
Conn.open "Provider=SQLOLEDB.1;Persist Security Info=False;User ID=***;Password=****;Initial Catalog=**;Data Source=***"

oRs.Open "tt", Conn, 1, 2, 2

oRs.AddNew
oRs("tt")="que poasa"
Response.Write "Este es el autonúmerico para este registro: "& oRS("Id_tt")
'Guardamos los cambios
oRS.Update

'Cerramos la conexion
oRS.Close
Conn.Close

'Liberamos los recursos para que se pueda volver a usar inmediatamente
Set oRS = Nothing
set Conn= Nothing

%> :(