Ver Mensaje Individual
  #1 (permalink)  
Antiguo 24/01/2002, 16:14
Avatar de biblio
biblio
 
Fecha de Ingreso: enero-2002
Ubicación: Urano
Mensajes: 577
Antigüedad: 23 años, 5 meses
Puntos: 0
Error............................................

Me pueden decir porque me sale este error


Microsoft OLE DB Provider for ODBC Drivers error '80004005'
[Microsoft][Controlador ODBC Microsoft Access] No se puede actualizar. Base de datos u objeto de sólo lectura.

Este es el codigo.
Dim rsBookUpd,rsBookUpd1
Dim intMax
intMax=0
Set rsBookUpd = Server.CreateObject("ADODB.Recordset")
Set rsBookUpd1 = Server.CreateObject("ADODB.Recordset")

strSQL = "SELECT Max(tblMaster.FICHA_NO) As Maximo FROM tblMaster"

rsBookUpd.Open strSQL, strCon

intMax=rsBookUpd.Fields("Maximo") + 1
Response.Write(intMax)
rsBookUpd.Close

strSQL = "SELECT tblMaster.*, tblDetail.* FROM tblDetail, tblMaster"
rsBookUpd1.CursorType = 2
rsBookUpd1.LockType = 3
rsBookUpd1.Open strSQL, strCon

rsBookUpd1.AddNew
rsBookUpd1("FICHA_NO")=intMax
rsBookUpd1("TITULO_LAR")="ES UNA PRUEBA"
rsBookUpd1.Update

rsBookUpd1.Close
Set adoCon = Nothing
Set strCon = Nothing

:PSaludos