ASPµÝ¹éÎÞ¼«Ï޲˵¥Ê÷
dataurl=Server.MapPath("menutree.mdb")'Êý¾Ý¿âµØÖ·
dim conn,strQuery,rs
set conn = server.CreateObject("adodb.connection")
conn.Open "PROVIDER=MICROSOFT.JET.OLEDB.4.0;DATA SOURCE="&dataurl
strQuery="select * from menufun"
set rs=server.createobject("adodb.recordset")
rs.open strQuery,conn,1,1
allnum=rs.RecordCount
'È¡µÃ×î´óµÄ²ãÊýMaxLevel
MaxLevel=1
for i=1 to allnum
if rs("PartLevel")>MaxLevel then
MaxLevel=rs("PartLevel")
else
MaxLevel=MaxLevel
end if
rs.movenext
next
rs.close
set rs=nothing
%>
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>ToumhÎÞ¼«Ï޲˵¥Ê÷</title>
<style type="text/css">
<!--
td {
font-size: 12px;
}
-->
</style>
<script language="javascript">
<!--
function divshow(cmy1,cmy2,cmy3)
//Õ¹¿ª/ºÏ²¢²Ëµ¥º¯Êý
{
if(document.all("div"+cmy1+cmy2+cmy3).style.display==""){
document.all("div"+cmy1+cmy2+cmy3).style.display="none"
}else{
document.all("div"+cmy1+cmy2+cmy3).style.display=""
}
}
//-->
</script>
</head>
<body bgcolor="#6699CC" topmargin="0">
<table border="0" cellpadding="0" cellspacing="0">
<tr onClick="javascript:divshow(1,0,1);" style="cursor:hand"><TD><img src="images/admin.gif">ToumhÎÞ¼«Ï޲˵¥Ê÷</TD></tr>
<%
dim toumh(10) '¶¨ÒåÓÃÓÚ´æ·Å²Ëµ¥Ç°ÏÔʾÊ÷ͼƬµÄÊý×飬Èç¹ûÓ¦ÓÃʱµÄ×î´ó¼¶Êý´óÓÚÊ®£¬ÇëÀ©´óÊý×éάÊý
call menutree(1,0,MaxLevel,1)'Ê״ε÷Óò˵¥Êä³öº¯Êý
'µÚÒ»¸ö²ÎÊý£º²Ëµ¥µÄ¼¶Êý
'µÚ¶þ¸ö²ÎÊý£º¸¸²Ëµ¥µÄID£¬Ò»¼¶²Ëµ¥Ä¬ÈÏΪÁã
'µÚÈý¸ö²ÎÊý£º²Ëµ¥µÄ×î´ó¼¶Êý
'µÚËĸö²ÎÊý£ºÓÃÓÚÇø·Ö²ãµÄÃû³Æ£¬·½±ãʵÏֲ˵¥µÄÕ¹¿ªºÏ²¢
%>
</table>
<%
'funno ²Ëµ¥µÄ¼¶Êý
'funcid ¸¸²Ëµ¥µÄID£¬Ò»¼¶²Ëµ¥¸¸¼¶IDֵΪ0
'MaxLevel ²Ëµ¥µÄ×î´ó¼¶Êý
'divno ÓÃÓÚÇø·Ö²ãµÄÃû³Æ£¬·½±ãʵÏֲ˵¥µÄÕ¹¿ªºÏ²¢
'menutree() ÊýÐβ˵¥Êä³öº¯Êý
function menutree(funno,funcid,MaxLevel,divno)
dim rsfun,numfun,funcidfun
strQuery1="select * from menufun where sup_funcid='"&funcid&
Ïà¹ØÎĵµ£º
<%
'
Set http=Server.CreateObject("Microsoft.XMLHTTP")
http.Open "GET","http://127.0.0.1/1.xml",False
http.send
Dim xml
Set xml = Server.CreateObject("Microsoft.XMLDOM")
xml.async = False
'xml.load (Server.MapPath("1.xml"))¡¡'Èç¹û²»ÊÇÔ¶³ÌÎļþÖ±½ÓÕâÒ»²½
xml.Load(http.ResponseXML)
Dim t ......
ÒÔmysql5.1ΪÀý
ÏÈÏÂÔØmysql-connector-odbc²¢°²×°
1¡¢Ö±½ÓÁ¬½Ó
conn.asp
<%
strconnection="driver={mysql odbc 5.1 driver};database=test1;server=localhost;uid=root;password=root"
set conn = server.createobject("adodb.connection")
conn.open strconnection
%>
2¡¢DSNÁ¬½Ó
ÐèÒªÏÈÔÚÊý¾ÝÔ´ (OD ......
±¾ÎĽ«Îª´ó¼Ò¼òµ¥±È½ÏASP.NET 3.5ÓëASP.NET 4.0Ö®¼äÖ÷Òª²î±ð£¬Ï£ÍûÄܶԴó¼ÒÁ˽âASP.NETÐÂÌØÐÔÓÐËù°ïÖú¡£
ASP.NET 3.5ÖÐÏÂÁÐÌØÐÔÊÇ֮ǰµÄ°æ±¾ÖÐûÓеģº
¡¡¡¡·Ajax¼¯³É
¡¡¡¡·LINQ
¡¡¡¡·×Ô¶¯ÊôÐÔ
¡¡¡¡·Lambda±í´ïʽ
¡¡¡¡Í¬Ñù£¬ÎÒÏ£Íûÿ¸öÈ˶¼ÅªÇå³þASP.NET 3.5ºÍËüµÄÏÂÒ»¸ö°æ±¾ASP.NET 4.0 ......
˵ÔÚÇ°ÃæµÄ»°£º
Òª·ÀÊý¾Ý¿âľÂí£¬Æäʵ×î¼òµ¥²»¹ý£¬±¾ÈËÈÏΪ£¬ÍøÉÏËùνµÄ×¢Èë·½·¨£¬¶¼ÊÇЩС¶ù¿Æ¡£Ö»ÒªÄã²»ÈÃÊý¾Ý¿âÔËÐУ¬Ëü×¢ÈëÁËASPľÂíÓкÎÓã¿£¡Ö»ÒªÄãÊä³öʱÓÐÑϸñµÄ¹ýÂË£¬Ëü×¢ÈëÁËJS´úÂëÓкÎÓã¿£¡
¾ßÌå·½·¨ÈçÏ£º
Ò»¡¢°ÑÊý¾Ý¿â¸ÄΪASP¸ñʽ£¬²¢¼ÓÈëÒ»¸ö±í£¬ÀïÃæ½¨¸ö×ֶΣ¬¼ÓÈëһЩIISϵͳ¼¶µÄ´íÎó´úÂë»òOleÊý¾Ý£¬¼´ ......
µ±´íÎóÐÅÏ¢³öÏÖÔÚÒ³ÉÏʱ£¬Ëü³ÉΪҳ²¼¾ÖµÄÒ»²¿·Ö¡£ÄúÐèÒªÉè¼ÆÒ³µÄ²¼¾ÖÒÔ·ÅÖÿÉÄܳöÏÖµÄÈκδíÎóÎı¾¡£
Èç¹ûÑéÖ¤ÔÚ·þÎñÆ÷ÉÏÖ´ÐУ¬Ôò³ý·Ç³öÏÖ´íÎ󣬷ñÔòÑéÖ¤¿Ø¼þ²»»á³ÊÏÖµ½Ò³£¬²¢Òò´Ë²»»áÕ¼ÓÃÈκοռ䡣Èç¹û³öÏÖ´íÎó£¬Ò³½«ÔÚÍù·µÆÚ¼äÖØÐ´´½¨£¬²¢½«´íÎóÎı¾Ìí¼Óµ½Ò³¡£
Èç¹ûÓû§¾ßÓÐÖ§³Ö¶¯Ì ......