Ò»¸öASPÅжÏ×Ö·û´®µÄÎÊÌâ
×Ö¶ÎPowerListÀïÃæµÄÖµ£ºKSO10000,KSO10021,KSO10004,KSO10022,KSO10020,KSO10008
ÏÖÔÚÒªÅжϣ¬µ±PowerListÀïÃæ´æÔÚKSO10004Õâ¸öÖµµÄʱºò£¬Êä³ö£ººÃ
VBScript code:
<%
set rs=server.CreateObject("adodb.recordset")
sql="select PowerList from ±í where PowerList ='KSO10004'"
rs.open sql,conn,1,1
if not rs.eof then
response.Write("ºÃ")
end if
%>
ÕâÑù£¿£¿
VBScript code:
if inStr("KSO10000,KSO10021,KSO10004,KSO10022,KSO10020,KSO10008","KSO10004" ) then Response.write "ºÃ"
VBScript code:
PowerList=KSO10000,KSO10021,KSO10004,KSO10022,KSO10020,KSO10008
PowerList=","&PowerList&","
checkStr=KSO10000 '´ø¼ì²éµÄÖµ
checkStr=","&checkStr&","
if (instr(PowerList,"checkStr")>0) then
response.write("ºÃ")
end if
ÎÒÕâ¸öд·¨Ò²ÊʺÏÅжÏÊý×Ö
VBScript code:
Function chkStrInStrs(vStr,vStrs)
Ïà¹ØÎÊ´ð£º
<%if request.QueryString("start") <>"" then%>
<%if cint(start)>0 then%>
<a href="search.asp?q= <%=q%>&start= <%if request.Query ......
ÎÒµÄ網頁´ú碼為ASP語ÑÔ,驗證·½Ê½為ϵ統×Ô帶µÄWINDOW驗證ģʽ.
現ÔÚÎÒÈç¹ûÒªÔÚASP´ú碼ÖÐ獲È¡當Ç°µÄµÇÈëÈË ......
<%
Sql="select top 8 * from NewsData where d_classid in (select classid from NewsClass where ParentID=16)"
Rs.Open Sql, conn, 1,1
Do Until Rs.Eof
......
Ò»¶Îʱ¼äºó ¾Í²»ÄÜÓõÄÄÇÖÖ
¿ÉÒÔÓÃ×é¼þдÂð?
×é¼þ ÊDz»ÊDZØÐëÏÈÔÚ·þÎñÆ÷°²×° ²ÅÄÜʹÓÃ?
ÄÇÓÃÐéÄâÖ÷»úµÄ ²»¾ÍûϷÁË....
ewebeditor¾ÍÊÇҪע²á²ÅÄÜÓõÄ
òËÆÊÇûɶÓõ ......
ÏÖÔÚÕâÉç»á»ù±¾Éϲ»ÐèÒªASP³ÌÐòÔ±ÁË,Ò»ÃæÊÔ,¶¼Òª.NET»òÕßPHP,JSPµÄ,°¥,,,,ASPÕâô²»ÖµÇ®Âð,ѧϰASPÊǸö´íÎóÂð
ûɶ´íÎó Ò»¾ä»°£º¼¼¶à²»Ñ¹Éí
¿¿ASP¶¼»ì²»µ½·¹³ÔÁË ÔÎ ÔÎ
ÎÒµÄÒâ˼ÊǶàѧһÃż¼Êõûɶ´íÎó ......