// *** Edit Operations: declare variables // set the form action variable MM_editAction = CGI.SCRIPT_NAME; If (CGI.QUERY_STRING NEQ "") { MM_editAction = MM_editAction & "?" & CGI.QUERY_STRING; } // boolean to abort record edit MM_abortEdit = false; // query string to execute MM_editQuery = ""; SELECT UserID FROM anagrafica WHERE UserID='#MM_dupKeyUsernameValue#' if (MM_rsKey.RecordCount GT 0) { // the username was found - can not add the requested username MM_qsChar = "?"; if (Find("?",MM_dupKeyRedirect) GT 0) MM_qsChar = "&"; MM_dupKeyRedirect_trigger = MM_dupKeyRedirect & MM_qsChar & "requsername=" & MM_dupKeyUsernameValue; } // *** Insert Record: set variables If (IsDefined("MM_insert")) { MM_editDatasource = #MM_tuttiliberi_con_DSN#; MM_editUserName = #MM_tuttiliberi_con_USERNAME#; MM_editPassword = #MM_tuttiliberi_con_PASSWORD#; MM_editTable = "anagrafica"; MM_editRedirectUrl = "regOK.htm"; MM_fieldsStr = "nomeUT|value|select|value|viaUT|value|cittaUT|value|capUT|value|telUT|value|aziendaUT|value|emailUT|value|come|value|soddisfatti|value|news|value|contatta|value|ID|value|PW|value|catUT|value"; MM_columnsStr = "Nome|',none,''|Ruolo|',none,''|Via|',none,''|Citta|',none,''|CAP|',none,''|telefono|',none,''|Azienda|',none,''|email|',none,''|come|',none,''|soddisfatta|none,1,0|iscrivinews|none,1,0|contatta|none,1,0|UserID|',none,''|PW|',none,''|CAT|none,none,NULL"; // create the MM_fields and MM_columns arrays MM_fields = ListToArray(MM_fieldsStr,"|"); MM_columns = ListToArray(MM_columnsStr,"|"); // set the form values For (i=1; i+1 LE ArrayLen(MM_fields); i=i+2) { MM_fields[i+1] = IIf(IsDefined(MM_fields[i]),"FORM." & MM_fields[i],DE("")); } // append the query string to the redirect URL If (MM_editRedirectUrl NEQ "" AND CGI.QUERY_STRING NEQ "") { If (Find("?", MM_editRedirectUrl) EQ 0) { MM_editRedirectUrl = MM_editRedirectUrl & "?" & CGI.QUERY_STRING; } Else { MM_editRedirectUrl = MM_editRedirectUrl & "&" & CGI.QUERY_STRING; } } } // *** Insert Record: construct a sql insert statement If (IsDefined("MM_insert")) { // create the insert sql statement MM_tableValues=""; MM_dbValues=""; For (i=1; i+1 LE ArrayLen(MM_fields); i=i+2) { FormVal = MM_fields[i+1]; MM_typesArray = ListToArray(MM_columns[i+1],","); Delim = IIf(MM_typesArray[1] NEQ "none","MM_typesArray[1]",DE("")); AltVal = IIf(MM_typesArray[2] NEQ "none","MM_typesArray[2]",DE("")); EmptyVal = IIf(MM_typesArray[3] NEQ "none","MM_typesArray[3]",DE("")); If (FormVal EQ "") { FormVal = EmptyVal; } Else { If (AltVal NEQ "") { FormVal = AltVal; } Else If (Delim EQ "'") { // escape quotes FormVal = "'" & Replace(FormVal,"'","''","ALL") & "'"; } Else { FormVal = Delim & FormVal & Delim; } } If (i GT 1) { MM_tableValues = MM_tableValues & ","; MM_dbValues = MM_dbValues & ","; } MM_tableValues = MM_tableValues & MM_columns[i]; MM_dbValues = MM_dbValues & FormVal; } MM_editQuery = "insert into " & MM_editTable & " (" & MM_tableValues & ") values (" & MM_dbValues & ")"; } #PreserveSingleQuotes(MM_editQuery)# TUTTILIBERI.IT Accesso Sezioni Riservate
REGISTRAZIONE UTENTE

Compilare il modulo di registrazione per accedere alle sezioni riservate del sito.

Nome e Cognome
Posizione
Indirizzo
Citta Cap
Telefono
Istituto-Azienda
E-Mail
Come siete venuti a conoscenza di Tuttiliberi.it ?
Siete soddisfatti da questo sito?
Volete essere iscritti alle newsletter periodiche?
Volete essere ricontattati?

Compilando ed inviando questo modulo si accetta quanto segue (in conformità con l'art. 10 Legge 675/96 sulla privacy): i dati anagrafici raccolti in questa occasione saranno utilizzati da GEA Progetto Salute esclusivamente per elaborazioni interne e per l'invio e divulgazione di materiale informativo proveniente da GEA Progetto Salute. Essi non verranno comunicati o diffusi a terzi. L'interessato gode dei diritti di cui all'art. 13 legge 675/96; titolare e responsabile dei dati raccolti è GEA Progetto Salute.

USER ID SCELTA
PASSWORD
SCELTA
SEZIONE INTERESSATA PER L'ACCESSO


 

 

 


 

La Magia corre sul web
Leggi quest'articolo e gioca con il nostro predictor, scopri chi eri nel tuo passato.

Filmato di animazione
Fantastico filmato On-Line. Gli esperti di Gea Progetto Salute gli hanno assegnato il Premio Internet 2001. Da vedere con calma e relax.

Scopri l'Antico Egitto
Sito di grande interesse culturale, supportato da eccellente grafica.

La storia del calendario
Avvincente viaggio nel tempo

Global Village
Che cos'è?

Gocce di saggezza
Il valore del tempo

I Love Webcam
Video, Webcam e quant'altro di multimediale...

Informagiovani

Fatti Furbo
Non farti male

Droghe
Effetti, Rischi, Precauzionià