<%@LANGUAGE="VBSCRIPT"%> <% Dim Recordset1 Dim Recordset1_numRows Set Recordset1 = Server.CreateObject("ADODB.Recordset") Recordset1.ActiveConnection = MM_DB1_ZACCARO_STRING Recordset1.Source = "SELECT * FROM NotiziedaSogesca" Recordset1.CursorType = 0 Recordset1.CursorLocation = 2 Recordset1.LockType = 1 Recordset1.Open() Recordset1_numRows = 0 %> <% Dim Repeat1__numRows Dim Repeat1__index Repeat1__numRows = 6 Repeat1__index = 0 Recordset1_numRows = Recordset1_numRows + Repeat1__numRows %> <% Dim MM_paramName %> <% ' *** Go To Record and Move To Record: create strings for maintaining URL and Form parameters Dim MM_keepNone Dim MM_keepURL Dim MM_keepForm Dim MM_keepBoth Dim MM_removeList Dim MM_item Dim MM_nextItem ' create the list of parameters which should not be maintained MM_removeList = "&index=" If (MM_paramName <> "") Then MM_removeList = MM_removeList & "&" & MM_paramName & "=" End If MM_keepURL="" MM_keepForm="" MM_keepBoth="" MM_keepNone="" ' add the URL parameters to the MM_keepURL string For Each MM_item In Request.QueryString MM_nextItem = "&" & MM_item & "=" If (InStr(1,MM_removeList,MM_nextItem,1) = 0) Then MM_keepURL = MM_keepURL & MM_nextItem & Server.URLencode(Request.QueryString(MM_item)) End If Next ' add the Form variables to the MM_keepForm string For Each MM_item In Request.Form MM_nextItem = "&" & MM_item & "=" If (InStr(1,MM_removeList,MM_nextItem,1) = 0) Then MM_keepForm = MM_keepForm & MM_nextItem & Server.URLencode(Request.Form(MM_item)) End If Next ' create the Form + URL string and remove the intial '&' from each of the strings MM_keepBoth = MM_keepURL & MM_keepForm If (MM_keepBoth <> "") Then MM_keepBoth = Right(MM_keepBoth, Len(MM_keepBoth) - 1) End If If (MM_keepURL <> "") Then MM_keepURL = Right(MM_keepURL, Len(MM_keepURL) - 1) End If If (MM_keepForm <> "") Then MM_keepForm = Right(MM_keepForm, Len(MM_keepForm) - 1) End If ' a utility function used for adding additional parameters to these strings Function MM_joinChar(firstItem) If (firstItem <> "") Then MM_joinChar = "&" Else MM_joinChar = "" End If End Function %> ::AZ Consulting - Avv.Nicola Zaccaro::
 
 
 
 
NOSTRI SERVIZI
:Home page > Outsourcing

AZ Conculting in Outsourcing :

Nell’ambito della gestione aziendale, l’outsourcing rappresenta una vera e propria scelta strategica, giustificata dalla volontà di garantire la maggiore flessibilità di determinate funzioni dell’impresa. È stato constatato che nel corso del tempo possono manifestarsi esigenze diverse e adeguare di volta in volta la struttura interna dell’impresa non è una scelta economicamente vantaggiosa. Invece l’impresa deve attivarsi per selezionare un partner qualificato, allo scopo di acquisire dei vantaggi in termini di riduzione dei costi e di miglioramento qualitativo dei servizi erogati. In questa prospettiva, la AZ Consulting collaborerà con voi, consentendovi, inoltre, di concentrare le vostre risorse aziendali sulle attività che costituiscono il vostro “Core Business”, in quanto potrete delegare con fiducia al nostro team di professionisti la gestione di tutte quelle attività che sono secondarie, ma funzionali alle vostre attività principali. Vi offriamo la scelta tra una collaborazione costante e un servizio on demand; in quest’ultima ipotesi non pagherete una cifra fissa, ma un importo variabile in base all'effettivo utilizzo da parte vostra dei nostri servizi.

 

 
 
::Dott. Nicola Zaccaro Tel. +39 333/5731973 ::
 
<% Recordset1.Close() Set Recordset1 = Nothing %>