Ò׽ؽØÍ¼Èí¼þ¡¢µ¥Îļþ¡¢Ãâ°²×°¡¢´¿ÂÌÉ«¡¢½ö160KB

ÍøÒ³³ÌÐò 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½øÖÆÔÚÊýÖµÇ


Ïà¹ØÎĵµ£º

ASPÓëActiveX¿Ø¼þ½»»¥ÊµÕ½

ActiveX¿Ø¼þÔËÐÐÔÚ¿Í»§¶Ë¡£ÎÒÃÇ¿ÉÒÔ»ñµÃ¿Í»§¶ËµÄһЩÐÅÏ¢£¬ÈçIC¿¨µÄÐÅÏ¢,¿Í»§¶ËµÄÑéÖ¤µÈµÈ¡£µ«ÊÇActiveX¿Ø¼þÒ²ÓÐÐí¶àȱµã£º¿Í»§¶ËµÄ²¿ÊðºÜÀ§ÄÑ£¬Èç¿Í»§¶Ë²»ÄÜÕýÈ·ÏÂÔØ£¬ÏÂÔØÁËÒÔºó²»ÄÜÕýÈ·Ö´ÐУ¬ÏÂÔØµÄʱºòÐèÒªÉèÖÃIEµÄ°²È«¼¶±ðµÈµÈ¡£
¸ü¶àµÄʱºò£¬ÎÒ¶¼ÔÚʹÓÃCOM×é¼þÀ´À©Õ¹ASPµÄ¹¦ÄÜ¡£×¼È·µØËµ£¬ÊÇ·þÎñ¶ËÔËÐеÄActivex Dll ......

ASPÉú³É¾²Ì¬HtmlÊ×Ò³Ô´´úÂë(³¬¾«¼ò)

<%
'µ÷ÊÔ£º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 ......

aspÑéÖ¤Â루¼Ó·¨ÔËË㣩

ÔÚÌá½»Ò³ÃæÖÐÑéÖ¤session("GetCode")
<%@CodePage="65001"%>
<%
Call Com_CreatValidCode("GetCode")
Sub Com_CreatValidCode(pSN)
    ' ½ûÖ¹»º´æ
    Response.Expires = -9999 
    Response.AddHeader "Pragma","no-cache"
  &nb ......

ÈçºÎÅäÖÃASPÔËÐл·¾³

1.Èç¹ûÄúµÄ²Ù×÷ϵͳΪWindows 98£¬ÇëÔËÐÐ Windows98µÄ°²×°¹âÅÌ¡£ÔÚÆäAdd-ons\pwsĿ¼ÏÂÕÒµ½pwsµÄ°²×°³ÌÐò£¬ÔËÐа²×°¼´¿É
2.Èç¹û²Ù×÷ϵͳΪ Windows 2000 ÒÔÉÏ£¬¿ÉÒÔ°´Í¼4.1.1µÄ·½·¨°²×° IIS£º
´ò¿ª¡¾¿ØÖÆÃæ°å¡¿£¬ÕÒµ½ ¡¾Ìí¼Ó/ɾ³ý³ÌÐò¡¿→¡¾Ìí¼Ó/ɾ³ýWINDOWS×é¼þ¡¿£¬
µ¯³ö ¡¾Windows ×é¼þÏòµ¼¡¿ £¬Ñ¡Ôñ ¡¾Internet ......
© 2009 ej38.com All Rights Reserved. ¹ØÓÚE½¡ÍøÁªÏµÎÒÃÇ | Õ¾µãµØÍ¼ | ¸ÓICP±¸09004571ºÅ