<%
set Conn = Server.CreateObject("ADODB.Connection")
Conn.Open "TAM_DIFUSION"
StrSql = "select f.id as id, f.secretaria as secretaria, f.dependencia as dependencia, f.ciudad as ciudad, f.tramite as tramite, f.descripcion as descripcion, f.usuario as usuario, f.comprobante as comprobante, f.vigencia as vigencia, f.costo as costo, f.tiempo as tiempo, f.requisitos as requisitos, f.area as area, f.responsable as responsable, f.domicilio as domicilio, f.telefono as telefono, f.horario as horario, f.fundamento as fundamento, f.observaciones as observaciones, f.compromiso as compromiso, s.id_secre as id_secre, s.secretaria as secretaria2, d.id_depe as id_depe, d.dependencia as dependencia2, m.id_mpio as id_mpio, m.mpio as mpio FROM formato f, secretaria s, dependencia d, municipios m WHERE f.secretaria = s.id_secre and f.dependencia = d.id_depe and f.ciudad = m.id_mpio and f.ciudad = 29 ORDER BY f.tramite; "
set datos = Conn.execute(StrSql)
StrSq2 = "select x.id_x as id_x, x.id as idx, x.secretaria as secretariax, x.dependencia as dependenciax, x.tramite as tramitex, x.ciudad as ciudadx, x.costo as costox, x.responsable as responsablex, x.domicilio as domiciliox, x.telefono as telefonox, x.horario as horariox, f.id as id, f.secretaria as secretaria, f.dependencia as dependencia, f.ciudad as ciudad, f.tramite as tramite, f.descripcion as descripcion, f.usuario as usuario, f.comprobante as comprobante, f.vigencia as vigencia, f.costo as costo, f.tiempo as tiempo, f.requisitos as requisitos, f.area as area, f.responsable as responsable, f.domicilio as domicilio, f.telefono as telefono, f.horario as horario, f.fundamento as fundamento, f.observaciones as observaciones, f.compromiso as compromiso, s.id_secre as id_secre, s.secretaria as secretaria2, d.id_depe as id_depe, d.dependencia as dependencia2, m.id_mpio as id_mpio, m.mpio as mpio FROM formato_ex x, formato f, secretaria s, dependencia d, municipios m WHERE x.id = f.id and x.secretaria = s.id_secre and x.dependencia = d.id_depe and x.ciudad = m.id_mpio and x.ciudad = 29 ORDER BY x.tramite; "
set datos2 = Conn.execute(StrSq2)
%>
MUNICIPIO DE OCAMPO TAMAULIPAS - BIENVENIDOS
