asp Http_Referer,Server_NameºÍHttp_Host
asp Http_Referer,Server_NameºÍHttp_Host
ÒÔÇ°¸Ð¾õRequest.ServerVariablesÀïµÄÖµºÜ¶à£¬ÏÖÔÚ¿´¿´»¹ÊÇÄÇô¶à£¬²»¹ý½ñÌì̸ÆäÖеÄÒ»¸öÖµ----HTTP_RefererÒÔ¼°Request.ServerVariablesÀïServer_NameÓëHttp_HostÖ®¼äÓÐʲôÇø±ðÄØ£¿
¸Õ²ÅÔËÐÐÁËÒ»¶Î´úÂ룬À´²é¿´Request.ServerVariablesÀïÃæÓжàÉÙÖµ£¬¿´ÁËһϣ¬¹²50¸ö£¡
´úÂë<%=Request.ServerVariables.count%>
ÒÔÇ°¸Ð¾õRequest.ServerVariablesÀïµÄÖµºÜ¶à£¬ÏÖÔÚ¿´¿´»¹ÊÇÄÇô¶à£¬²»¹ý½ñÌì̸ÆäÖеÄÒ»¸öÖµ----HTTP_Referer
Ê×ÏÈ£¬ÎÒÃÇÏÈÖªµÀHTTP_Referer×î³£ÓõÄÓ¦ÓþÍÊÇÄܹ»·ÀÖ¹ÍⲿÌá½»¡£
ÏÂÁÐÇé¿öÊÇ´Óä¯ÀÀÆ÷µÄµØÖ·À¸Õý³£È¡µÃRequest.ServerVariables("HTTP_REFERER")£º
1) Ö±½ÓÓÃ<a href="">
2) ÓÃSubmit»ò<input type="image">Ìá½»µÄ±íµ¥(POST»òGET)
3) ʹÓÃJAvaScriptÌá½»µÄ±íµ¥(POST»òGET)
ÏÂÃæÎÒÃÇÔÙ¿´¿´Request.ServerVariables("HTTP_REFERER")²»ÄÜÕý³£È¡ÖµµÄÇé¿ö£º
1) ´ÓÊղؼÐÁ´½Ó
2) µ¥»÷Ö÷Ò³»ò×Ô¶¨ÒåµÄµØÖ·
3) ÔÚä¯ÀÀÆ÷ÖÐÖ±½ÓÊäµØÖ·
4) ʹÓÃJavaScriptµÄLocation.href»òÕßÊÇLocation.replace()
5) <%Response.Redirect%>
6) <%Response.AddHeader%>»òÕßÊÇ<mete http-equiv="refresh">תÏò
7) ÓÃXML¼ÓÔصØÖ·
ÏÔÈ»£¬Request.ServerVariables("HTTP_REFERER")ÔÚ¶àÊýÇé¿öÏÂÊDz»ÄÜÕý³£¹¤×÷µÄ¡£¹ØÓÚËüµÄ¾ßÌåÓ÷¨ÎÒ»áÔÚÒÔºóµÄÎÄÕÂÖÐÏêϸµÄ½éÉÜ£¬Í¬Ê±»¹»á½éÉÜRequest.ServerVariables("HTTP_HOST")Request.ServerVariables("SERVER_NAME")Ö®¼äµÄÇø±ð¡£
¾´Çë¹Ø×¢£¡
Request.ServerVariablesÀïServer_NameÓëHttp_HostÖ®¼äÓÐʲôÇø±ðÄØ£¿
Èç¹û²»×Ðϸ¿´£¬ÄúÓ¦¸Ã¿´²»³öËüÃÇÖ®¼äµÄÇø±ð¡£ÔÚÍøÉÏËÑÁ˺ܶ࣬»¹ÊÇҲûÓп´¶®£¬²»¹ý×îºó»¹ÊÇÓÐÒ»¾ä»°ºÜÊÇÃ÷°×£ºHttp_Host¿ÉÒÔRequest³ö·Ç80µÄServer_Port£¬¼òµ¥µØ˵¾ÍÊÇ£¬Http_Host=Server_Name:Server_Port¡£
ÔÚÒÔÇ°·¢±í¹ý¹ØÓÚHttp_Referer×÷ÓõÄÎÄÕ£¬ÏÖÔÚ½áºÏËüÀ´Ð´Ò»¸öASP·ÀÖ¹ÍⲿÌá½»µÄº¯Êý
¸´ÖÆ´úÂë ´úÂëÈçÏÂ:
function ChkPost()
dim server_v1,server_v2
chkpost=false
server_v1=Cstr(Request.ServerVariables("HTTP_REFERER"))
server_v2=Cstr(Request.ServerVariables("SERVER_NAME"))
If Mid(server_v1,8,Len(server_v2))<>server_v2 then
chkpost=False
else
chkpost=True
end If
end function
Select Case
¼ÙÈçÄãÏ£ÍûÑ¡Ôñ¶àÌ×´úÂëÖ®Ò
Ïà¹ØÎĵµ£º
±¾ÎÄÁ´½Ó£ºhttp://www.oversteper.com/wprogram/asp/827.html
Ìõ¼þÓï¾äÖ® if ... then ... else Óï¾ä
ÓÃÀ´ÅжÏÌõ¼þÊÇ true »ò false £¬²¢¸ù¾ÝÅжϽá¹ûÀ´Ö´ÐÐÖ¸¶¨µÄÓï¾ä£¬Í¨³£Ìõ¼þÊÇÓñȽÏÔËËã·û¶ÔÖµ»ò±äÁ¿½øÐбȽÏÀ´±í´ï¡£
if ... then ... else ¿ÉÒÔ¸ù¾ÝÐèÒª½øÐÐǶÌ×ʹÓ㬿ÉÒÔд³É elseif ¡£
ʾÀý£º
ÒÔÏÂÎ ......
<%
'1¡¢´´½¨EXCEL¶ÔÏñ
set objExcelApp = CreateObject("Excel.Application")
objExcelApp.DisplayAlerts = false '²»ÏÔʾ¾¯¸æ
objExcelApp.Application.Visible = false '²»ÏÔʾ½çÃæ
'2¡¢ н¨ExcelÎļþ
objExcelApp.WorkBooks.add
set objExcelBook = ob ......
Ç°¶Îʱ¼ä¶ÁÁ˲»ÉÙ¹ØÓÚMVCµÄÎÄÕ£¬ÊÔ×ÅÔÚASPÖÐÓ¦ÓÃÁËһϣ¬·¢ÏÖ¶ÔÓÚС³ÌÐò£¬´úÂëÁ¿»á´ó·ù¶ÈÔö¼Ó£¬µ«ÊÇÂß¼ÇåÎú£¬Êý¾Ý·â×°ºÜºÏÀí£¬ÒÔÇ°ÐèÒª×Ðϸ¹æ»®µÄ´úÂ븴Óþ¹È»³ÉÁËÀíËùµ±È»µÄÊÂÇé¡£
ËùνMVC£¬¼´Model£¨Ä£ÐÍ£©£¬View£¨ÊÓͼ£©£¬Control£¨¿ØÖÆ£©Èý²ã¼Ü¹¹¡£¸÷²¿·Ö¸÷˾ÆäÖ°£¬Model¼´µ×²ã¹¹¼Ü£¬°üº¬ÓëÊý¾Ý¿âÁ¬½ÓµÄ²¿·Ö£¬View ......
·þÎñÆ÷¶Ë×é¼þ
Ê×ÏÈ,·þÎñÆ÷¶ËµÄ×é¼þÒªÓбðÓÚ¿Í»§¶ËµÄ×é¼þ.¿Í»§¶ËµÄ×é¼þÊÇͨ¹ýÍøÂç´«Êä,ÒÀ*HTMLÀ´Æð×÷ÓÃ.¶øÇÒÖ»ÄÜÔÚIEÉÏÓÐÓÃ.µ«ÊÇ·þ ÎñÆ÷¶ËµÄ×é¼þÊÇÔËÐÐÔÚ·þÎñÆ÷¶Ë,ËüÔÚ·þÎñÆ÷ÉÏÖ´Ðи÷ÖÖ²Ù×÷.Òò´Ë,ËùÓеÄä¯ÀÀÆ÷¶¼ÄÜÏíÓÃ,ËüÒÀ*µÄÊÇ·þÎñÆ÷¶ø²»ÊÇä¯ÀÀÆ÷.
µ±IIS±»ÇëÇóÖ´ÐÐÒ»¸öASP³ÌÐò,ËüÊ×ÏÈ»áÔÚASPÎļþÖÐÕÒµ½¡´%%>±êÇ©Ö®¼ä ......