problema con update

[abuenog]

hola tengo el siguiente codigo:

<%
Dim oConn,strSQL

Set oConn = Server.CreateObject("ADODB.Connection")

oConn.Open("DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("db\pulitel.mdb"))

nom=Request.Form("Name")
refer= Request.Form("Referencia")
if trim(request(nom))<>"" then

strSQL = "UPDATE Lista SET Nombre=" & nom & " WHERE Referencia=" & refer & ""
Set objRS = oConn.Execute(strSQL)
end if

oConn.Close
set oConn = nothing
Response.redirect("index2.asp")

%>

No me da ningun tipo de error, pero el cambio del update no me lo hace. Cual puede ser el error?

Espero ayuda... gracias