ASP dentro de una funcion JAVASCRIPT

[MarianelaBG]

Muchas gracias U Goldman por tu ayuda, en ese error tienes toda la razón, ahora el problema es que no se como es la sintaxis para comparar un numérico en la parte del select, ya qye la variable acce es integer y lo he hecho en otras ocaciones con char,
El error es de sintaxis, por favor podrian decirme como se debe escribir en este caso:

Error Type:
Microsoft OLE DB Provider for ODBC Drivers (0x80040E14)
[Microsoft][ODBC Microsoft Access Driver] Syntax error in string in query expression 'id ='41'.
/Gonzalez/form_act_rutas_pn.asp, line 63



function llenarform() {
<%
if (opcb=1) then
Dim Conn4, Tabla4
Set Conn4 = Server.CreateObject("ADODB.Connection")
Conn4.Open "DSN=gp"
Set Tabla4=Server.CreateObject("ADODB.recordset")
Temp4 = "Select * from tbl_pn_hoja_ruta where id ="& "'"& acce
Tabla4.Open Temp4, Conn4
DO WHILE NOT Tabla4.Eof

response.write("main.pn_no_doc_identidad.value=""" & trim(Tabla4.fields(0)) & """" & chr(13))
response.write("main.fecha.value=""" & trim(Tabla4.fields(1)) & """" & chr(13))
response.write("cargarcombo(""main.id_abogado"" ,""" & trim(Tabla4.fields(2)) & """)" & chr(13))
response.write("main.tramite.value=""" & trim(Tabla4.fields(3)) & """" & chr(13))
response.write("main.no_horas.value=""" & trim(Tabla4.fields(4)) & """" & chr(13))
response.write("main.no_minutos.value=""" & trim(Tabla4.fields(5)) & """" & chr(13))

Tabla4.MoveNext
LOOP
End If
%>
}