<%@LANGUAGE="VBSCRIPT" CODEPAGE="1252"%> [an error occurred while processing this directive]<% strSQL = "Select Max(idNoticia) From tblNoticias where chrEstado = 'A'" vNoticia = ObtenerDatos(strSQL) If IsArray(vNoticia) Then strSQL = "Select idNoticia, strNoticia, strTextoNoticia from tblNoticias Where idNoticia = " & vNoticia(0,0) vNoticia = ObtenerDatos(strSQL) End If %> <% strSQL = "Select strIndustria, strTextoIndustria from tblIndustrias order By idIndustria" vIndustria = ObtenerDatos(strSQL) intFilas=-1 If IsArray(vIndustria) Then intFilas = UBound(vIndustria,2) End If %> Juan Neustadtel y Cia. S.A. - Maquinaria y material de empaque para la industria alimenticia
Juan Neustadtel Juan Neustadtel y Compañía S.A.
La empresa productos Equipos usados Equipos en stock Servicios Noticias Contacto Regreso al inicio

 

<%=replace(vIndustria(1,0),vbCr,"
")%>
 
 

<%=replace(vIndustria(1,1),vbCr,"
")%>
 
 

<%=replace(vIndustria(1,2),vbCr,"
")%>
 
 

<%=replace(vIndustria(1,3),vbCr,"
")%>
 
 

<%=replace(vIndustria(1,4),vbCr,"
")%>