<%@ Language=VBScript %> <% Response.Charset = "utf-8" Session.Codepage = 1252 if not IsNull(Request("idl")) and Request("idl") <> "" then Session("idl") = Request("idl") end if if IsNull(Session("idl")) or Session("idl") = "" or CInt(Session("idl")) < 1 then Session("idl") = "1" end if testo01 = "

In quattro anni oltre 140 imprese di medie e grandi dimensioni si sono avvalse dei servizi tecnologici e delle competenze di ebilling S.p.A. per la gestione dei loro flussi documentali. In particolare, leader di mercato nel settore delle telecomunicazioni, multiutilities e operatori bancari stanno utilizzando i servizi di consulting e di outsourcing di ebilling S.p.A. per progettare, personalizzare e consegnare documenti indirizzati ai propri clienti. La stretta collaborazione con queste imprese ha permesso ad ebilling S.p.A. di consolidare il proprio know-how e il proprio asset.

" if Session("idl") = "2" then testo01 = "

In a period of just four years, over 140 medium and large companies have made use of the technological services and skills of ebilling S.p.A. to manage their document flows. More specifically, market leaders in the telecommunications, multi-utilities and bank operator sectors are using ebilling S.p.A. consulting and outsourcing services to plan, personalise and deliver documents addressed to their clients. Close cooperation with these companies has enabled ebilling S.p.A. to strengthen its know-how and assets.

" end if %> ebilling

case history

<%= testo01%>
<% Set cmdCase = Server.CreateObject("ADODB.Command") cmdCase.CommandType = 1 Set cmdCase.ActiveConnection = Session("CONNECTION") cmdCase.CommandText = "SELECT * FROM casehistory WHERE lingua_id = " & Session("idl") & " AND pubblicato = 1 ORDER BY ordine" Set rsCase = Server.CreateObject("ADODB.Recordset") rsCase.Open cmdCase, , 1, 3 if not(rsCase.BOF and rsCase.EOF) then %> <% count = 0 while not rsCase.EOF count = count + 1 %> <% rsCase.MoveNext if count > 2 then count = 0 %> <% if not rsCase.EOF then %> <% end if end if wend if count > 0 then while not count > 2 %> <% count = count + 1 wend end if %> <% end if rsCase.Close %>