<% vPage="faq-domande-risposte.asp" vTitle="Noleggio con Conducente Roma, Domande e Risposte" vDescription="FAQ, Domande e Risposte su i nostri servizi di Noleggio con Conducente a Roma" 'Apro RecordSet SET RS = Server.CreateObject("ADODB.Recordset") %> <%=vTitle%> "> /<%=vPage%>"> /images/<%=Application("LogoFace")%>"> /<%=vPage%>">

F.A.Q. - Domande e Risposte Frequenti


<%=Application("LineColor")%>;"> <% 'Stringa where StrWhere=" WHERE Faq.Visibile=1 AND " IF Request("c")<>"" THEN StrWhere = StrWhere & " Faq.idFaqCategorie=" & Request("c") & " AND " IF Request("g")<>"" THEN StrWhere = StrWhere & " (Domanda like '%" & Replace(Request("g"),"'","''") & "%' OR Risposta like '%" & Replace(Request("g"),"'","''") & "%') AND " StrWhere = Mid(StrWhere,1,len(StrWhere)-4) 'Stringa SQL StrSql="SELECT Faq.idFaq, Faq.idFaqCategorie, FaqCategorie.Categoria, Faq.Domanda, FAQ.Risposta, Faq.Visibile " & _ "FROM FaqCategorie INNER JOIN Faq ON FaqCategorie.idFaqCategorie = Faq.idFaqCategorie " & _ StrWhere & _ "ORDER BY Categoria ASC, Domanda ASC" 'Debug 'Response.write StrSql':response.end 'Apertura Recorset RS.Open StrSql, CN, 1 'Configurazione Paginazione RecordsPerPagina = 10 PagineVisualizzate = 10 RecordCount = 0 TOTPagine = 0 Page = Request("page") v_Param = "&a=" & Request("a") & "&m=" & Request("m") & "&c=" & Request("c") & "&g=" & Request("g") & "&n=" & n IF Page="" THEN Page = 1 Page = CInt(Page) IF RS.RecordCount<=0 THEN%>


Non Trovato

F.A.Q. non trovata, effettua un altra ricerca...







<%END IF 'Inizializza la paginazione Call InitPaginazione(RS) FOR i=1 to RecordsPerPagina IF Not RS.EOF then vCont=vCont+1%> <%IF i>1 THEN%><%END IF%>

'); return false" title="Click per nascondere/visualizzare i dettagli">" src="/images/ico_plus.png" border="0" alt="Apri"> <%=Rs.Fields("Domanda")%>

Child" style="display:none;border: 1px solid #C4C4C4; line-height:1.8em; background-color:#EFEFEF; border-radius:10px 10px 10px 10px; padding:15px;text-align:justify;"> <%=Replace(Rs.Fields("Risposta"),vbcrlf,"
")%>

<%RS.MoveNext END IF NEXT%>



<% Call StampaPagine() %>

<%RS.Close%>
Cerca:

Clicca per Cercare


Categorie:
<% StrSql = "SELECT FaqCategorie.idFaqCategorie, FaqCategorie.Categoria, Count(Faq.idFaq) AS ConteggioDiidFaq " & _ "FROM FaqCategorie INNER JOIN Faq ON FaqCategorie.idFaqCategorie = Faq.idFaqCategorie " & _ "GROUP BY FaqCategorie.Categoria, FaqCategorie.Visibile, Faq.Visibile, FaqCategorie.idFaqCategorie " & _ "HAVING (((FaqCategorie.Visibile)=1) AND ((Faq.Visibile)=1)) ORDER BY FaqCategorie.Categoria" 'Response.write StrSql:response.end RS.Open StrSql, CN, 1 Do While Not RS.Eof%> " class="Link12Black"><%=Rs.Fields("Categoria")%> (<%=Rs.Fields("ConteggioDiidFaq")%>)
<%RS.MoveNext Loop RS.Close%>
Torna SU
<%SET RS=Nothing CN.Close SET CN=Nothing%>