12 maggio 2006 alle 11:00:15
Modificato il 12 maggio 2006 alle 11:17:37

<%

'Response.Write "Qui inserirete il contenuto della vostra pagina <br>"
'Response.Write ""
Response.Write "&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;<br>"
'If sPseudo<> ""Then Response.Write "Ciao " & Server.HTMLEncode(sPseudo) & "<br>"

'Response.Write "Stai visualizzando la nuova pagina: " & sURLPage & ".<br>"

'Response.Write " Sei sul sito " & GLOBAL_SITE_NAME & ".<br><br>"

CreateTopTable "lamiatabella","Registra un Curriculum"

CreateBottomTable ""




' Response.Write "Funzione richiamata dal 'main'"

Dim nome
nome=Request.Form("nome");
Dim cognome
cognome=Request.Form("cognome");
Dim sesso
sesso=Request.Form("sesso");


function DisplayRegistraCv(sMyLogin)

Dim oCn, rSQL

'if sMyUserID <> ""
'then
Set oCn = DBConnexion(DB_MAIN)

rSQL = " INSERT INTO CURRICULUM_INV (UTENTE,NOME,COGNOME) VALUES ('" & SQLEncrypt(sPseudo) & "', nome,cognome) "

DBExecute oCn,rSQL

oCn.close
end function
%>

<!-- #include file='includes/includes-inc.asp' -->

<%
sTitlePage = "Registra un Curriculum"
' oppure utilizzate una vairabile che avrete aggiunto come
' spiegato nei capitoli precedenti:
' sTitlePage = GetTranslation("LANG_SC_CV")
%>
<!-- #include file='includes/toppage-inc.asp' -->
<!-- #include file='includes/registra_cv-inc.asp' -->
<%
' eventuale richiamo di funzioni contenute
' in: "registra_cv-inc.asp"
DisplayRegistraCv()
%>
<!-- #include file='includes/bottompage-inc.asp' -->

12 maggio 2006 alle 13:11:54

rSQL = " INSERT INTO CURRICULUM_INV (UTENTE,NOME,COGNOME) VALUES ('" & SQLEncrypt(sPseudo) & "', nome,cognome) "

rSQL = " INSERT INTO CURRICULUM_INV (UTENTE,NOME,COGNOME) VALUES ('" & SQLEncrypt(sPseudo) & "', '" & SQLEncrypt(nome) & "','" & SQLEncrypt(cognome) & "')"