fill option list with array

Alabaster · Nov 18, 2001

I need to fill an option list with an array and the only thing I've been able to find is to use javascript, except I can not get js to use my array made in vbs.
can someone please help or point me in a direction that will work. The following is my code so far.

Thanks in advance
Peter X-)

<title>Test page</title>
<script language="javascript">
function clearList(list)
{
var i = 0;
var o = list.options;

for (i = o.length; i >= 0; --i)
o = null;
list.disabled = true;
}

function addElement(list, text_in, value_in)
{
var o = list.options;
var nIdx;
if (o.length < 0) //IE for Mac 4.5 sets length to -1 if list is empty
nIdx = 0;
else
nIdx = o.length;

o[nIdx] = new Option(text_in, value_in);
}

</script>
</head>

<body>
<form name="storysubmit">
<table border="0" cellpadding="0" cellspacing="0" width="100%">
<tr>
<td width="31%"><select size="1" name="neNetType" onChange="GetTopics(this);">
<option></option>
<option value="Agnet">Agnet</option>
<option value="FSNet">FSNet</option>
<option value="AnimalNet">AnimalNet</option>
<option value="BioEdNet">BioEdNet</option>
</select></td>
<td width="69%"></td>
</tr>
<SCRIPT LANGUAGE="JavaScript">
function GetTopics(SelectNet){
<% 'open the data connection %>

<% dim arrTopics
'SQL query to the database...
SQL = "SELECT Topic FROM Topics" %>

<% if not rs.eof then
arrTopics = rs.getrows()
arrTopicsCount = Ubound(arrTopics)
Else
arrTopicsCount = -1
End IF
%>

clearList(document.storysubmit.neTopic);
addElement(document.storysubmit.neTopic, arrTopics, arrTopics);
}
</script>

<tr>
<td width="31%"><select size="1" name="neTopic">
<option value="-1">Choose Net Type</option>
</select></td>
<td width="69%"></td>
</tr>
<tr>
<td width="31%"></td>
<td width="69%"><input type="submit" value="Submit" name="B1"><input type="reset" value="Reset" name="B2"></td>
</tr>
</table>
</form>

</body>

</html>

Extentec · Nov 19, 2001

Pardon me for switching to VBScript on the server side but why don't you loop through the list and build the HTML when you get the RS instead of getting the Array and then pushing it through JS? I am not sure of the equivalent loop in JS...

example:

<% dim arrTopics
'SQL query to the database...
SQL = "SELECT Topic FROM Topics" %>



<% if not rs.eof then
arrTopics = rs.getrows()
arrTopicsCount = Ubound(arrTopics)
Else
arrTopicsCount = -1
End IF

strOut = ""

For i=0 to arrTopicsCount

strOut = strOut & "<option value='"& arrTopics(0,i) _
& "'>"& arrTopics(1,i) & "</option>"

Next

Response.Write strOut

%>

http://www.onti.net

Alabaster · Nov 20, 2001

I don't think that will work in a client-side script. I need this second list to populate "on change" of the first list.

but thanks for the idea.

Peter

Alabaster · Nov 20, 2001

Opps, It seems I may have hacked out a line when I was pasting the code, The end result should be a for(net in Topics) so that the for only executes on items in my array that match the net. (the net is in the value of each item in the topics)

I'm sorry if I've confused every one. The objective of this script is to filter the second list based on the first list value, but the data for the second list must come from the SQL.

Peter s-)

Extentec · Nov 20, 2001

Sorry, misunderstood what you were trying to do

If the second list must come from the SQL and if there is no way to preload all the possible combinations then you must do a round trip to the server to retrieve the data based on the "on Change" Selection (from option 1). In this case I would do it all with server side script and refresh the page (onChange=document.form['myForm'].submit()) with the new values.

A more sophisticated (sp?) method would be to return all the option-2 lists for each of the option-1 selections so all the necessary info exists on the client in an XML DOM. Using the Microsoft DOM XML object use XSLT and the MS XML DOM to dynamically transform the data on the client on the fly. Though I think this will only work in IE not in Netscape.

To work with arrays in JS as you are trying to do might work but what you have written won't work because when the GetTopics() function is called the server side script (in the <% %>) does not exist on the client (and can't by definition). You have to pass the server side value (in the <%%> to the client side script (in the <SCRIPT></SCRIPT>).

To return values from the server in the JS function try this:

<SCRIPT LANGUAGE="JavaScript">
function GetTopics(SelectNet){
<% 'open the data connection %>

<% dim arrTopics
'SQL query to the database...
SQL = "SELECT Topic FROM Topics" %>

<% if not rs.eof then
arrTopics = rs.getrows()
arrTopicsCount = Ubound(arrTopics)
Else
arrTopicsCount = -1
End IF
%>

var arrTopics = <%=arrTopics%>;

clearList(document.storysubmit.neTopic);
addElement(document.storysubmit.neTopic, arrTopics, arrTopics);
}
</script>

http://www.onti.net

Tek-Tips is the largest IT community on the Internet today!

Members share and learn making Tek-Tips Forums the best source of peer-reviewed technical information on the Internet!

fill option list with array

Alabaster

Programmer

Extentec

Programmer

Alabaster

Programmer

Alabaster

Programmer

Extentec

Programmer

Similar threads

Part and Inventory Search

Sponsor