form e asp

[djeds]

ciao a tutti vorrei chiedervi una cosa molto semplice ... credo ..
cmq vorrei sapere come far passare dei valori ad una pagina in asp tramite form
allora il mio form si trova quì e dopo aver ricevuto la matricola di un'alunno tramite radio box

allora scrivo il form

<form id="form1" name="form1" method="get" action="index_3.asp">
  <label for="textfield">Inserisci la matricola  </label>
  <p align="center"><input type="text" name="textfield" id="matricola" />
</p>
  

Cosa vuoi conoscere <input name="radiobutton" type="radio" value="entrate" id="entrate" />
    <label for="radiobutton">Entrate</label>
    <input name="radiobutton" type="radio" value="uscite" id="uscite" />
    <label for="radio">Uscite</label>
  </p>
  


    <label for="Submit"></label>
    <input type="submit" name="Submit" value="Invia" id="Submit" />
  </p>
</form> 

ora se scrivo un dato nella matricola e clicco su entrate, avrò queste info sulla barra degli indirizzi
?textfield=8888&radiobutton=entrate&Submit=Invia

ora nella mia paginaASP che si trova in index_3.asp
come faccio a dare queste informazioni ad un comando sql , premettendo che di asp nn ne capisco quasi nulla, cmq ho configurato la mia il database quindi mi riesco a connettere, ma ho questo problema, quando faccio la query sql come faccio a passargli i dati

vi prego risondete

[michele.santoro]

Recuperi i dati in questo modo:

<%
Dim testo, scelta
testo=request.form ("textfield")
scelta=request.form ("radiobutton")

poi li invii al database.

Esempio di pagina "index_3.asp" che recupera e invia i dati:

<%
' Connessione database
Set conn = Server.CreateObject("ADODB.Connection")
dsnpath = "DRIVER={MICROSOFT ACCESS DRIVER (*.mdb)}; "
dsnpath = dsnpath & "DBQ=" & Server.MapPath("DATABASE.mdb")
conn.open dsnpath
%>
<%
Dim testo, scelta
testo=request.form ("textfield")
testo= replace(testo, "'", "''")
scelta=request.form ("radiobutton")
SQL = "INSERT INTO TUA_TABELLA(testo,scelta)"
SQL = SQL&"VALUES('"&testo&"','"&scelta&"')"
Response.Write SQL
Conn.Execute(SQL)
Response.Redirect "DOVE_TI_PARE.asp"
%>

Mi sembra ovvio che il database, che si chiama appunto "DATABASE", sia formato da una tabella "TUA_TABELLA" formata dai campi:
id di tipo contatore chiave primaria
testo di tipo testo
scelta di tipo testo
Sperando di aver ben interpretato quello che volevi

[djeds]

allora io devo visualizzare il nome cognome di una persona inserendo nel form il suo id o meglio matricola, visto che stiamo in ambito scolastico
Alloa procedo in questo modo
1) connessione

set MyConn = server.CreateObject("ADODB.CONNECTION")
MyConn.open "FILEDSN=C:\dsn\mor.dsn" 

la testo cn una select * from persona e funziona perchè mi da tutta la lista

2) mi faccio dare la variabile

matricola = Request.Form("matricola") 

3 faccio la query sql

SQL_query  = "SELECT * FROM PERSONA WHERE MATRICOLA ='" & matricola & "'"
Set RS = MyConn.Execute(SQL_query) 

ecco arrivati quà mi esce una pagina pianca che nn vuol acenna a mutare .. vi prego aiutatemi ci stò sbattendo la testolina da 6 notti ..

[michele.santoro]

Originariamente inviato da djeds
allora io devo visualizzare il nome cognome di una persona inserendo nel form il suo id o meglio matricola, visto che stiamo in ambito scolastico
Alloa procedo in questo modo
1) connessione

set MyConn = server.CreateObject("ADODB.CONNECTION")
MyConn.open "FILEDSN=C:\dsn\mor.dsn" 

la testo cn una select * from persona e funziona perchè mi da tutta la lista

2) mi faccio dare la variabile

matricola = Request.Form("matricola") 

3 faccio la query sql

SQL_query  = "SELECT * FROM PERSONA WHERE MATRICOLA ='" & matricola & "'"
Set RS = MyConn.Execute(SQL_query) 

ecco arrivati quà mi esce una pagina pianca che nn vuol acenna a mutare .. vi prego aiutatemi ci stò sbattendo la testolina da 6 notti ..

Se matricola è numerico non ci vanno gli apici:
SQL_query = "SELECT * FROM PERSONA WHERE MATRICOLA =" & matricola

[Mems]

Michele, lui nella FORM ha method="get" e tu gli proponi una request.FORM... o mette POST come method oppure usa request.QUERYSTRING... decidetevi.

[michele.santoro]

Acc...! Scusate. Mi sono dimenticato di dire che doveva modificare nel form il metodo get con post e non l'ho detto!

Chiedo umilmente scusa

[djeds]

salve scusate se nn vi ho risposto prima comunque l'errore persiste anche se ho messo la post, in quanto mi da errore nella stringa
Set RS = MyConn.Execute(SQL_query)

posto la form

<form id="form1" name="invio dati" method="POST" action="index_3.asp">
  <label for="textfield">Inserisci la matricola  </label>
  <p align="center">
    <input name="matricola" type="text" id="matricola" value="matricola" />
</p>
  


    <label for="Submit"></label>
    <input type="submit" name="Submit" value="Invia" id="Submit" />
  </p>
</form> 

e posto il contenuto centrale della pagina index_3.asp , la pag che mi dovrebbe dare il risultato ..

<%
matricola = Request.Form("matricola")
'pag=Request.QueryString("pag")
set MyConn = server.CreateObject("ADODB.CONNECTION")
MyConn.open "FILEDSN=C:\dsn\mor.dsn"

Dim matricola
matricola= replace(matricola, "'", "''")
SQL_query = "SELECT * FROM PERSONA WHERE MATRICOLA =" & matricola
Set RS = MyConn.Execute(SQL_query)

%> 

nel' ultima riga mi da errore ed il brouser mi dice
-> Tipi di dati non corrispondenti nell'espressione criterio.

cosa significa .. dove sbaglio è possibile che nn riesco a far uscire una riga dove c'è scritto il nome cognome e la matricola di un ragazzo .. facendo una semplice richiesta di matricola da un form.. vi prego aiutatemi .. stò in crisi

[michele.santoro]

<%
Dim matricola
matricola=Request.Form("matricola")
Dim SQL,rs
SQL="SELECT * FROM PERSONA WHERE matricola="&matricola                                                     
Set rs = Server.CreateObject("ADODB.Recordset")
Set rs=Conn.Execute(SQL)
%>
<%=rs("matricola")%>
%>

Matricola deve essere numerico altrimenti va cambiata la query nella parte Where

[djeds]

e come faccio a definire matricola come numerico .. nell mio database è numerico .. ma nel mio form è un txt .. cmq grazie delle risposte siete molto gentile

[michele.santoro]

Deve essere di tipo numerico intero lungo il campo matricola nel database
Questa è la pagina connessione.asp

<%
' Connessione database
Set conn = Server.CreateObject("ADODB.Connection")
dsnpath = "DRIVER={MICROSOFT ACCESS DRIVER (*.mdb)}; "
dsnpath = dsnpath & "DBQ=" & Server.MapPath("database.mdb")
conn.open dsnpath
%>