%@ Language=VBScript %>
<%
Option Explicit
dim conexion,registros,sql,id_var,mes,texto2_var,i,largo,caracter,status_var,letra_var,total_var
set conexion = Server.CreateObject ("ADODB.connection")
%><%
conexion.open
set registros = Server.CreateObject ("ADODB.RECORDSET")
%>
Click para imprimir
|
 |
| |
Catálogo
|
|
<%
If request("texto")<>"" then
If request("id")<>"" then
letra_var=request("texto")
sql="Select count(*) as total from ciec_vista_catalogo where cod_empresa = '"&request("id")&"'"
registros.open sql,conexion,1
total_var=0
total_var=cint(registros("total"))
registros.Close()
sql="Select * from ciec_vista_catalogo where cod_empresa ='"&request("id")&"' order by nom_produc"
registros.open sql,conexion,1
Else
letra_var=request("texto")
sql="Select count(*) as total from ciec_vista_catalogo where nom_produc LIKE '%"&trim(request("texto"))&"%' or descripcion_produc LIKE '%"&trim(request("texto"))&"%' or empresa LIKE '%"&trim(request("texto"))&"%' or contacto LIKE '%"&trim(request("texto"))&"%' or telefono LIKE '%"&trim(request("texto"))&"%' or direccion LIKE '%"&trim(request("texto"))&"%' or desc_ing LIKE '%"&trim(request("texto"))&"%'"' or MUNICIPIO LIKE '%"&trim(request("texto"))&"%'"'"
registros.open sql,conexion,1
total_var=0
total_var=cint(registros("total"))
registros.Close()
sql="Select * from ciec_vista_catalogo where nom_produc LIKE '%"&trim(request("texto"))&"%' or descripcion_produc LIKE '%"&trim(request("texto"))&"%' or empresa LIKE '%"&trim(request("texto"))&"%' or contacto LIKE '%"&trim(request("texto"))&"%' or telefono LIKE '%"&trim(request("texto"))&"%' or direccion LIKE '%"&trim(request("texto"))&"%' or desc_ing LIKE '%"&trim(request("texto"))&"%'"' or MUNICIPIO LIKE '%"&trim(request("texto"))&"%'"' order by nom_produc"
registros.open sql,conexion,1
End If
if not registros.eof and not registros.bof then
%>
|
|
<%Do while registros.EOF=False
Session("idcatalogo")=registros("nom_produc")%>
|
<%=registros("nom_produc")%>
|
|
" align="left" hspace="8" vspace="4">
Descripción: <%=registros("descripcion_produc")%>
<%If registros("desc_ing")<>"" then%>
Description: <%=registros("desc_ing")%>
<%end if%>
Contáctenos:
<%=registros("direccion")%>
Edo. Carabobo - Venezuela.
<%If registros("telefono")<>"" then%>
Teléfonos: +58 -
<%=registros("telefono")%>
<%End If%>
<%If registros("fax")<>"" then%>
O por fax: +58 -
<%=registros("fax")%>
<%End If%>
|
|
<%
registros.movenext()
loop
%> <%else%> |
|
|
<%=total_var%>
Resultados |
|
<%end if
end If
set registros = Nothing
conexion.close
set conexion = Nothing
%>
| |
|
| |
|
|
Tomado de www.ciec.org.ve
- Si desea mas información escribanos a info@ciec.org.ve |