OrcaAssassina
12-01-2009, 17:04
Popolo una combo con i dati di una tebella
Set RsCitta = Server.CreateObject("ADODB.Recordset")
SqlCitta = "Select Citta from Case group by Citta"
RsCitta.Open SqlCitta, MyConn, 3,3
<% Do While Not RsCitta.EOF ' define the ListBox OPTIONs %>
<OPTION VALUE="<%= RsCitta("Citta") %>"> <%= RsCitta("Citta") %>
<% RsCitta.MoveNext %>
<% Loop %>
<% RsCitta.Close %>
Ora se vado a salvare il valore in un'altra tabella, mi scrive in questo caso il nome della città
Io invece vorrei che mi scrivesse l'ID a cui corrisponde quella città
Quindi quando premo INVIA, mi apre una nuova pagina dove mi esegui il codice:
dim strCitta
strCitta = request.form("T3")
T3 è la combo, in pratica assegno il valore della combo a questa variabile
sql = "SELECT * FROM Dati"
Set rs = Server.CreateObject("ADODB.Recordset")
rs.Open sql, conn ,3,3
rs.addnew
rs("Città") = strCitta
rs.update
Cosi facendo mi scrive la città e non l'ID, dove sbaglio???
Ciao e grazie
Set RsCitta = Server.CreateObject("ADODB.Recordset")
SqlCitta = "Select Citta from Case group by Citta"
RsCitta.Open SqlCitta, MyConn, 3,3
<% Do While Not RsCitta.EOF ' define the ListBox OPTIONs %>
<OPTION VALUE="<%= RsCitta("Citta") %>"> <%= RsCitta("Citta") %>
<% RsCitta.MoveNext %>
<% Loop %>
<% RsCitta.Close %>
Ora se vado a salvare il valore in un'altra tabella, mi scrive in questo caso il nome della città
Io invece vorrei che mi scrivesse l'ID a cui corrisponde quella città
Quindi quando premo INVIA, mi apre una nuova pagina dove mi esegui il codice:
dim strCitta
strCitta = request.form("T3")
T3 è la combo, in pratica assegno il valore della combo a questa variabile
sql = "SELECT * FROM Dati"
Set rs = Server.CreateObject("ADODB.Recordset")
rs.Open sql, conn ,3,3
rs.addnew
rs("Città") = strCitta
rs.update
Cosi facendo mi scrive la città e non l'ID, dove sbaglio???
Ciao e grazie