<%
Set Conn = Server.CreateObject("ADODB.Connection")
Set Rs = Server.CreateObject("ADODB.Recordset")
ConnSTR = "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" &
Server.MapPath("Inmobiliarias.mdb")
Response.Write ConnSTR & "<br>"
Conn.Open ConnSTR
....
%>
"Raúl Eliseo Diez (ar)" <rd...@chubutbank.com.ar> escribió en el mensaje
news:O7qkVL4lBHA.2252@tkmsftngp04...
<%
Set Conn = Server.CreateObject("ADODB.Connection")
Set Rs = Server.CreateObject("ADODB.Recordset")
ConnSTR = "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" &
Server.MapPath("Inmobiliarias.mdb")
Response.Write ConnSTR & "<br>"
Conn.Open ConnSTR
rs.CursorType = adOpenKeyset
rs.LockType = adLockOptimistic
Inmobiliaria = "InmoPirula"
SQL = "INSERT INTO Alquiler SET Inmobiliaria=Inmobiliaria"
Set RS = Conn.Execute(SQL)
"Raúl Eliseo Diez \(ar\)" wrote:
> Inmobiliaria = "InmoPirula"
> SQL = "INSERT INTO Alquiler SET Inmobiliaria=Inmobiliaria"
Si quieres usar una variable para completar la SQL deberias
concatenarla. Para ello la SQL seria:
Inmobiliaria = "InmoPirula"
SQL = "INSERT INTO Alquiler SET Inmobiliaria='" & Inmobiliaria & "'"
Atento a que despues del signo igual hay una comilla simple y una
doble, y despues de la variable, una comilla simple entre dos dobles.
Eso es para que, al volcar el contenido de la variable, este salga
entre comillas simples (asi es como has de meter un valor de texto en
SQL) La SQL que se ejecute y que tu muestras con un response.write,
debe de tener la forma:
INSERT INTO Alquiler SET Inmobiliaria='Inmobiliaria Inmopirula S.L.'
No se si sera esto lo que te produzca ese error, pero si no es, te
producira otro mas adelante.
Sigue dando el mismo error en la linea que tengo el Set RS =
Conn.Execute(SQL)
"Io" <nov...@yahoo.com> escribió en el mensaje
news:hsfj3u4fm34uq8f53...@4ax.com...
"Daniel Castillo" <danica...@QUITAMEhotmail.com> escribió en el mensaje
news:eEETKV5lBHA.2304@tkmsftngp02...
> Uhm ży tienes el acces instalado en el servidor? debe ser la misma version
> que el q uses en la db
>
> "Raúl Eliseo Diez (ar)" <rd...@chubutbank.com.ar> escribió en el mensaje
> news:uGiMmK5lBHA.2156@tkmsftngp07...
"Raúl Eliseo Diez (ar)" <rd...@chubutbank.com.ar> escribió en el mensaje
news:uGiMmK5lBHA.2156@tkmsftngp07...
Fijate en la linea Set RS = Conn.Execute(SQL)
Esa sentenci SQL es un INSERT, por lo tanto NO RETORNA recordset. Llamalo
solo como Conn.Execute SQL
Saludos
Jaime
"Raúl Eliseo Diez (ar)" <rd...@chubutbank.com.ar> escribió en el mensaje
news:e1Ab$X5lBHA.1600@tkmsftngp07...
> Te comento que para consultas o actualizaciones no tengo ningun error,
solo
> cuando agrego....... No tengo ni idea de lo que puede ser.
>
>
>
>
>
> "Daniel Castillo" <danica...@QUITAMEhotmail.com> escribió en el mensaje
> news:eEETKV5lBHA.2304@tkmsftngp02...
> > Uhm ¿y tienes el acces instalado en el servidor? debe ser la misma
DIM SQL
SQL = "INSERT INTO Alquiler (Inmobiliaria) values ('" & variableInmobiliaria
& "')"
set command = server.CreateObject("adodb.command")
command.ActiveConnection = "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ="
& Server.MapPath("Inmobiliarias.mdb")
Command.CommandType = 1
Command.CommandTimeout = 0
command.CommandText=sql
set rst = command.Execute
set command=nothing
"Raúl Eliseo Diez (ar)" <rd...@chubutbank.com.ar> wrote in message
news:eNBHU34lBHA.2440@tkmsftngp07...
Funciono sin ningun problema
"k_tecnica" <k_te...@fibertel.com.ar> escribió en el mensaje
news:eHex18GmBHA.572@tkmsftngp07...