Ò»¸ö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)
Ïà¹ØÎÊ´ð£º
<%@language="vbscript"%>
<%option explicit%>
<html>
<head> <title>xxx </title> </head>
<script language=vbs>
'×¢Òâ±äÁ¿ ......
ÎÒÓÐÒ»¸öaspÔ´Â룬µ«ÊdzöÏÖÒ»¸öÎļþ£¬ÎÒÓÃasp½âÃܶ¼ÊÇÂÒÂë
Çë½Ì
VBScript code:
??
%# , #&')*)-0-(0%()(?
(((((((((((((((((((((((((( ......
ÎÒµÄ網頁´ú碼為ASP語ÑÔ,驗證·½Ê½為ϵ統×Ô帶µÄWINDOW驗證ģʽ.
現ÔÚÎÒÈç¹ûÒªÔÚASP´ú碼ÖÐ獲È¡當ǰµÄµÇÈëÈË ......
Çë¸÷λ¸ßÊÖ°ï½â¾ö,¼±!!!
<script language="JavaScript" type="text/javascript">
function CheckInput(){
if (document.frm.loginname.length =0){
alert('ÇëÕý ......
ÓÐÄÄλ¸ßÊÖÓùýASP FCKÔÚÏß±à¼Æ÷ѽ£¬ËüÄǸöͼƬÉÏ´«¹¦ÄÜÔõôÅäÖÃѽ
ÄܸøÎÒ·¢¸öÄÜÓÃFCKÔÚÏß±à¼Âð£¿Ò»¶¨ÄÜÉÏ´«Í¼Æ¬¹¦ÄܵÄѽ£¬¼±Ñ½
Ö±½Óµ½¹Ù·½ÍøÕ¾È¥Ï¸ö¾Í¿ÉÒÔÁË£¬¹ØÓÚÉèÖÃô£¬Ö±½ÓGOOGLEÒ»ÏÂÄãµÄ°æ±¾ºÅ¾Í¿ÉÒÔÕÒµ ......