Hello Experts.
Could you find a solution for this problem please!
I have the following tables in Access Database
Table Name: origin
Fields Names: country, countrycode
Table Name: make
Fields Names: countrycode, make
Table Name: toyota
Fields Name: model
Table Name: nissan
Fields Name: model
Table Name: mazda
Fields Name: model
I want to design a form in ASP where users can choose the specification of his car from a series of pull down menus.
There are 4 Pull down menus/Combo boxes as follows:
Combo box 1: Origin [populates data from table origin]
Combo box 2: Make [populates data from table make]
Initially disabled. Once an element is selected in combo box 1, combo box 2 is enabled and is populated with data corresponding to that item from table make.
Combo box 3: Model [populate data from a table chosen from the list specified in combo box 2]
Initially disabled. Once an element is selected in combo box 2, combo box 3 is enabled and is populated with data corresponding to that item. For example, if a user select Toyota in combo box 2, then combo box 3 is automatically populated with data from table Toyota that is, Corolla, Vitz, Allion, Corona etc..
Combo box 4: Capacity [populate data from a table chosen from the list specified in combo box 3]
Initially disabled. Once an element is selected in combo box 3, combo box 4 is enabled and is populated with data corresponding to that item.
I have given it a try
Here are my codes
Sir, I am stuck. I do not know how to proceed. I really need your help!
Could you find a solution for this problem please!
I have the following tables in Access Database
Table Name: origin
Fields Names: country, countrycode
Table Name: make
Fields Names: countrycode, make
Table Name: toyota
Fields Name: model
Table Name: nissan
Fields Name: model
Table Name: mazda
Fields Name: model
I want to design a form in ASP where users can choose the specification of his car from a series of pull down menus.
There are 4 Pull down menus/Combo boxes as follows:
Combo box 1: Origin [populates data from table origin]
Combo box 2: Make [populates data from table make]
Initially disabled. Once an element is selected in combo box 1, combo box 2 is enabled and is populated with data corresponding to that item from table make.
Combo box 3: Model [populate data from a table chosen from the list specified in combo box 2]
Initially disabled. Once an element is selected in combo box 2, combo box 3 is enabled and is populated with data corresponding to that item. For example, if a user select Toyota in combo box 2, then combo box 3 is automatically populated with data from table Toyota that is, Corolla, Vitz, Allion, Corona etc..
Combo box 4: Capacity [populate data from a table chosen from the list specified in combo box 3]
Initially disabled. Once an element is selected in combo box 3, combo box 4 is enabled and is populated with data corresponding to that item.
I have given it a try
Here are my codes
Code:
<%@ Language = VBscript %>
<% Option Explicit %>
<% Response.Buffer = True %>
<html>
<head>
<title>Search Your Car</title>
<SCRIPT language=JavaScript>
function reload(form){
var strval=form.make.options[form.make.options.selectedIndex].value;
self.location='car.asp?make=' +str val ;
}
</script>
<SCRIPT language=JavaScript>
function reload(form1){
var strval1=form1.make.options[form1.make.options.selectedIndex].value;
self.location='car.asp?make=' + strval1 ;
}
</script>
</head><body>
<%
Dim objconn,objRS,strSQL,make
make=Request.QueryString("make")
Set objconn = Server.CreateObject("ADODB.Connection")
objconn.ConnectionString = "DRIVER=Microsoft Access Driver (*.mdb);DBQ=" & Server.MapPath("yeshti.mdb")
objconn.Open
Set objRs = Server.CreateObject("ADODB.Recordset")
‘The First drop down Menu/Combo Box'
strSQL = "SELECT * from origin"
objRS.Open strSQL, objconn
Response.Write "<form method=post name=f1 action=''><select name=country onchange='reload(this.form)'><option value=''>Select origin</option>"
Do While Not objRS.EOF
Response.Write "<option value=" & objRs("country") & ">" & objRs("country") & "</option>"
objRS.MoveNext
Loop
objRs.Close
Response.Write "</select>"
Response.Write "<br>----<br>"
‘ Second drop down menu
If len(country) > 1 Then
strSQL = "SELECT * FROM make where countrycode='" & countrycode &"'"
objRS.Open strSQL, objconn
Response.Write "<select name=make onchange='reload(this.form1)'><option value=''>Select origin</option>"
Do While Not objRS.EOF
Response.Write objRs("make") & "<br>"
objRS.MoveNext
Loop
Response.Write "</Select>"
objRs.Close
objconn.Close
end if
%>
</body>
</html>
Comment