Hola, tengo un problema en ASP, tengo una base de datos ACCESS en la cual una tabla llamada vivienda. En la misma tabla dos campos:
*id_auto (autonumerico)
*id_vivienda(numerico)
En una pagina (insertar.asp) en el que inserto datos en la tabla vivienda lleno todos los datos perfectamente. Despues paso a otra (insertar_id.asp)pagina donde el problema viene al intentar meter en id el contenido del campo id_auto. Como es natural me dice tipo de datos incompatibles.
¿Alguien sabe como combertir el campo autonumerico en numerico?, sin cambiar el tipo de dato en la base de datos.
El error esta en la linea marcada con ####
Antes decir que al campo id_vivienda le asigno el valor 2000 para seleccionarlo en es esta pagina (insertar_id.asp):
<%
Const adOpenForwardOnly = 0
Const adOpenKeySet = 1
Const adOpenDynamic = 2
Const adOpenStatic = 3
Const adLockReadOnly = 1
Const adLockPessimistic = 2
Const adLockOptimistic = 3
Const adLockBatchOptimistic = 4
set con = server.CreateObject("ADODB.Connection")
con.open "Provider=Microsoft.Jet.OLEDB.4.0;Data source=" & server.MapPath("../bd/inmobiliaria.mdb")
set rs = server.CreateObject("ADODB.Recordset")
sql = "SELECT * FROM viviendas WHERE id_vivienda = 2000"
rs.open sql,con,1,2
set ad = server.CreateObject("ADODB.Recordset")
ad.CursorType = adOpenKeyset
ad.LockType = adLockOptimistic
ad.open "viviendas",con, adOpenKeySet, adLockPessimistic, adCmdTable
ad.AddNew
rs.delete("id_vivienda") 'en esta linea borro el contenido
####ad.Fields("id_vivienda") = rs.fields("id_auto")
ad.Update
ad.close
Set rs = Nothing
Set ad = Nothing
'rs.close
'conn.close
response.Redirect("../altas_user.html")
%>
Gracias de antemano.
