高分求解:为什么我的一个网页的javascript代码不起作用?

你是整个网页copy过去出不来还是抄了一段代码过去效果出不来？
前者最大可能是漏了.js之类的文件，后者最大可能是和原有代码冲突

解决方案 »

免费领取超大流量手机卡，每月29元包185G流量+100分钟通话, 中国电信官方发货

我是网页和js文件一起拷贝的.路径也没有错.大家帮忙看下代码.代码如下:
tree.js
NS4 = (document.layers) ? 1 : 0;
IE4 = (document.all) ? 1 : 0;
ver4 = (NS4 || IE4) ? 1 : 0;
if (ver4)
{
with (document)
{
write("<STYLE TYPE='text/css'>");
if (NS4)
{
write(".parent {position:absolute; visibility:visible}");
write(".child {position:absolute; visibility:visible}");
write(".regular {position:absolute; visibility:visible}")
}
else
{
write(".child {display:none}")
write(".regular {display:none}")
}
write("</STYLE>");
}
}function swapimage(img_url)
{
if (document.images)
{
imgs=new image();
imgs.src=img_url
}
}function initIt()
{
if (!ver4) return;
if (NS4)
{
for (i=0; i<document.layers.length; i++)
{
whichEl = document.layers[i];
if (whichEl.id.indexOf("Child") != -1||whichEl.id.indexOf("regular") != -1) whichEl.visibility = "hide";
}
arrange();
}
else
{
divColl = document.all.tags("DIV");
for (i=0; i<divColl.length; i++)
{
whichEl = divColl(i);
if (whichEl.className == "child"||whichEl.className == "regular")
whichEl.style.display = "none";
}
}
}
plus = new Array ();
plus[0] = new Image(); plus[0].src = "/images/plus.gif";minus = new Array ();
minus[0] = new Image(); minus[0].src = "/images/minus.gif";function expandIt(name,order,serial,num)
{
if (!ver4) return;
if (IE4)
{         whichEl = eval([name] + [order]);
if (whichEl.style.display == "none")
{
whichEl.style.display = "block";
}
else
{
whichEl.style.display = "none";
}
whichEl = eval([name] + [order]+ "_" +[serial]);
if (whichEl.src.indexOf("plus") >= 0) {

whichEl.src = minus[num].src
}
else {
whichEl.src = plus[num].src
}
}
else
{
whichEl = eval("document." + [name] + [order]);

if (whichEl.visibility == "hide")
{
whichEl.visibility = "show";
}
else
{
whichEl.visibility = "hide";
}

}
}
onload = initIt;
显示的网页代码:

<%
    Dim sSql
    Dim nGroupCnt,nProgramCnt
    Dim nI,nJ

    sSql = " SELECT GROUP_NAME FROM V_USER_PERMISSION_INFO "
    sSql = sSql & " WHERE USER_NO = '" & Session("userno") &"'"
    sSql = sSql & " GROUP BY GROUP_NAME "

    Set OraDynaset = WebOraDatabase.DbCreateDynaset(sSql,0)
    nGroupCnt = OraDynaset.RecordCount    ReDim aGroup(nGroupCnt)
    For nI = 1 to nGroupCnt
        aGroup(nI) = OraDynaset("GROUP_NAME")
        OraDynaset.DbMoveNext
    Next

    sSql = " SELECT GROUP_NAME,NAME,PATH FROM V_USER_PERMISSION_INFO "
    sSql = sSql & " WHERE USER_NO = '" & Session("userno") & "'"
    sSql = sSql & " ORDER BY NAME "

    Set  OraDynaset = WebOraDatabase.DbCreateDynaset(sSql,0)
    nProgramCnt = OraDynaset.RecordCount    ReDim aProgram (nProgramCnt),aPath(nProgramCnt),aGName(nProgramCnt)
    For nJ = 1 to nProgramCnt
           aProgram(nJ) = OraDynaset("NAME")
           aPath(nJ) = OraDynaset("PATH")
           aGName(nJ) = OraDynaset("GROUP_NAME")
           OraDynaset.DbMoveNext
    Next
%>
<html>
<head>
<title>程式菜單資訊</title>
<link rel="stylesheet" type="text/css" href="newrma/css/style.css">
<script language="Javascript" src="newrma/scripts/tree.js"></script>
<base target="main">
</head>
<body>
<br>
<table cellSpacing=0 cellPadding=0 width=188 align=center border=0>
        <tr>
                <td><font size="2"> </font></td>
                <td>
                        <% For nI = 1 to nGroupCnt %>
                        <div id='KB<%=nI%>Parent' class='parent'>
                                <font size="2">
                                        <img id='KB<%=nI%>Child_1' src='/images/plus.gif' border=0 align="absmiddle" onClick="expandIt('KB<%=nI%>','Child',1,0); return false;"><%=aGroup(nI)%>
                                </font>
                        </div>
                            <div id='KB<%=nI%>Child' class='child'>
                                <% For nJ = 1 to nProgramCnt %>
                                    <% If aGroup(nI)=aGName(nJ) Then%>
                                        <a href="<%=aPath(nJ)%>" target="main" >
                                             <font size="2">
                                                <img id='KB<%=nI%>regular_1' src='/images/program.gif' border=0 align="absmiddle"><%=aProgram(nJ)%>
                                             </font>
                                        </a><br>
                                    <% End If %>
                                <% Next %>
                           </div>
                        <% Next %>
                        <div id='KB0Parent' class='parent'>
                                <font size="2">
                                        <img id='KB0Child_1' src='/images/minus.gif' border=0 align="absmiddle" onClick="JavaScript:parent.location='../index.asp'">退出系統
                                </font>
                        </div>
                </td>
        </tr>
</table>
</body>
</html>