Originariamente inviato da TeoB
if pass=xxxx
vai alla pagina tale
else scrivi messaggio di errore.
Alla fine ho voluto fare una prova con questo metodo, giusto per un semplice esercizio visto che sto imparando.
Ho un form che mi raccoglie diversi dati (password, nome, categoria, descrizione) e li invia ad una seconda pagina. Ho fatto diverse prove per farla funzionare e questa è l'ultima:
codice:
<%
Dim oUpload, password, nome, categoria, descrizione
Set oUpload = new cUpload
password = oupload.form("password")
if password ="prova" then
oUpload.SetPath "/public/galleries"
oUpload.AutoRename=False
oUpload.OverWrite=True
oUpload.Upload
oUpload.Save()
nome = oUpload.GetFileName()
categoria = oUpload.Form("categoria")
comments = oUpload.Form("descrizione")
descrizione = replace(comments,"'","''")
dbConn = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath("/mdb-database/xxx.mdb")
strsql = "INSERT INTO blablabla ( nome, categoria, descrizione ) Values ( '" & nome & "', '" & categoria & "', '" & descrizione & "');"
Set objConn = Server.CreateObject("ADODB.Connection")
objConn.Open dbConn
objConn.Execute strsql
Response.Write strsql
objConn.Close
set objConn = Nothing
else
response.write "Non sei autorizzato"
end if
Set oUpload=Nothing
%>
Sbaglio qualcosa? Se nel form della prima pagina metto la pass giusta (prova) mi va a leggere direttamente l'else. Inoltre se faccio un response.write "&password&" è come se la variabile fosse vuota