
02/01/2006, 13:54
|
 | | | Fecha de Ingreso: octubre-2004 Ubicación: Costa Rica
Mensajes: 265
Antigüedad: 20 años, 7 meses Puntos: 1 | |
Podria ser asi, no lo probe, pero has tu la prueba y me dices.
SQL = "SELECT user FROM recetas WHERE ID="& ID
Set rs = conexion.Execute(SQL)
If not rs.EOF Then
'Si existe un registro
user2 = rs( "user" )
nuevo_valor = user&" "&user2
SQL = "UPDATE recetas SET user = '"&nuevo_valor&"' WHERE ID = "&ID&""
conexion.Execute(SQL)
Else
SQL = " INSERT INTO recetas(user) VALUES ('"&user&"')"
conexion.Execute(SQL)
END IF
conexion.Close
Set conexion = Nothing
__________________ 3S-CRM |