ÔÚaspÑéÖ¤ÂëÖÐhead.fixºÍbody.fix
fixÊÇbmpµÄÒ»ÖÖÑÜÉú¸ñʽ£¬¿ÉÓÃÓÚaspÉú³ÉÑéÖ¤ÂëͼÐΡ£
Ò»¸öÀý×Ó£º
1 ͼÏó»æÖÆÍê³Éºó£¬½«Îļþ´æÎª24λλͼ¸ñʽµÄBMPͼÏóÎļþ¡£
2 È¥³ýǰ54ByteÄÚÈÝ.
3 ¸ÄÃûΪBODY+Êý×Ö.FIX
4 ÐÞ¸ÄCHECKCODE.ASP,µ÷ÓÃÄãÐÂ×öµÄÕâ¸öÎļþ.
£¨checkcode.asp ¸ºÔðÉú³ÉºÍÊä³öÑéÖ¤Âë 1309 byte£¬head.fix ÊÇ54byteµÄBMPÍ·£¬body.fix Êý×Ö0~9 10X100ÊúÅŵÄRGBÕóÁÐÊý¾Ý3200 byte £©
¾ÍÊÇÉú³É²ÊÉ«ÑéÖ¤ÂëµÄÎļþ
1¡¢checkcode.ASP ¸ºÔðÉú³ÉºÍÊä³öÑéÖ¤Âë 1309 byte¡£
2¡¢head.fix ÊÇ54byteµÄBMPÍ·
3 ¡¢body.fix Êý×Ö0~9 10X100ÊúÅŵÄRGBÕóÁÐÊý¾Ý3200 byte
Ïà¹ØÎĵµ£º
¡¡ 'º¯ÊýÃû£ºGetMyTimeNumber()
'×÷ ÓãºÉú³Éʱ¼äµÄÕûÊý
'²Î Êý£ºlx ---- ʱ¼äÕûÊýµÄÀàÐÍ
' lx=0 µ½·ÖÖÓ lx=1 µ½Ð¡Ê± lx=2 µ½Ìì lx=3 µ½ÔÂ
'·µ»ØÖµ£ºÉú³Éʱ¼äµÄÕûÊýÖµ(×îСµ½·ÖÖÓ)
'ʾ Àý£º
'********************************* ......
¡¡¡¡1.1 ʲôÊÇASP.net
¡¡¡¡ASP.net ÊÇÒ»ÖÖ½¨Á¢ÔÚͨÓÃÓïÑÔÉϵijÌÐò¹¹¼Ü£¬Äܱ»ÓÃÓÚһ̨Web·þÎñÆ÷À´½¨Á¢Ç¿´óµÄWebÓ¦ÓóÌÐò¡£ASP.netÌṩÐí¶à±ÈÏÖÔÚµÄWeb¿ª·¢Ä£Ê½Ç¿´óµÄµÄÓÅÊÆ¡£
¡¡¡¡Ö´ÐÐЧÂʵĴó·ùÌá¸ß
¡¡¡¡ASP.netÊǰѻùÓÚͨÓÃÓïÑԵijÌÐòÔÚ·þÎñÆ÷ÉÏÔËÐС£²»ÏñÒÔǰµÄASP¼´Ê±½âÊͳÌÐò£¬¶øÊǽ«³ÌÐòÔÚ·þÎñÆ÷¶ËÊ×´ÎÔËÐÐʱ½øÐ ......
¡¡1.¼Ç¼¼¯¹Ø±Õ֮ǰÔٴδò¿ª:
¡¡¡¡------------------------------------
¡¡¡¡sql="select * from test"
¡¡¡¡rs.open sql,conn,1,1
¡¡¡¡if not rs.eof then
¡¡¡¡dim myName
¡¡¡¡myName=rs("name")
¡¡¡¡end if
¡¡¡¡sql="select * from myBook"
¡¡¡¡rs.open sql,conn,1,1
¡¡¡¡------------------------------------ ......
<%@ Language="VBScript" %>
<%' Option Explicit %>
<%
'²»Ê¹ÓÃÊä³ö»º³åÇø£¬Ö±½Ó½«ÔËÐнá¹ûÏÔʾÔÚ¿Í»§¶Ë
Response.Buffer = False
'ÉùÃ÷´ý¼ì²âÊý×é
Dim ObjTotest(26,4)
ObjTotest(0,0) = "MSWC.AdRotator"
ObjTotest(1,0) = "MSWC.BrowserType"
ObjTotest(2,0) = ......
<%
set rs=server.CreateObject("adodb.recordset")
ids=""
call lids(keys)
ids=keys&ids
sql="select id,title,pic_xiao,content from "&tables&" where lid in("&ids&") "
......