Error:bloqueo exclusivo

[pocanto]

Bueno amigos primero que nada saludos, tengo este codigo:

<%@LANGUAGE=VBScript%>
<%Option Explicit
Dim conn
Dim Rs
Dim Ruta
Ruta=Server.MapPath("/test.mdb")
Set conn=Server.CreateObject("ADODB.Connection")
Conn.Open "DBQ="& Ruta &";Driver={Microsoft Access Driver (*.mdb)};DriverId=25;FIL=MS Access;"

Set Rs = Server.CreateObject("ADODB.Recordset")
Set Rs.ActiveConnection = conn
Rs.Source = "Select * FROM Proceso Where 1=2"
Rs.CursorType = adOpenStatic
Rs.LockType = adLockOptimistic
Set Rs=conn.Execute("Insert into dato(Cedula,Apellido,Nombre,Telefono,Profesion,Sue ldo) values('"&Request.Form("cedula")&"','"&Request.For m("apellido")&"','"&Request.Form("nombre")&"','"&R equest.Form("telefono")&"','"&Request.Form("profes ion")&"','"&Request.Form("sueldo")&"')")
Rs.Close
Set conn = Nothing
Set Rs = Nothing
Set Ruta = Nothing
Response.Redirect("confirm.asp?dato='"&Request.For m("cedula")&"'")
%>

para insertar en IIS pero me da este error:

Tipo de error:
Error de Microsoft VBScript en tiempo de ejecución (0x800A01F4)
La variable no está definida: 'adOpenStatic'
/piero/ingresar.asp, line 13

Y no le encuentro solucion. espero que alguien pueda ayudarme

[Gurrutello]

hola
Cuando pones...
Dim ruta
Dim ...
Dim ...
estas definiendo la variable
Solo necesitas poner
dim adOpenStatic
'defines la variable
si te da el error en otra
simplemente pon otro dim loquesea
saludos

[AlZuwaga]

Primero, el error que manda (La variable no está definida..) es porque estás usando Option Explicit que hace obligatorio realizar Dim NombreVariable.

Segundo, tenés que incluir el archivo adovbs.inc para poder usar el tipo de cerrojo y cursor de esa manera

[zeus_bsas]

Bueno, el problema es justamente lo que te dice el mensaje de error, no esta definida esa variable.
Definila antes asi:
Const adOpenStatic = 3

Yo tambien uso las constantes, pero no las defino en cada pagina, sino que hago un include de un archico que define esa y muchas mas para diferentes tareas. El archivo se llama adovbs.inc, buscalo en tu disco, seguramente lo tenes.

[pocanto]

Ya puse el adovbs.inc y me da el error:

Tipo de error:
Microsoft OLE DB Provider for ODBC Drivers (0x80004005)
[Microsoft][Controlador ODBC Microsoft Access] La operación debe usar una consulta actualizable.
/piero/ingresar.asp, line 16

El mismo antes de hacer las instrucciones para el bloqueo, no puedo insertar nada en la BD y ya he hecho varias pruebas, cual piensan ustedes que puede ser el problema?

[u_goldman]

Este último es un error de permisos de carpeta, verifica que el folder donde está la DB tenga permisos de escritura

Salu2,

[pocanto]

Saludos amigos, revise los permisos de las carpetas y todo bien, no modifique nada y ahora me sale este error:

Tipo de error:
ADODB.Recordset (0x800A0E78)
La operación no está permitida si el objeto está cerrado.
/piero/ingresar.asp, line 17

esta mierda me tiene loco!!!!!

recomiendenme un buen tutorial de IIS para ver los posibles errores y no molestar tanto

[Gurrutello]

hola
Puedes indicar exactamente la line en la que te da el error
en este caso la 17
Saludos

[urjose]

No no no.

Creo que ultimamente se confunden mucho sobre utilizar el Recordset y utilizar el Execute del objeto de conexion asignado a una variable. ja, que claro hable no?

o usas algo así

Rs.Open SQL, Conexion,3,3

o utilizas algo asi

SET Rs=Conexion.Execute(SQL)

El segundo no es un Recordset es algo así como una simulación es por esto que te manda error en el Rs.Close. Además el Rs De la segunda forma no acepta las pròpiedades que le estas pasando