AYUDA, AYUDA!!!!!!!!!!!! POR FAVOR
Publicado por Raul (5 intervenciones) el 24/05/2001 10:50:51
response.expires = 0
dim rsetProFun
dim conConexion
dim strSql
set conConexion = Server.createobject("ADODB.Connection")
conConexion.Open"Dsn=Proyecto;"
set rsetProFun = Server.createobject("ADODB.Recordset")
rsetProFun.ActiveConnection = conConexion
rsetProFun.Open strSql,conConexion,2,3,1
If rsetProFun.BOF And rsetProFun.EOF Then
rsetProFun.AddNew
rsetProFun("Referencia")= Request("Referencia")
'rsetProFun("Descripcion")= Request("Descripcion")
'rsetProFun("Articulo")= Request("Articulo")
'rsetProFun("ImporteEuros")= Request("ImporteEuros")
'rsetProFun("ImportePts")= Request("ImportePts")
rsetProFun.Update
Response.Write "<B>La Inserción se ha realizado con éxito.</B>"
Else
Response.Write "<B>Este registro ya existe</B>"
End If
SOLO ME DEJA INTRODUCIR MÁXIMO 3 CAMPOS SINO ME DA UN ERROR Y TODO ES POR ESTA LINEA:
rsetProFun.Open strSql,conConexion,2,3,1
lOS NUMEROS DEL FINAL SON UN VECTOR NECESARIOS PARA INSERTAR DATOS EN ACCESS.
¿QUE COMBINACIÓN HAY QUE PONER O QUE HAY QUE MODICAR PARA INSERTAR 8 DATOS O CUALQUIER CANTIDAD DE CAMPOS?
MUCHISIMAS GRACIAS
dim rsetProFun
dim conConexion
dim strSql
set conConexion = Server.createobject("ADODB.Connection")
conConexion.Open"Dsn=Proyecto;"
set rsetProFun = Server.createobject("ADODB.Recordset")
rsetProFun.ActiveConnection = conConexion
rsetProFun.Open strSql,conConexion,2,3,1
If rsetProFun.BOF And rsetProFun.EOF Then
rsetProFun.AddNew
rsetProFun("Referencia")= Request("Referencia")
'rsetProFun("Descripcion")= Request("Descripcion")
'rsetProFun("Articulo")= Request("Articulo")
'rsetProFun("ImporteEuros")= Request("ImporteEuros")
'rsetProFun("ImportePts")= Request("ImportePts")
rsetProFun.Update
Response.Write "<B>La Inserción se ha realizado con éxito.</B>"
Else
Response.Write "<B>Este registro ya existe</B>"
End If
SOLO ME DEJA INTRODUCIR MÁXIMO 3 CAMPOS SINO ME DA UN ERROR Y TODO ES POR ESTA LINEA:
rsetProFun.Open strSql,conConexion,2,3,1
lOS NUMEROS DEL FINAL SON UN VECTOR NECESARIOS PARA INSERTAR DATOS EN ACCESS.
¿QUE COMBINACIÓN HAY QUE PONER O QUE HAY QUE MODICAR PARA INSERTAR 8 DATOS O CUALQUIER CANTIDAD DE CAMPOS?
MUCHISIMAS GRACIAS
Valora esta pregunta


0