Ver Mensaje Individual
  #1 (permalink)  
Antiguo 06/04/2006, 08:27
333333
 
Fecha de Ingreso: agosto-2005
Mensajes: 221
Antigüedad: 19 años, 8 meses
Puntos: 4
Poner en una variable un campo autonumerico

Mi problema esq tengo relacionadas unas tablas. Su clave es autonumerica, y para relacionarla tengo q llevar esa clave a otra tabla.

Despues de grabar datos en la 1º tabla, correctamente, hayo la clave máxima para llevarla a una variable:
Cita:
<%
conexion5= new ActiveXObject("ADODB.Connection")
registro5=new ActiveXObject("ADODB.Recordset")
conexion5.Open ("datos")
Fnc_Sql = "Select max(IdEmpresa) from 902_DATOS_GENERALES "
registro5.Open (Fnc_Sql, conexion5, 3, 0x0002)
Id_New = Fnc_Sql
registro5.Close()
conexion5.close()
%>
Y asi en otra asp guardo los datos q he introducido despues de ese código, para la otra tabla relacionada.Pero no me guarda esa clave. Ese Id_New. Me deja el campo vacio.

Cita:
<%
conexion4=new ActiveXObject("ADODB.Connection")
registro4=new ActiveXObject("ADODB.Recordset")
conexion4.Open ("datos")
x="select * from 903_OTRAS_ACTIVIDADES where DesOtrasActividades='"+Request.Form("desactividade s")+"'"
registro4.Open (x, conexion4, 3, 0x0002)

if(registro4.EOF)
{
registro4.Addnew ()
registro4("DesOtrasActividades") = Request.form ("desactividades")
registro4("IdEmpresa") = Request.Form ("Id_New")
registro4.Update()

Response.Write("Datos de otras actividades guardados")
}

else
{
Response.write ("Error")
}
registro4.close()
conexion4.close()
%>

Alguien sabe donde podria estar el error? ¿Xq no me lleva el maximo a esa variable? Muchas gracias, saludos.