Oscar G
24 de Junio del 2004

Esta es la sintaxis que tengo yo, no se sitiene que ver que mi web este montada en Windows 2000.....

<%response.write(Session("Empleado"))%>
<%a=Session("Empleado")%>
<%response.write(a)%>

<%response.write(Request.form("t1"))%>
<%
Set oConn = Server.CreateObject"ADODB.Connection")

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

Strsql1 = "SELECT * FROM Email WHERE ((N_E) LIKE '%"&a&"%')"

Set RS = Server.CreateObject("ADODB.Recordset")

RS.Open Strsql1, oConn,1,3
%>

<%rs.Fields("Email")=(Request.form("t1"))%>

<%rs.Update%>

¿Que Puedo hacer?, ó ¿Estoy mal en mi sintaxis?

nsg
24 de Junio del 2004

yo probaría de esta manera:
<%response.write(Session("Empleado"))%>
<%a=Session("Empleado")%>
<%response.write(a)%>

<%ltext=Request.form("t1")%>
<%
Set oConn = Server.CreateObject"ADODB.Connection")

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

Strsql1 = "SELECT * FROM Email WHERE ((N_E) LIKE '%"&a&"%')"

set rs=oconn.execute(strsql1)


strsql2="update email set email=' " & ltext & " ' where .................."
oconn.execute(strsql2)
%>