ASP - un poc de ayuda por favor(Actualizar registros)

hola tengo una dura resulta que estoy construyendo un formulario que actualiza registro en acces con asp clasico , con el primer formulario pasolos parametros, pero el porblema vien con el archivo que actualiza los datos nose en que me esta mal podrian ayudarme porfavor
este es mi codigo
<%
Dim oConn,strSQL , num , pro
num=request.form("ids") //aqui recibo los valores de ids se llama la caja de texto //que r // ecibira los valores
pro=request.form("profe1")// asi se lla la otra caja de texto valoresde profesiones
Set oConn = Server.CreateObject("ADODB.Connection")

oConn.Open("Provider=Microsoft.Jet.OLEDB.4.0; Data Source=" & Server.MapPath("FileDB.mdb"))

Set rsUpdate= Server.CreateObject("Adodb.recordset")
rsUpdate.Activeconnection=oConn
rsUpdate.Cursortype=AdopenDynamic
rsUpdate.Source="Update Files Set Profession='pro' where id= <%
Dim oConn,strSQL , num , pro
num=request.form("ids")
pro=request.form("profe1")
Set oConn = Server.CreateObject("ADODB.Connection")

oConn.Open("Provider=Microsoft.Jet.OLEDB.4.0; Data Source=" & Server.MapPath("FileDB.mdb"))

id Request.QueryString("id")
Set rsUpdate= Server.CreateObject("Adodb.recordset")
rsUpdate.Activeconnection=oConn
rsUpdate.Cursortype=AdopenDynamic
rsUpdate.Source="Update Files Set Profession="&pro&" where id= "&id&""
rsUpdate.open()
rsUpdate.close()

%>
rsUpdate.open()
rsUpdate.close()

%>