Si, ese error significa que v2 esta vacio o es null. Haz una comprobacion antes para ver. Otra cosa si v1 es alfanumerico deberias ponerlo entre comillas.
Código:
Dim v1
Dim misql
if not isNull(v2) and not isEmpty(v2) then
v2 = cInt(v2)
v1= "02"
v2= Request.Form("NUMORDEN")
misql= "UPDATE PIRYPGR SET pgr_SITUACION = '"&v1&"' WHERE pir_orden = "&v2
DICEPGR.ActiveConnection.Execute(misql)
else
response.write "Error en v2. Es nulo o esta vacio."
end if
Un saludo