ASP×î»ù±¾µÄ¼Ó½âÃܺ¯Êý
<%
function decrypt(dcode)
dim texts
dim i
for i=1 to len(dcode)
texts=texts & chr(asc(mid(dcode,i,2))-i)
next
decrypt=texts
end function
function encrypt(ecode)
dim texts
dim i
for i=1 to len(ecode)
texts=texts & chr(asc(mid(ecode,i,2))+i)
next
encrypt = texts
end function
dim str
str = "neok"
Response.Write("¼ÓÃÜǰ:" + str + "<br>")
Response.Write("¼ÓÃܺó:" + encrypt(str) + "<br>")
Response.Write("½âÃÜ:"+ decrypt(encrypt(str)))
%>
Ïà¹ØÎĵµ£º
asp Http_Referer,Server_NameºÍHttp_Host
ÒÔǰ¸Ð¾õRequest.ServerVariablesÀïµÄÖµºÜ¶à£¬ÏÖÔÚ¿´¿´»¹ÊÇÄÇô¶à£¬²»¹ý½ñÌì̸ÆäÖеÄÒ»¸öÖµ----HTTP_RefererÒÔ¼°Request.ServerVariablesÀïServer_NameÓëHttp_HostÖ®¼äÓÐÊ²Ã´Çø±ðÄØ£¿
¸Õ²ÅÔËÐÐÁËÒ»¶Î´úÂ룬À´²é¿´Request.ServerVariablesÀïÃæÓжàÉÙÖµ£¬¿´ÁËһϣ¬¹²50¸ö£¡
´úÂ ......
Èçid="a/b/c/asdf.html" ²ÎÊýΪ¶¯Ì¬
Ôõô°ÑºóÃæµÄasdf.html¹ýÂË?ʹid="a/b/c/"?
Èç¹ûidµÄ¸ñʽһ¶¨Îª "????/????/??????/xxxx.xxx"
¼´×îºóËùÒª¹ýÂ˵ôµÄÒ»¶¨ÊÇ×îºóÒ»¸ö"/"Ö®ºóµÄÄÚÈÝ
¿ÉÒÔÓÃÈçÏ·½·¨:
<%
URL="a/b/c/asdf.html"
PartOfURL=split(URL,"/") '½«×Ö·û´®ÒÔ"/"·Ö¸î
UnNeed=spli ......
Ò»¡¢ÓÃOWC
ʲôÊÇOWC£¿
¡¡¡¡OWCÊÇOffice Web CompentµÄËõд£¬¼´MicrosoftµÄOffice Web×é¼þ£¬ËüΪÔÚWebÖлæÖÆÍ¼ÐÎÌṩ
ÁËÁé»îµÄͬʱҲÊÇ×î»ù±¾µÄ»úÖÆ¡£ÔÚÒ»¸öintranet»·¾³ÖУ¬Èç¹û¿ÉÒÔ¼ÙÉè¿Í»§»úÉÏ´æÔÚÌØ¶¨µÄä¯ÀÀÆ÷ºÍÒ»
Щ¹¦ÄÜÇ¿´óµÄÈí¼þ£¨ÈçIE5ºÍOffice 2000£©£¬ÄÇô¾ÍÓÐÄÜÁ¦ÀûÓÃOffice Web×é¼þÌṩһ¸ö½»»¥Ê½Í¼Ðοª
......
1.ControllerÀàÒýÓõÄView»á×Ô¶¯µÄ¶ÔÓ¦µ½Views\XXXĿ¼ÖÐѰÕÒ¡£
ÆäÖÐViews\Shared´æ·Å¹²ÏíµÄÊÔͼģ°å¡£
ËÑË÷˳Ðò£º
Ê×ÏÈËÑË÷\Views\[Controller]£¬Èç¹ûÕÒ²»µ½£¬ÔÙ¿ªÊ¼²éÕÒViews\Shared×ÓĿ¼¡£
2.
½¨Ò飺ÊÓͼµÄÄ£°åÃû³ÆºÍActionÒýÓõķ½·¨Ãû³ÆÏàͬ¡£
ÕâÑùµÄ»°£¬¿ª·¢ÈËÔ±¾Í¿ÉÒÔÊ¡ÂÔView TemplateµÄÃû³Æ¡£
±ÈÈ磺retur ......
Dim xmlDoc
NewsConfigFile=server.MapPath("/test.xml")
Set xmlDoc=Server.CreateObject("msxml2.FreeThreadedDOMDocument.3.0")
If Not xmlDoc.load(NewsConfigFile) Then
'XmlDoc.loadxml "<?xml version=""1.0"" encoding=""gb2312""?><NewscodeInfo/>"
response.Write("²»´æÔÚÊý¾Ý")
& ......