"Subcategory undefined" i javascript, hvad kan fejlen være?
HejJeg har et problem med et javascript som kører på en ASP side! Jeg får fejlen "Subcategory is undefined" men hvis jeg tager en view source af det kørende ASP side og gemme denne source som et statisk HTML dokument kører den fint.
Her er det kode som fejlen omhandler:
<SCRIPT LANGUAGE="JavaScript">
<!-- Begin
catnumber = 3
offset = 150
performOnchange = false
if (document.all) {
docObj = "document.all."
styleObj = ".style"
} else {
docObj = "document."
styleObj = ""
}
function openselect(subcat) {
popupselect = eval(docObj + subcat + styleObj)
popupselect.visibility = "visible"
}
function closeselect(submenu,subcat){
popupselect = eval(docObj + subcat + styleObj)
if (submenu.selectedIndex != 0) {
popupselect.visibility = "hidden"
numchoice = submenu.selectedIndex
choice = submenu[numchoice].value
subcategory.value = choice
submenu.selectedIndex = 0
}
}
function lock() {
performOnchange = false
}
function unlock() {
performOnchange = true
}
function selectSub(cat) {
for (i=1; i <= catnumber; i++) {
subcat = "sub" + i
popupselect = eval(docObj + subcat + styleObj)
popupselect.visibility = "hidden"
}
if (performOnchange == true) {
letsopen = "sub" + cat.selectedIndex
if (letsopen == "sub0") {
alert("No category selected")
choice = "- subcategory -"
subcategory.value = choice
cat.focus()
} else {
openselect(letsopen)
lock()
}
}
}
// End -->
</script>
#### ASP koden ####
<tr>
<td width="100"><font size="1"><b>Kategori</b></font></td>
<td width="200"><div><select name="categoria" onmouseover="unlock()" style="width: 95%" onchange="selectSub(this)" <%
if Session("headerinfo")="edit" then
response.write("")
else
response.write("DISABLED")
end if
%>>
<option <%
if trim(rs("kategori"))="" then
response.write("SELECTED")
else
response.write("")
end if
%> value="">-- choose category --</option>
<%
While (not rsmainmenu.EOF)
%>
<option value="<%=trim(rsmainmenu("mainmenu"))%>" <%
if trim(rs("kategori"))=trim(rsmainmenu("recordid")) then
response.write("SELECTED")
else
response.write("")
end if
%>><%=trim(rsmainmenu("mainmenu"))%></option>
<%
rsmainmenu.movenext
wend
%>
</select></td>
</tr>
<tr>
<td width="100"><font size="1"><b> </b></font></td>
<td width="200"><%
While (not rsmenu.EOF)
%>
<span id="sub<%=trim(rsmenu("recordid"))%>">
<select name="sub<%=trim(rsmenu("mainmenu"))%>" style="width: 95%" onchange="closeselect(this,'sub<%=trim(rsmenu("recordid"))%>')">
<option selected value="">- subcategory -</option>
<option value="<%=rsmenu("link")%>"><%=rsmenu("link")%></option>
</select>
</span>
<%
rsmenu.movenext
wend
%>
</td>
</tr>
<tr>
<td width="100"><font size="1"><b>Link</b></font></td>
<td width="200"><input type="text" name="subcategory" readonly="readonly" value="- subcategory -"></div></td>
</tr>
Kan nogen fortælle mig hvad problemet er????
På forhånd mange tak
/Stig :-)
