Registrazione utenti

[muscaril]

Se non è stato letto nella vecchia richiesta.
Vi chiedo un'altra informazione sul mio file di programmazione, volevo inserire un pulsante dove l'utente si possa registrare, ma inserendo il pulsante esso non funziona, ho gia creato una paggina dove l'utente si possa registrare ma quando premo il pulsante per colegarmi alla pagina mi da errore.
Questo è il file di collegamento:

<%
'Creo la variabile Action
'ha come valore il campo act del form
Dim Action
Action = request.form("act")

'Creo la variabile PrimaPagina
'e la setto sulla mia prima pagina asp protetta
Dim PrimaPagina
PrimaPagina = "default.asp"

'se Action è vuota stampo il form
if Action = "" then
%>

<form method="POST" action="login.asp">
<input type="hidden" name="act" value="enter">
<table border="0">
<tr><td>User</td><td><input type="text" name="u" size="20"></td></tr>
<tr><td>Pass</td><td><input type="password" name="p" size="20"></td></tr>
<tr><td colspan="2"><input type="submit" value="Login">
<label>
<input type="submit" name="Reg" id="Reg" value="Registrati" />
</label></td></tr>
</table>
</form>

<%
'se Action ha come valore "enter"...
elseif Action = "enter" then

'creo la variabile User
'con il valore del campo u del form
Dim User
User = request.form("u")

'creo la variabile Pass
'con il valore del campo p del form
Dim Pass
Pass = request.form("p")

'Se User e/o Pass è vuota stampo un errore
if (User = "" or Pass = "") then
response.write "Form incompleto!"
response.end

'in caso contrario procedo alla verifica
else

'Apro la connessione al DB
Dim Conn
Set Conn = Server.CreateObject("ADODB.Connection")
Conn.Open "driver={Microsoft Access Driver (*.mdb)};dbq="&_
Server.MapPath("utenti_sito.mdb")

'Imposto la query ed apro il recordset
Dim Query, Rs
Query = "select * from UTENTI where user = '" & User & "' "&_
"and pass = '" & Pass & "'"
Set Rs = Server.CreateObject("ADODB.Recordset")
Rs.Open Query, Conn, 3, 3

'se nessun utente corrisponde stampo un errore
if Rs.EOF then
response.write "Spiacente! Login non corretto"
response.end

'in caso contrario imposto la mia session
'ed effettuo il redirect sulla prima pagina
else
Session("User") = User
Session("Pass") = Pass
Response.Redirect PrimaPagina

end if

'chiudo Rcordset e connessione
Rs.Close
set Rs = Nothing
Conn.Close
Set Conn= Nothing

end if
end if
%>

Dove il pulsante "registrati" dovrebbe avere il link su un'altra paggina, ma non so come fare

Grazie del vs. aiuto

 

[Majinbu]

Ciao muscaril...perdonami ma questo form

<form method="POST" action="login.asp">
<input type="hidden" name="act" value="enter">
<table border="0">
<tr><td>User</td><td><input type="text" name="u" size="20"></td></tr>
<tr><td>Pass</td><td><input type="password" name="p" size="20"></td></tr>
<tr><td colspan="2"><input type="submit" value="Login">
<label>
<input type="submit" name="Reg" id="Reg" value="Registrati" />
</label></td></tr>
</table>
</form>

ti serve a fare il login....cambiare il botton da Accedi a registrati non cambia.
Ti serve un altro form tipo

  <form method="POST" action="qui il nome della pag.asp">

<table border="0">
<tr><td>User</td><td><input type="text" name="u" size="20"></td></tr>
<tr><td>Pass</td><td><input type="password" name="p" size="20"></td></tr>
<tr><td colspan="2">
<label>
<input type="submit"  value="Registrati" />
</label></td></tr>
</table>
</form>

e poi crei la pagina di registrazione dove leggi i valori del form e li inserisci in db....è un altro disc
Cmq inizia a provare.

 

[muscaril]

Questo forum dove lo devo inserire, sotto il forum di login (elimino la scritta rossa ed inserisco quest'altro forum) oppure dove.
Io la pag. di registrazione lo già creata e si chiama registrati.asp
Grazie della risposta comunque

 

[Majinbu]

Se già hai fatto la pagina di registrazione (intendo pagina dove hai un form che fà l'iserimento)
penso che per semplicità puoi aggiungere un semplice link

  <%
'Creo la variabile Action
'ha come valore il campo act del form
Dim Action
Action = request.form("act")

'Creo la variabile PrimaPagina
'e la setto sulla mia prima pagina asp protetta
Dim PrimaPagina
PrimaPagina = "default.asp"

'se Action è vuota stampo il form
if Action = "" then
%>

<form method="POST" action="login.asp">
<input type="hidden" name="act" value="enter">
<table border="0">
<tr><td>User</td><td><input type="text" name="u" size="20"></td></tr>
<tr><td>Pass</td><td><input type="password" name="p" size="20"></td></tr>
<tr><td colspan="2"><input type="submit" value="Login">
<label>
<a href="registrati.asp">Registrati subito</a>
</label></td></tr>
</table>
</form>

<%
'se Action ha come valore "enter"...
elseif Action = "enter" then

'creo la variabile User
'con il valore del campo u del form
Dim User
User = request.form("u")

'creo la variabile Pass
'con il valore del campo p del form
Dim Pass
Pass = request.form("p")

'Se User e/o Pass è vuota stampo un errore
if (User = "" or Pass = "") then
response.write "Form incompleto!"
response.end

'in caso contrario procedo alla verifica
else

'Apro la connessione al DB
Dim Conn
Set Conn = Server.CreateObject("ADODB.Connection")
Conn.Open "driver={Microsoft Access Driver (*.mdb)};dbq="&_
Server.MapPath("utenti_sito.mdb")

'Imposto la query ed apro il recordset
Dim Query, Rs
Query = "select * from UTENTI where user = '" & User & "' "&_
"and pass = '" & Pass & "'"
Set Rs = Server.CreateObject("ADODB.Recordset")
Rs.Open Query, Conn, 3, 3

'se nessun utente corrisponde stampo un errore
if Rs.EOF then
response.write "Spiacente! Login non corretto"
response.end

'in caso contrario imposto la mia session
'ed effettuo il redirect sulla prima pagina
else
Session("User") = User
Session("Pass") = Pass
Response.Redirect PrimaPagina

end if

'chiudo Rcordset e connessione
Rs.Close
set Rs = Nothing
Conn.Close
Set Conn= Nothing

end if
end if
%>

 

[alessandro1997]

Comunque si dice form, non forum. Il forum è un'altra cosa

 

[muscaril]

Grazie del link, ma con questo si vede il carattere,
<a href="registrati.asp">Registrati subito</a>
io se è possibile, volevo un pulsante come login
come posso fare

 

[Majinbu]

Asp...itina ma giusto un pochino di voglia...non poui mettercela.
è solo html...se vuoi il bottone te lo disegni...anche semplicemente con paint e poi
<input name="button" type="image" id="button" value="invia" src="indirizzo_dellimmagine"/>

o puoi usare anche java
<input type="submit" name="button" id="button" value="Registrati" onclick="location.href='registrati.asp'" />

ciao...

 

[alessandro1997]

Attenzione, quello non è Java, è Javascript! Non è uguale!

 

[muscaril]

Grazie della tua risposta, ma in realtà io lo avevo già fatto questa riga di comando, ma il problema e che non funziona, non accetta l'apertura del collegamento (registrati.asp) ma apre sempre la paggina login.asp.
Come posso risolvere questo problema.

 

[Majinbu]

Alessandro prob nn afferro l'ironia. è OVVIO che intendevo javascript.
Questo è l'unico forum su cui da pochissimo mi permetto di postare qualche consiglio...quando posso.
Evito volutamente :incazz2: su html.it,aspcode e compagnia bella proprio perchè sopporto molto poco la pignoleria fuori luogo :incazz2:...sopratutto su concetti estramamente semplici e basilari, posso capire che nn lo sono per chiuque, ma "forse" meno che per te(cosa che chiaramente nn è affar mio).

Muscaril ti ripeto che devi metterci un pochino più di volantà e cmq già ti ho postato una possibile soluzione precedentemente.
Io nn ho capito bene che asp pretendi o che intendi fare...
In quanto a "JAVASCRIPT" ricontrolla!

 

[alessandro1997]

Majinbu, datti una calmata, stavo semplicemente ricordando che Java è nato per alcuni scopi, Javascript per altri. Non saresti il primo a confondere i due linguaggi, volevo solamente dare una mano e non mi lascio certamente condizionare dal fatto che tu "rosichi". Quindi mi spiace se non ti sta bene

Ma guarda che gente, dai dei consigli senza chiedere nulla in cambio e hanno anche qualcosa da ridire, mah... per tua informazione ho corretto parecchie persone su questo forum e nessuno se l'è mai presa per questo, ti comunico ufficialmente che sei il primo, contento? Se avessi detto qualcos'altro del tipo "che scemo sei" avrei anche potuto capire perché non posso pretendere da ognuno una conoscenza eguale, ma non c'era ironia nel mio post e non ce ne sarà mai. Sei libero di andartene, ma ti prego di non venire a disturbarmi perché a te non va di essere ripreso in pubblico perché "sembri stupido". È ridicolo.

 

[Majinbu]

:hammer::hammer::hammer:Era proprio a questi tipi di post che mi riferivo...pignoleria fuori luogo.
Mi sembra di essere stato chiaro nel precisare l'ovviezza del (testo) "java" e un bottone associato all'evento onclick che per comodità abbreviava "javascript" :hammer::hammer::hammer:
Se vuoi essere d'aiuto perdi un pò di tempo e spiega a Musc, partendo dalla "A", come crearsi un bel bottone (manari con rollover) e fischio finale che punta a una pagina...cosa che con asp non centra niente...come tuo post.
Stiamoci bene.

 

[alessandro1997]

Spiegami una cosa: ma come diavolo ti permetti di venirmi a dire come mi devo rendere utile? Non puoi e non devi, perché non ne hai il diritto, punto. Non sai convivere in una comunità, non accetti le critiche altrui, non sei fatto per vivere in un forum dove ci si confronta e si scambiano idee. È la gente come te che mi fa venire il nervoso.

Non credere che per tutti sia così ovvio che Java e Javascript sono due cose diverse, te lo ripeto. Poi, non vorrei insinuare nulla, ma credo che non fosse ovvio neanche per te fin quando non te l'ho detto, comunque...

In ogni caso non discuto più con te, tanto è come parlare ad un muro. Ho detto un mucchio di cose che tu neanche hai capito. Mi appellerò direttamente ad un moderatore, così metterà fine a questa faccenda. Sono senza parole, sul serio...

 

[Eliox]

ragazzi facciamo così:

1. meglio non scrivere Java al posto di Javascript per non ingenerare confusioni, se proprio si vuole usare una forma abbreviata usiamo JS.
2. nessuno manda via nessuno e nessuno dice a nessuno che non è adatto a stare in un forum, a questo ci pensano i moderatori.