Yo particularmente, por lo menos eso que expones, lo haría así:
Código:
Dim varUpdate
if Trim(request.form("Equipo")) <> "" then 'Equipo
varUpdate = "equipo = '" & Trim(request.form("Equipo")) & "'"
end if
if Trim(request.form("Fecha_captura")) <> "" then 'Fecha_captura
varUpdate = varUpdate & ", Fecha = '" & Trim(request.form("Fecha_captura")) & "'"
end if
'etc, etc, etc...
sSQL="Update TAnomalias Set " & varUpdate & "' Where Number =" & Number2 & ""