<%@ Language=VBScript %> <% Option Explicit dim conexion, registros dim sql set conexion = Server.CreateObject ("ADODB.connection") %><% conexion.CursorLocation = 3 conexion.open set registros = Server.CreateObject ("ADODB.RECORDSET") registros.CursorLocation = 2 registros.CursorType = 2 registros.LockType = 3 sql="select * from recicla_afiliado where id='"& request("clave") &"'" registros.Open sql,conexion,1 %> Detalle del MPR/Residuo
Aviso de    <%if registros("tipo")="1" then%>Oferta<%else%>Demanda<%end if%>
Tipo    <%if registros("mpr")="1" then%>MPR<%else%>Residuo<%end if%>
Publicado el día    <% response.write(datepart("d",registros("fecha"))) dim mes mes=datepart("m",registros("fecha")) select case mes case 1 mes="enero" case 2 mes="febrero" case 3 mes="marzo" case 4 mes="abril" case 5 mes="mayo" case 6 mes="junio" case 7 mes="julio" case 8 mes="agosto" case 9 mes="septiembre" case 10 mes="octubre" case 11 mes="noviembre" case 12 mes="diciembre" end select response.write(" de "+mes+" de ") response.write(datepart("yyyy",registros("fecha"))) %>
Nombre del material    <%=registros("nombre")%>
Proceso o actividad donde se genera    <%=registros("proceso")%>

Estado físico

 <%if registros("material")="1" then%>Sólido<%end if%><%if registros("material")="2" then%>Lodo<%end if%><%if registros("material")="3" then%>Líquido<%end if%>
Olor    <%=registros("olor")%>
Color    <%=registros("color")%>
Ph    <%=registros("ph")%>
Cantidad    <%=registros("cantidad")%>
Acondicionamiento    <%if registros("acond")="1" then%>Granel<%end if%><%if registros("acond")="2" then%>Bolsas<%end if%><%if registros("acond")="3" then%>Tambores<%end if%>
Características físicas   <%=registros("caracteristicas")%> 
Peligrosidad del residuo    <%=registros("peligrosidad")%>
Composición química (mg/kg)    <%=registros("quimica")%>
Lixiviados (mg/l)    <%=registros("lixiviados")%>
Clase de riesgo    <%=registros("riesgo")%>
Tipo de almacenamiento    <%=registros("tipoalm")%>
Chemical Abstract Services (CAS)    <%=registros("cas")%>
Nº de identificación de la ONU    <%=registros("onu")%>