Inserimento valore da form in variabile!

**Xylorth** · 17-06-2006, 02:44

Non capisco come fare un form e successivamente come mettere il valore ottenuto nella variabile il mio codice è questo!

codice:

<%@ Language=VBScript %>
<%
Option Explicit
Response.ExpiresAbsolute=Now()
%>
<input name="anno" type="text" value="1990" size="40" maxlength="200">
<HTML>
<HEAD>
<META HTTP-EQUIV="Content-Type" CONTENT="text/html; charset=iso-8859-1">
<TITLE>classifica</TITLE>
</HEAD>
<BODY background="http://xylorth.altervista.org/SitoWeb/Immagini/Sfondi/sfondo00322.GIF">
<p align="center">
<%
Dim anno
anno = request.form("anno")
Dim conn
Dim rs
Dim sSql
Dim i

'anno=1990
 

'Imposto la connessione
Set conn = Server.CreateObject("ADODB.Connection")
conn.Open "DRIVER={Microsoft Access Driver (*.mdb)};DBQ=" & Server.MapPath("database.mdb")

 'Imposto la stringa SQL di selezione dati
sSql= "SELECT auto.Nome FROM auto WHERE auto.anno = "&anno&";"

   
 'Creo e apro il Set di Record
Set rs = Server.CreateObject("ADODB.Recordset")
rs.Open sSql, conn, 3, 3
%>
<u><font size="5" face="Tahoma">DataBase Alfa Romeo </font></u>
<CENTER>
<TABLE BORDER="1" CELLSPACING="2" CELLPADDING="2" ALIGN="CENTER">
<TR>
<TD>Nome Auto</TD>
<TD>Tipo</TD>
<TD>Descrizione</TD>
<TD>Anno di Produzione</TD>
<TD>Potenza</TD>
<TD>Cilindrata</TD>
<TD>Alimentazione</TD>
</TR>
<%
'Controllo se non c'e' nessun dato (EOF=End Of File)
If rs.EOF=True Then
%>
<TR>
<TD>Nessun record trovato</TD>
</TR>
<%
Else
Do Until rs.EOF
%>
<TR> 
<% For i=0 to rs.Fields.Count -1 %>
	<TD>  <% =rs.Fields(i).Value %> </TD>
<% Next %>
</TR>
<%
rs.MoveNext 
Loop
End If

'Chiudo il recordset e libero la memoria
rs.Close
Set rs = Nothing
'Chiudo la connessione al database e libero la memoria
conn.Close 
Set conn = Nothing
%>
 </TABLE>
</CENTER>
</BODY>
</HTML>

**Xylorth** · 17-06-2006, 12:43

up

**santino83_11_04** · 19-06-2006, 00:21

che sarebbe il valore ottenuto? in che variabile? che devi fare?

**salvodibella** · 19-06-2006, 14:26

la form si crea utilizzando l'HTML es:

codice:

<FORM Action="file.asp" Method="get" name="Form">
	<Table>
		<tr>
			<td>Cognome</td>
			<td><Input Name="cognome" Size="30" value=""></td>
		</tr>
		<tr>
			<td>Nome</td>
			<td><Input Name="nome" Size="30" value="" ></td>
		</tr>
			<td colspan="2">
				<input type="submit" Name="Bottone" Value="Registrazione">
				<input type="reset" Value="Azzera campi">
			</td>
		</tr>
	</Table>
</FORM>

la pagina asp che riceve i dati del modulo deve contenere il codice seguente:

codice:

<%
Cognome = request.Form("cognome")
Nome = request.Form("nome")
%>

in questo modo abbiamo recuperato i valori del modulo e associati alle variabili Cognome e Nome.
spero ti sia d'aiuto.

Discussione: Inserimento valore da form in variabile!

Strumenti discussione

Ricerca discussione

Visualizza

Inserimento valore da form in variabile!

Permessi di invio