Borrar registros parcialmente

[alfeizar]

Sería:


Set fso = CreateObject("Scripting.FileSystemObject")
Set Conn=Server.CreateObject("adodb.connection")
Set listado=Server.CreateObject("adodb.recordset")
Conn.Open "DRIVER={Microsoft Access Driver (*.mdb)}; " & "DBQ=" & Server.Mappath("../db/base.mdb")

consulta ="Select * From tabla Where UCase(ID)='" & request("articulo") & "'"

listado.Open consulta,Conn,2,2 %>


<% if request("foto")=1 then

fso.DeleteFile Server.Mappath(inventario.Fields("Ubicacion1"))


'y aquí es donde entraria el update, osea, un request("loquesea") que introduzca un valor "" para que el campo ubicacion lo deje vacio

listado.update
listado.Ubicacion1=""
listado.width1 =""
listado.height1 =""
listado.piedefoto1=""
listado.update

else
end if%>


<%'Luego, vuelta a empezar, silo que quiero es borrar la foto2 del articulo

if request("foto")=2 then.......etc