<%@ Language=VBScript %> <%Response.Expires = -1%> <% Set cnn = Server.CreateObject("ADODB.Connection") strCnn = Application("Connection1_ConnectionString") cnn.Open strCnn Set Rset1 = Server.CreateObject("ADODB.Recordset") Rset1.CursorType = 3 Rset1.LockType = 3 Rset1.Open "tusr1510", cnn ban = false do while Rset1.EOF = false if Rset1("login") = Session("login") then if Rset1("password") = Session("password") then ban = true exit do end if end if Rset1.moveNext loop if ban = false then Response.Redirect "cpm_sp_publicaciones_inicio.asp?pag=cpm_sp_publicaciones_suscriptores.asp" end if %> <% ' VI 6.0 Scripting Object Model Enabled %> <% if StartPageProcessing() Then Response.End() %>

<% txt_pass1.value=trim(txt_pass1.value) txt_pass2.value=trim(txt_pass2.value) %>

Información del Suscriptor	¡Bienvenido(a): <%=Session("nombre")%>!
<% btn_cerrar.display %>
<%if Recordset1.fields.getValue("iusr1150")=2 or Recordset1.fields.getValue("iusr1150")=3 then %> <%end if %> <%if Recordset1.fields.getValue("iusr1150")=1 or Recordset1.fields.getValue("iusr1150")=3 then %> <%end if %> Datos del suscriptor Usuario: <%=Recordset1.fields.getValue("login")%> Contraseña: <% txt_pass.display %> <% txt_pass1.display %> Confirmar Contraseña: <% txt_pass2.display %> Nombre: <%=Recordset1.fields.getValue("usr_nombre")%> <%=Recordset1.fields.getValue("usr_apaterno")%> <%=Recordset1.fields.getValue("usr_amaterno")%> Institución: <%=Recordset1.fields.getValue("usr_institucion")%> Cargo: <%=Recordset1.fields.getValue("usr_cargo")%> Tipo de Suscripción: <%=Lbox_tipousuario.getText()%> <% Lbox_tipousuario.display %> Tipo de Recepción: <%=Lbox_estado.getText()%> <% Lbox_estado.display %> Estatus de la Suscripción: <%=Lbox_suscripcion.getText()%> <% Lbox_suscripcion.display %> Desde: <%=Recordset1.fields.getValue("desde")%> Hasta: <%=Recordset1.fields.getValue("hasta")%> Datos para facturación Nombre: <%=Recordset6.fields.getValue("nombre")%> Teléfono: <%=Recordset6.fields.getValue("telefono")%> Fax: <%=Recordset6.fields.getValue("fax")%> Domicilio: <%=Recordset6.fields.getValue("domicilio")%> RFC: <%=Recordset6.fields.getValue("rfc")%> Datos para envío por e-mail email: <%=Recordset6.fields.getValue("usr_email")%> Datos para envío por mensajería Domicilio: <%=Recordset7.fields.getValue("domicilio")%> Colonia: <%=Recordset7.fields.getValue("colonia")%> Municipio / Delegación: <%=Recordset7.fields.getValue("municipio")%> Estado: <%=Lbox_estadopais.getText()%> <% Lbox_estadopais.display %> CP: <%=Recordset7.fields.getValue("cp")%>

<% ' VI 6.0 Scripting Object Model Enabled %> <% EndPageProcessing() %>