AspÌí¼ÓÎÄ×Öˮӡ
Asp´úÂ룺
<%
set obj=server.CreateObject("wsImage.Resize")
obj.LoadSoucePic server.mappath("25.jpg")
obj.Quality=75
obj.TxtMarkFont = "»ªÎIJÊÔÆ"
obj.TxtMarkBond = false
obj.MarkRotate = 25
obj.TxtMarkHeight = 25
obj.AddTxtMark server.mappath("txtMark.jpg"), "º£À˹¤×÷ÊÒ", &H00FF00&, 10, 70
strError=obj.errorinfo
if strError<>"" then
response.write obj.errorinfo
end if
obj.free
set obj=nothing
%>
Ïà¹ØÎĵµ£º
ÉÏÏÂÎĶÔÏó
===================================
Ò»ÖÖ¶ÔÏó£¬Ëüµ±MTS·þÎñÆ÷×é¼þÔÚÒ»¸ö»î¶¯ÖÐÔËÐÐʱ¸ú×Ù¸Ã×é¼þµÄÊôÐÔ£¬°üÀ¨±»¸ú×Ù×é¼þµÄ¼¤»î״̬¡¢°²È«ÐÅÏ¢¡¢ÊÂÎñ´¦Àí״̬£¨Èç¹û´æÔÚ£©µÈ¡£ÕâÑù¾ÍÃâ³ýÁËÈÃ×é¼þÈ¥¸ú×ÙÆä×ÔÉí״̬¡£
ÉÏÏÂÎĶÔÏóÊÇweb·þÎñÆ÷ÉÏ»ùÓÚwebÓ¦ÓõÄÒ»¸ö±³¾°»·¾³¶ÔÏó£¬ÉÏÏÂÎĶÔÏóÌṩÁËÒ»¸öͬһwebÓ¦Óà ......
½ûÖ¹Õ¾ÍâÌá½»±íµ¥µÄasp´úÂëÈçÏ£º
<%
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
response.write "<br><br><center><table border=1 cellpadding=20 bo ......
Ö÷Ŀ¼,ÅäÖÃϱðÍüÁËÆôÓø¸Ä¿Â¼
ÎÊÌâÖ¢×´£º
ADODB.Connection ´íÎó '800a0ea9' δָ¶¨Ìṩ³ÌÐò£¬Ò²Ã»ÓÐÖ¸ÅɵÄĬÈÏÌṩ³ÌÐò¡£
ÎÊÌâ·ÖÎö£º
Windows 64λµÄϵͳÉÏ£¬ÔËÐÐÏÂÁÐ32bit(λ)Ó¦ÓóÌÐò£¬²»Äܹ»ÍêÈ«¼æÈÝ£¬ÐèÒª¶ÀÁ¢²Ù×÷½â¾ö¡£³ÌÐòÁбíÈçÏ£º
Internet·þÎñAPIÀ©Õ¹
ISAPI¹ýÂËÆ÷
ASPÓ¦ÓóÌÐò
ASP.NETÓ¦ÓóÌÐò
½ ......
<%
'==================================================
'º¯ÊýÃû£ºGetHttpPage
'×÷ Ó㺻ñÈ¡ÍøÒ³Ô´Âë
'²Î Êý£ºHttpUrl ------ÍøÒ³µØÖ·
'==================================================
Function GetHttpPage(HttpUrl)
If IsNull(HttpUrl)=True or Len(HttpUrl)<18 or HttpUrl="$False$" Then
GetHttp ......
ÕâÀàÎÊÌâͨ³£ÔÚÕûºÏ»ò¶þ´Î¿ª·¢ASPÍøÕ¾Ê±Óöµ½¡£°´³£ÀíÀ´Ëµ£¬ä¯ÀÀÆ÷µÄCookie´æ·ÅÔÚ¿Í»§¶Ë£¬Êµ¼ÊÉÏÓë·þÎñ¶ËʹÓÃʲôÓïÑÔÎ޹أ¬µ«ÎÒÃÇÔÚʵ¼Ê²Ù×÷¹ý³ÌÖУ¬×Ü»áÓöµ½Ò»Ð©ÒâÏë²»µ½µÄÎÊÌâ¡£
1. µ±ASPдµÄCookieµÄKeyÖдøÓÐÏ»®Ïߣ¬ÀýÈçÎÒÃÇÔÚASPÖÐÕâÑùÉèÖÃCookie:
......