"weiwei" <> wrote in message
news: oups.com...
Do you have a question or problem?
You didn't ask but:
1) Change
<SCRIPT LANGUAGE="JavaScript">
<!-- Begin
....
// End -->
</SCRIPT>
to
<script type="text/javascript">
....
</script>
and you only need one.
2) Remove the extar </HEAD> tag.
3) </select> tags are missing.
4) "onChange=" doesn't need "javascript
:"
5) The two tables have different coumn (<td>) widths.
6) name="form" is not recommended;
try naming your forms "form1" and "form2".
7) It might be easier to put the ASP logic at the beginning
to build variables then reference them in the HTML.
Here's an untested rework of your code. Watch for word-wrap.
<% Option Explicit %>
<!--#include file="includes/conn.inc"-->
<% Dim op1, op2, rs1, rs2
'*
Set rs1 = Server.CreateObject("ADODB.Recordset")
rs1.Open "SELECT RecID, LocationName FROM Location ORDER BY
LocationName", connStr, 3, 4
Do While NOT rs1.EOF
op1 = op1 & " <option value="redirect_loc.asp?ID="
op1 = op1 & rs1("RecID") & ">" & rs1.Fields("LocationName")
op1 = op1 & "</option>" & vbCrLf
rs1.MoveNext
Loop
rs1.Close
Set rs1 = Nothing
'*
Set rs2 = Server.CreateObject("ADODB.Recordset")
rs2.Open "SELECT RecID, Network FROM Location ORDER BY Network",
connStr, 3, 4
Do While NOT rs2.EOF
op2 = op2 & " <option value="redirect_network.asp?ID="
op2 = op2 & rs2("RecID") & ">" & rs2.Fields("Network")
op2 = op2 & "</option>" & vbCrLf
rs2.MoveNext
Loop
rs2.Close
Set rs2 = Nothing
%>
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN">
<html>
<head>
<title>Test Location</title>
<meta http-equiv="Content-Type" content="text/html;
charset=iso-8859-1">
<script type="text/javascript">
function formHandler(that) {
parent.mainframe.location.href = that.options[that.selectedIndex].value;
}
</script>
</head>
<body bgcolor="#ccccff">
<table border="0" cellspacing="0" cellpadding="0" width="100%">
<tr>
<td width="10%"> </td>
<td width="45%"><font size="3"><strong>Location</strong></font></td>
<td width="45%"><font size="3"><strong>Network
Subnet</strong></font></td>
</tr>
</table>
<br>
<table border="0" cellspacing="0" cellpadding="0" width="100%">
<tr>
<td width="10%"> </td>
<td align="center" width="45%">
<form name="form1">
<select name="location_name" onChange="formHandler(this)">
<%=op1%>
</select>
</form>
</td>
<td align="center" width="45%">
<form name="form2">
<select name="location_network" onChange="formHandler(this)">
<%=op2%>
</select>
</form>
</td>
</tr>
</table>
</body>
</html>
Similar Threads
