ÍøÒ³³ÌÐò aspÔÚÏßÃûƬÉú³Éϵͳ
´ó¼ÒÓ¦¸ÃÈ¥¹ýÔÚÏßÉú³ÉͼƬµÄÍøÕ¾¡£±ÈÈç˵Éú³É¸ãЦ֤ÊéʲôµÄ¡£»¹¿ÉÒÔ°Ñ×Ô¼ºÍ·ÏñŪµ½ÈËÃñ±ÒÉÏÈ¥¡£
¡¡¡¡ÏÂÃæÎÒÕâ¸öÀý×ÓÊÇÎÒÖÆ×÷µÄ˿·ǩÃûϵͳ¡£Çë´ó¼Ò¾ÙÒ»·´Èý¡£¡£ÓÉÓÚʱ¼äµÄ¹ØÏµ¡£ÎÒÖ»¿ª·¢ÁËÁ½ÖÖ¡£¶¼ÊÇ˿·ӢÐ۵ġ£
¡¡¡¡Æ½Ì¨£ºASP+ASPJPEG
¡¡¡¡Ñùʽһ£º£¨ÔçÆÚ°æ±¾£¬×öµÄ±È½Ï²î£©
¡¡¡¡
Ñùʽ¶þ£º
¡¡¡¡¾¹ý³ä·Ö¿¼ÂÇ£¬ÎÒ»¹ÊÇÑ¡ÔñÁËÒÔ"GET"µÄ·½Ê½´«µÝ²ÎÊý£¬ÒÔ"URL"µÄ·½Ê½½ÓÊÕ²ÎÊý¡£ÒÔºóºóÃæÐ´¡£ºóÃæ»¹»áдÓÃ"POST"´«µÝ²ÎÊýµÄ·½·¨¡£
ÏÂÃæÇë¿´Ñùʽ¶þµÄÔ´´úÂ루×ÅÀ¶É«²¿·Ö£¬»¹Óв¿·Ö¹¦ÄÜûÓпª·¢µÄ£©£º
<%
name=Request("name") '»ñÈ¡URLÖеÄname²ÎÊý,ÒÔϼ¸¸öͬÀí
m=Request("m")
q=Request("q")
x=Request("x")
y=Request("y")
t1=Request("t1")
t2=Request("t2")
t3=Request("t3")
photo=Request("photo")
%>
<%
IF T1="" then 'µ±TI²ÎÊýΪ¿Õʱ,¸øÓë³õʼֵ,ÒÔÏÂͬÀí
t1="·çÔÆåÐÒ£ÃË³ÏÆ¸¸ßÊÖ"
end if
%>
<%
IF T3="" then
t3="¡¾·çÔÆåÐÒ£ÃËÇ©·¢¡¿"
end if
%>
<%
IF x="" then
x="388"
end if
%>
<%
IF y="" then
y="-291"
end if
%>
<%
IF photo="" then
photo="12.jpg"
end if
%>
<%
IF name="" then
name="XѪιX"
end if
%>
<%
IF m="" then
m="·çÔÆåÐÒ£ÃË"
end if
%>
<%
IF q="" then
q="ÉϺ£22Çø"
end if
%>
<%
Response.ContentType = "image/GIF" '¶¨ÒåÊä³öÀàÐÍ,Õâ¸ö·Ç³£ÖØÒª.ËüµÄ×÷ÓúóÃæÎÒ½âÊÍ
Set Jpeg = Server.CreateObject("Persits.Jpeg") 'µ÷ÓÃASPJPEG×é¼þ
Jpeg.Open Server.MapPath("x.png") '´ò¿ªÍ¼Æ¬,x.pngÊÇͼƬ·¾¶,ÕâÀï×÷Ϊ±³¾°µÄͼƬ
Set Jpeg1 = Server.CreateObject("Persits.Jpeg") 'µ÷ÓÃASPJPEG×é¼þ
Jpeg1.Open Server.MapPath(photo) 'ˮӡͼƬ,ÕâÀï×÷Í·ÏñµÄÄǸöͼƬ.photoÊÇ·¾¶
Jpeg1.Width=110
Jpeg1.Height=140 '¶¨ÒåÍ·ÏñµÄ´óС
aa=Jpeg.Binary '°Ñ±³¾°Í¼Æ¬ÒÔ2½øÖƸ³Öµ¸øAA
Jpeg.Canvas.Font.Color = &HEE05BF '×ÖÌåÑÕÉ«£¬Çë×¢Ò⣬ÑÕÉ«ÊÇ16½øÖƵÄΪÁ˱íʾ16½øÖÆÔÚÊýÖµÇ
Ïà¹ØÎĵµ£º
ActiveX¿Ø¼þÔËÐÐÔÚ¿Í»§¶Ë¡£ÎÒÃÇ¿ÉÒÔ»ñµÃ¿Í»§¶ËµÄһЩÐÅÏ¢£¬ÈçIC¿¨µÄÐÅÏ¢,¿Í»§¶ËµÄÑéÖ¤µÈµÈ¡£µ«ÊÇActiveX¿Ø¼þÒ²ÓÐÐí¶àȱµã£º¿Í»§¶ËµÄ²¿ÊðºÜÀ§ÄÑ£¬Èç¿Í»§¶Ë²»ÄÜÕýÈ·ÏÂÔØ£¬ÏÂÔØÁËÒÔºó²»ÄÜÕýÈ·Ö´ÐУ¬ÏÂÔØµÄʱºòÐèÒªÉèÖÃIEµÄ°²È«¼¶±ðµÈµÈ¡£
¸ü¶àµÄʱºò£¬ÎÒ¶¼ÔÚʹÓÃCOM×é¼þÀ´À©Õ¹ASPµÄ¹¦ÄÜ¡£×¼È·µØËµ£¬ÊÇ·þÎñ¶ËÔËÐеÄActivex Dll ......
<%
'µ÷ÊÔ£ºJAVAÖÐÎÄÍø:www.javaweb.cc/
'×¢Ò⣬°´ÕÕËù·ÅÖõÄĿ¼²»Í¬ÇëÐÞ¸ÄobjXmlHttpºÍÉú³ÉÊ×ҳ·¾¶
dim objXmlHttp,binFileData,objAdoStream
set objXmlHttp = Server.CreateObject("Microsoft.XMLHTTP")
objXmlHttp.open "GET","http://"&request.ServerVariables("HTTP_HOST")&"/index.asp",false ......
ÔÚÌá½»Ò³ÃæÖÐÑéÖ¤session("GetCode")
<%@CodePage="65001"%>
<%
Call Com_CreatValidCode("GetCode")
Sub Com_CreatValidCode(pSN)
' ½ûÖ¹»º´æ
Response.Expires = -9999
Response.AddHeader "Pragma","no-cache"
&nb ......
1.Èç¹ûÄúµÄ²Ù×÷ϵͳΪWindows 98£¬ÇëÔËÐÐ Windows98µÄ°²×°¹âÅÌ¡£ÔÚÆäAdd-ons\pwsĿ¼ÏÂÕÒµ½pwsµÄ°²×°³ÌÐò£¬ÔËÐа²×°¼´¿É
2.Èç¹û²Ù×÷ϵͳΪ Windows 2000 ÒÔÉÏ£¬¿ÉÒÔ°´Í¼4.1.1µÄ·½·¨°²×° IIS£º
´ò¿ª¡¾¿ØÖÆÃæ°å¡¿£¬ÕÒµ½ ¡¾Ìí¼Ó/ɾ³ý³ÌÐò¡¿→¡¾Ìí¼Ó/ɾ³ýWINDOWS×é¼þ¡¿£¬
µ¯³ö ¡¾Windows ×é¼þÏòµ¼¡¿ £¬Ñ¡Ôñ ¡¾Internet ......