<% ' Response.Redirect "\kadi\errore.asp" Dim oConn, nCard, nCat, nMessaggio Set oConn = fn_lgConnessioneDB() dim sLingua sLingua = LTrim(Request.QueryString("lugha")) sLingua = RTrim(sLingua) if sLingua = "" Then 'Response.Write("If= " & sLingua) sLingua = Request.Form("nIDL") sLingua = LTrim(sLingua) sLingua = RTrim(sLingua) 'Response.Write("Form= " & sLingua) If sLingua = "" Then Response.Redirect "\kadi\kdlingvo.asp" end if else ' nIDL=linguaMsg(sLingua,True) End If nIDL=linguaMsg(sLingua,True) %> <%=aMsg(nIDL,TitPag)%>
<% =Pubblicita(1,nIDL) %> <%=Pubblicita(2,nIDL)%>

 

<%=aMsg(nIDL,TitPag)%>

<%=aMsg(nIDL,Modulo)%>

 

<%=aMsg(nIDL,Visione)%>

<%=aMsg(nIDL,Corpo3)%> '<%=aMsg(nIDL,Visualizza)%>'   

<%=aMsg(nIDL,CodiceCartolina)%>

  <% Set oRS = oConn.Execute( "select fldAuto, nome from " & fn_lgPrefissoTabella() & "categorie" ) While Not oRS.EOF %> <% If Not oRS.EOF Then oRS.MoveNext End If Wend oRS.Close Set oRS = Nothing oConn.Close Set oConn = Nothing %>

<%=aMsg(nIDL,InviaCartoline)%>

<% Response.write(aMsg(nIDL,Corpo4) & " ") Response.write(aMsg(nIDL,Corpo5) & " ") Response.write(aMsg(nIDL,Corpo6) & " ") Response.write(aMsg(nIDL,Corpo7) & " ") %>

<% Response.write(aMsg(nIDL,Corpo8) & " ") Response.write(aMsg(nIDL,Corpo9) & " ") Response.write(aMsg(nIDL,Corpo10)) %>

<% Response.write(aMsg(nIDL,Corpo13)) %>
<% nCard = fn_lgTotaleImmagini(oConn) nCat = fn_lgTotaleCategorie(oConn) nMessaggio1 = aMsg(nIDL,Messaggio1s) nMessaggio2 = aMsg(nIDL,Messaggio2s) if (nCard>1) then nMessaggio1 = aMsg(nIDL,Messaggio1p) end if if (nCat>1) then nMessaggio2 = aMsg(nIDL,Messaggio2p) end if nMessaggio =Replace(nMessaggio1,"x2","" & CStr(nCat) & "") & _ " " & Replace(nMessaggio2,"x1","" & CStr(nCard) & "") & "." Response.Write(nMessaggio) %>

&nIDL=<%=nIDL%>"><%=oRS("nome")%> <% oRS.MoveNext If Not oRS.EOF Then %> &nIDL=<%=nIDL%>"> <%=oRS("nome")%> <% End If %>

 


<%=Pubblicita(3,nIDL)%>


© Nino Vessella , 1996-.
Diritti riservati. Nessuna parte può essere riprodotta, in qualsiasi forma o mezzo, senza citare la fonte.
Ĉiuj rajtoj rezervitaj. Neniu parto povas esti reproduktita, en kiu ajn formo au per kiu ajn metodo, sen mencii ĉi tiun fonton.
Haki zote zimehifadhiwa. Hairuhusiwi kunakili sehemu yoyote bila kuitaja asili yake hii.
All rights reserved. No part may be reproduced, in any form or by any means, without mention of this source.
-531