| 网站首页 | 文章中心 | 设计欣赏 | 下载中心 | 设计咨讯 | 平面设计 | 二维|三维 | 网页制作 | NIIT论坛 | 酷站! | 
    您现在的位置: 卓越设计网 >> 网页制作 >> ASP编程技术 >> 网页制作正文
ASP和Access结合编写目录树的程序实例           
ASP和Access结合编写目录树的程序实例
作者:网站建设 文章来源:网页制作 点击数: 更新时间:2007-8-3 8:18:48

MM_targL; top = MM_targT;}
else if (NS6) {style.left = MM_targL; style.top = MM_targT;}
else {style.pixelLeft = MM_targL;
 style.pixelTop = MM_targT;}
MM_SNAPPED = true; MM_LEFTRIGHT =
MM_startL-MM_targL; MM_UPDOWN = MM_startT-MM_targT; }
if (MM_everyTime || MM_SNAPPED) eval(MM_dropJS);
if(MM_dropBack) {if (NS4) zIndex = MM_oldZ;
 else style.zIndex = MM_oldZ;}
retVal = false; if(!NS) event.returnValue = false; }
document.MM_curDrag = null;
}
if (NS) document.routeEvent(objName);
} return retVal;
}
//-->
</script>
<link href='css/css.css' rel='stylesheet' type='text/css'>
</head>
<body bgcolor="#4A8CCE" leftmargin="0" topmargin="0"
marginwidth="0" marginheight="0">
<div id="addNodeDiv" style="position:absolute;
left:400; top:300; width:300; height:135;
z-index:1;display:none;" class="formDiv"
onMouseDown="MM_dragLayer('addNodeDiv','',
1,1,300,30,true,false,-1,-1,-1,-1,false,false,0,'',false,'')">
<form action="disp.asp" method="get" name="addNodeForm" id="addNodeForm">
<table width="300" border="0" cellspacing="0" cellpadding="3">
<tr style="cursor:hand">
<td>
<table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td><div id="infoValue" class="menuFont"></div></td>
<td><div align="right">
<input name="parentId" type="hidden" id="parentId">
<input name="disp" type="hidden" id="disp">
<img src="images/close2.gif" alt="点击关闭"
width="13" height="13" style="cursor:hand" onclick="jscript:addNodeDiv.style.display='none';"></div></td>
</tr>
</table>
</td>
</tr>
<tr>
<td>
<table width="100%" border="0" cellpadding="0" cellspacing="0">
<tr>
<td width="70" class="menuFont">
<div align="right">节点名称:</div></td>
<td width="120"><input name="listName"
type="text" class="text1" id="listName"></td>
<td class="menuFont">10个字符BR> </tr>
<tr>
<td width="70">
<div align="right" class="menuFont">节点说明:</div></td>
<td><textarea name="listInfo" cols="19" rows="3" class="text1" id="listInfo"></textarea></td>
<td class="menuFont">50个字符</td>
</tr>
<tr>
<td colspan="2"><table width="100%"
border="0" cellspacing="0" cellpadding="5">
<tr>
<td width="80">&nbsp;</td>
<td width="40"> <input name="SubmitBut"
 type="submit" class="DivBut" id="SubmitBut" value="提交" onclick="jscript:addNodeForm.submit();this.disabled='disabled'">
</td>
<td width="10">&nbsp;</td>
<td width="40"> <input name="cancelBut"
type="button" class="DivBut" id="cancelBut" onclick="jscript:addNodeDiv.style.display='none';" value="取消">
</td>
<td>&nbsp;</td>
</tr>
</table></td>
<td>&nbsp;</td>
</tr>
</table>
</td>
</tr>
</table>
</form>
</div>
<table width="100%" height="100%" border="0"
cellpadding="0" cellspacing="0">
<tr>
<td>
<!--此处为包含文件//-->
<div id="Layer1" class="treeDiv">
<!--#include file="inc.asp"-->
</div>
</td>
</tr>
</table>
</body>
</html>

下面是提交信息处理页的代码,保存为disp.asp

<!--#include file="initialize.asp"-->
<%
function checkstr(str)
str=replace(str,"'","''",1,-1,1)
checkstr=str
end function
dim disp,parentId,listName,listInfo
disp=request.QueryString("disp")
parentId=request.QueryString("parentId")
select case disp
case "add"
listName=che

上一页  [1] [2] [3] [4] [5] [6] 下一页


网页制作录入:as8130239    责任编辑:as8130239 
  • 上一篇网页制作:

  • 下一篇网页制作:
  • 【字体: 】【发表评论】【加入收藏】【告诉好友】【打印此文】【关闭窗口
    网站
    导航
        最新图片
       推荐信息
       最 新 热 门
        最 新 推 荐
        相 关 文 章
    没有相关网页制作