aspÖÐ×Ö·û´®×ª»¯ÎªÊµÌåÀàµÄ·½·¨£¨ÈëÃÅÆª£¬´«Í³·½·¨£©
´ËÎÄÖ»ÊÇÈëÃÅ£¬ÑÝʾÁËÈçºÎÓÃʵÌåÀà´æ´¢Êý¾Ý£¬ÎÞʵ¼ÊÒâÒå¡£ºóÃæÓÐÂ½Ðø¸üÐÂÓÅ»¯¡££¨ÒÔºóµÄÎÄÕÂÖн«Â½ÐøÊµÏÖÎÞÐèÉùÃ÷¾ßÌåÀà×Ô¶¯´æ´¢Êý¾Ý£¬ºÍ¼òµ¥µÄÐÔÄÜÓÅ»¯£©
ÔÚasp³ÌÐò¿ª·¢¹ý³ÌÖУ¬½á¹¹Êý¾ÝµÄ´æ´¢Ò»Ö±ÊǸöÎÊÌ⣬aspµÄÊý×éÒ»Ö±ºÜÈõ£¬¶øÇÒ²»ÄÜ×Ô½âÊÍ£¬ÏÂÃæÌṩһÖÖÀàËÆjson¸ñʽµÄ½âÊÍ·½·¨£¬ÒÔ¹©´ó¼Ò²Î¿¼¡£
ÎÒÃǼÙÉèÎÒÃÇÏë´æ´¢Ò»ÕŶ©µ¥£¬ÊµÑó180Ôª£¬ÂëÑó200Ôª¡£ÉùÃ÷×Ö·û´®ÈçÏ£º
dim str1 : str1 = "order|||shiyang:180,mayang:200"
ΪÁË´æ´¢Êý¾ÝÎÒÃÇÐèÒªÉùÃ÷Ò»¸öʵÌåÀ࣬ÈçÏ£º
class order
public shiyang,mayang
end class
½¨Á¢Ò»¸ögetobjectº¯ÊýΪʵÌåÀำֵ£¬ÈçÏ£º
function getObject(byval str)
dim itemlist,execstr
execstr = ""
set getObject = new order
itemlist = split(split(str,"|||")(1),",")
for i = 0 to ubound(itemlist)
execstr = execstr +"getObject."&split(itemlist(i),":")(0)&" = """&split(itemlist(i),":")(1)&"""" &chr(10)&chr(13)
next
execute execstr
end function
дһ¸ö²âÊÔº¯Êý £¬Êä³ö½á¹û²¢²âÊÔЧÂÊ
sub ceshi1
dim i
for i = 0 to 10000
set o1 = getObject(str1)
response.write o1.shiyang&"<br/>"
next
end sub
dim t1
t1=timer()
call ceshi1
response.write FormatNumber((timer()-t1),4,-1)
²âÊÔ½á¹û£ºÉú³É10000¸ö¶©µ¥¶ÔÏó´ó¸ÅÐèÒª1ÃëÖÓ×óÓÒʱ¼ä¡£
±¾ÎÄÎÞʵ¼ÊÒâÒ壬ֻΪ¿ªÆª×öÒý
Ïà¹ØÎĵµ£º
ASP£¨Active Server Pages£©ÊÇMicrosoftºÜÔç¾ÍÍÆ³öµÄÒ»ÖÖWEBÓ¦ÓóÌÐò½â¾ö·½°¸£¬Ò²ÊǾø´ó¶àÊý´ÓÊÂÍøÕ¾¿ª·¢ÈËÔ±ºÜÊìϤµÄÒ»¸ö±È½Ï¼òµ¥µÄ±à³Ì»·¾³¡£Í¨¹ýASPÎÒÃÇ¿ÉÒÔ´´½¨¹¦ÄÜÇ¿´óµÄ¶¯Ì¬µÄWEBÓ¦ÓóÌÐò¡£ASPËäÈ»¹¦ÄܺÜÇ¿´ó£¬µ«ÓÐЩ¹¦ÄÜÓô¿ASP´úÂëÍê³É²»ÁË£¬ÎªÁËÄܱ£Ö¤¿ª·¢³ö¹¦Äܸü¼ÓÇ¿´óµÄWEBÓ¦ÓóÌÐò£¬ÎÒÃÇ¿ÉÒÔ½èÖúµ÷ÓÃCOM×é¼þ¡£ ......
±¾½â¾ö·½·¨Õª×ÔÍøÂçÎÄÕ£¬ÒѾÑéÖ¤¿ÉÐС£
ÐÂÉϵÄһ̨·þÎñÆ÷³öÏÖÁËÒ»¸öÏÖÏó£ºASP³ÌÐòÖУ¬µ÷Óú¯ÊýNow()£¬ÏÔʾµÄʱ¼ä×ÜÊÇÐÎÈç“2009-07-12 ÉÏÎç 08:12:56¡¡”ÕâÑùµÄ£¬×ÜÏÔʾ“ÉÏÎ町͓ÏÂÎ産¬µ¼ÖÂÊý¾Ý¿â²åÈë²Ù×÷Òì³££¬½â¾ö¹ý³Ì¼°×îÖÕ½â¾ö·½·¨ÈçÏ£º
ÕâôÏÔʾ£¬Ò»°ã¶¼Ê ......
µÚÒ»½Ú:×¢²áϵͳ
×¢²á¼¸ºõÊÇÿ¸öÍøÕ¾¶¼ÒªÊ¹Óõģ¬È¥ÂÛ̳Ҫע²á£¬ÁÄÌìҪע²á£¬¼¸ºõÎÞ´¦²»×¢²á£¬ËùÒÔ×¢²áÊÇËùÓÐASPÓ¦ÓóÌÐòÖÐ×î³£¼ûµÄ¡£
& ......
ºǫ́Êý¾Ý¿â£º
[Microsoft Access]
Óë
[Microsoft Sql Server]
¸ü»»Ö®ºó£¬ASP´úÂëӦעÒâÒªÐ޸ĵÄһЩµØ·½£º
[Ò»]Á¬½ÓÎÊÌ⣨¾ÙÀý)
[Microsoft Access]
constr = "DBQ=c:\data\clwz.mdb; DRIVER={Microsoft Access Driver (*.mdb)}"
[Microsoft Sql Server]
constr = "DRIVER={SQL Server};SERVER=host;DATA ......
ÔÚasp:UpdatePanel¿Ø¼þÖÐÖ±½ÓʹÓÃFileUpload£¬·þÎñ¶ËÊÇÎÞ·¨ÕÒµ½ÉÏ´«ÎļþµÄ¡£
Ö»ÒªÔÚ<Trigger>ÖÐÌí¼Óbutton¾Í¿ÉÒÔ½â¾öÕâ¸öÎÊÌâ
<asp:UpdatePanel ID="UpdatePanel2" runat="server" UpdateMode="Conditional">
<ContentTemplate>
......