Ver Mensaje Individual
  #1 (permalink)  
Antiguo 07/10/2005, 10:48
carita
 
Fecha de Ingreso: febrero-2005
Mensajes: 34
Antigüedad: 20 años, 2 meses
Puntos: 0
Exclamación actualizar campos de un registro

hola

tengo el campo llamado "estatus" en una base de datos de access y este campo tiene el valor de "revision", lo que quiero es actualizarlo por la leyenda "cotizado" .

tambien atravez de un formulario ingresan valores a los campos llamados "precio_unitario", "iva" y "total"

es decir cuando se guarden los valores de los campos "precio_unitario", "iva" y "total" se tiene que cambiar el valor del campo "estatus" de revision por cotizado.


estoy poniendo esta sentencia


<%

Dim oConn, rs, SQL, sqlstring

id = trim( request("Id" ) ) 'este jala el id de la requisicion
precio_unitario= trim( request("precio_unitario" ) ) 'jala la variable
importe = trim( request("importe" ) ) 'jala la variable
iva = trim( request("iva" ) ) 'jala la variable
total = trim( request("total" ) ) 'jala la variable

hora_cotizacion = time()
fecha_cotizacion = date()

ESTATUS= "COTIZADO" 'este es valor a cambiar

Set Conexion = Server.CreateObject( "ADODB.Connection" )
Conexion.Open "compras"

sqlString = "UPDATE compras SET " &_
"estatus=" & estatus & " WHERE " &_
"id=" & id

Conexion.Execute sqlString

Conexion.Close



Cuando lo ejecuto me manda este error:


Tipo de error:
Microsoft OLE DB Provider for ODBC Drivers (0x80040E10)
[Microsoft][Controlador ODBC Microsoft Access] Pocos parámetros. Se esperaba 1.
/compras/agregar_cotizacion.asp, línea 26


esta es la linea 26:

Conexion.Execute sqlString (esto se encuentra arriba )


espero me puedan apoyar. gracias