09. marts 2005 - 09:26
#1
her er koden
<%@ LANGUAGE=JScript %>
<html>
<head><title>test</title>
<script type="text/javascript" language="JavaScript1.2" src="stm31.js"></script>
</head>
<body>
<script language="javascript">
stm_bm(["menu212e",430,"","blank.gif",0,"","",0,0,250,0,1000,1,0,0,"","",0],this);
<%
var Dbq = Server.MapPath(".\\")+"\\db.mdb;";
var Dsn = "driver={Microsoft Access Driver (*.mdb)};pwd=;Dbq="+Dbq;
var Dc = Server.CreateObject("ADODB.Connection");
Dc.Open(Dsn);
var val=Dc.Execute("SELECT * FROM menu");
var pops={};
while(!val.EOF)
{
var t=""+val("TEXT"),u=""+val("URL"),i=""+val("ID");
if(typeof(pops[val("PAR")])=="undefined")pops[val("PAR")]=[[i,t,u,0]];
else pops[val("PAR")][pops[val("PAR")].length]=[i,t,u,0];
val.MoveNext();
}
for(var k in pops)
{
for(var i=0;i<pops[k].length;i++)
if(typeof(pops[pops[k][i][0]])!="undefined") pops[k][i][3]=1;
}
function createPop(a)
{
%>
if(!st_ms[st_cm].ps.length)
stm_bp("p0",[0,4,0,0,2,3,0,7,100,"",-2,"",-2,50,0,0,"#fffff7","#fffff7","",3,1,1,"#000000"]);
//*Level 1
else if(!st_ms[st_cm].ps[st_cp].is[st_ci].ppi)
stm_bp("p0",[1,4,0,0,2,3,0,7,100,"",-2,"",-2,50,0,0,"#fffff7","#fffff7","",3,1,1,"#000000"]);
//*Another
else
stm_bp("p0",[1,2,0,0,2,3,0,7,100,"",-2,"",-2,50,0,0,"#fffff7","#fffff7","",3,1,1,"#000000"]);<%
for(var i=0;i<a.length;i++)
{
%>
stm_ai("p0i0",[0,"<%=a[i][1]%>","","",-1,-1,0,"<%=a[i][2]%>","_self","","","","",0,0,0,"","",0,0,0,0,1,"#fffff7",0,"#b5bed6",0,"","",3,3,1,1,"#fffff7","#000000","#000000","#000000","8pt Verdana","8pt Verdana",0,0]);
<%
if(a[i][3])
{
%>
st_ms[st_cm].ps[st_cp].is[st_ci].iarr=['arrow_r.gif','arrow_r.gif'];
st_ms[st_cm].ps[st_cp].is[st_ci].iarw=7;
st_ms[st_cm].ps[st_cp].is[st_ci].iarh=7;
st_ms[st_cm].ps[st_cp].prmw=7;
<%
createPop(pops[a[i][0]]);
}
}
%>
stm_ep();
<%
}
createPop(pops["ROOT"]);
%>
stm_em();
</script>
</body>
</html>