<%@ Language=VBScript %> <% 'RECUPERO VALORI Dim id id=Request.QueryString("id") If id="" then Response.Redirect "/" Set objRS = Server.CreateObject("ADODB.Recordset") strSQL="SELECT * FROM tImb WHERE id="&id objRS.Open strSQL,objConn '************************************************************** 'DETTAGLI DELL'AZIENDA SCELTA '************************************************************** %>

DETTAGLI AZIENDALI

COMPANY DETAILS

<%if objRS("altre_sedi")<>"" then%> <%end if%>
<%=objRS("ragsoc")%>
Responsabile Settore/Referent
<%=objRS("resp_settore")%>
Altre Sedi/Branch-offices
<%=objRS("altre_sedi")%>
Descrizione/Description
<%=objRS("descrizione")%>
 
<%if objRS("priorita")=true then if objRS("pag_prod")<>"" then%> ">guarda i prodotti <%end if if objRS("email")<>"" then%> ">manda una e-mail <%end if if objRS("sito")<>"" then%> " target="_top">visita il sito <%end if%> <%else%>   <%end if%>
<% objRS.Close set objRS = nothing %> <% objConn.Close set objConn = nothing %>

 

 
 
 

S
E
L
E
Z
I
O
N
A

P
R
E
S
S

A
N
Y

K
E
Y