I forum Ricerca FAQ
Fai una domanda
Ultimo messaggio
ladly
ladly
il 4 gennaio 2002 alle 15:12
6 messaggi dal 03 gennaio 2002
Ciao a tutti,
volevo chiedere un aiuto a qualcuno che vuole leggere il mio mess!
Devo fare una pagina dove appare una combo box che carica tutti le marche di macchine da un db (e lo fa!),
selezionandone una mi appare un'altra combo (e lo fa) che però mi carica tutti i modelli che ho nel db e non solo quelli che si riferiscono a quella marca... come faccio?!
in entrambe le tabelle ho il "TipoMarca" che dovrebbe metterle in relazione!
chi può aiutarmi? è urgente .... per favore!!!!



code che uso (so che è sporco e da sistemare!)
-----------------------------------------------
<%@ Language=VBScript %>
<%
option explicit
%>
<!-- #include FILE="..\..\..\DB_include\DB_Automobili.asp"-->


<head>

<script language="javascript">
function SelModelli(){
frm.action="copy.asp?Accesso=SelModelli"
frm.submit()
}
</script>

</head>

<BODY>
<%

dim Qry
dim DBRS
dim DBConn

dim Marca
dim Modello

Qry="SELECT * FROM marche;"

'[Create ADO objects]
set DBConn = CreateObject("ADODB.Connection")
set DBRS = createObject("ADODB.Recordset")

'[Open Database connection]
DBConn.ConnectionString ="Provider=" & ALTROPROVIDER & ";Database=" & AUTOMOBILIDB & ";" & ALTROCONNSTRING & ";"
DBConn.Open

'[Set and fill the recordset]
set DBRS.ActiveConnection = DBConn
DBRS.Open Qry

%>




<%
dim sql
dim rs

sql="select * from marche"
set rs= DbConn.execute (sql)

if not rs.eof then %>

<form method="post" name="form">
<select name="marche">
<option value="Marche">Seleziona la Marca</option>
<% do until rs.eof %>
<option value="<% =rs("TipoMarca")%>"><%=rs("marca")%>
</option>
<%
rs.movenext
loop %>
</select>
<input type="submit" value="vai">
</form>
<% end if
rs.close
set rs=nothing


'seconda parte
if request.servervariables("REQUEST_METHOD") = "POST" then

sql = "select * from modello where TipoMarca = '" & request.form("marche") & "'"

set rs = DbConn.execute(sql)

if not rs.eof then
%>


<%
dim sql2
dim rs2

sql2="select * from modello"
set rs2= DbConn.execute (sql2)

if not rs2.eof then %>

<select name="modello">
<option value="modello">Seleziona il modello</option>
<% do until rs.eof %>
<option value="<% =rs2("TipoMarca")%>">
<%=rs2("modello")%> - Motore: <%=rs2("CodMotore")%>

- Telaio:
<%=rs2("Telaio")%>
</option>
<%
rs2.movenext
loop %>
</select>

<% end if
rs2.close
set rs2=nothing


end if

rs.close
set rs = nothing

end if

set DBRS = nothing
DBConn.Close
set DBConn = nothing
%>



RispondiQuoting
ras78
ras78
il 4 gennaio 2002 alle 18:16
3.091 messaggi dal 05 marzo 2001
www.agency.com
Ho messo un javascript apposta su www.javascript.it, sezione script > forme > pulldown menu (2° pagina)

---[ www.digiscout.it ]---
"This message was written using 100% recycled electrons"
RispondiQuoting

Torna al forum | Feed RSS

ASPItalia.com non è responsabile per il contenuto dei messaggi presenti su questo servizio, non avendo nessun controllo sui messaggi postati nei propri forum, che rappresentano l'espressione del pensiero degli autori.