Ñ§Ï°Íø¿¼ÊÔѧϰ×ÊÁÏ

Gzu521.com

ÔÚASPÓ¦ÓóÌÐòÖÐÏÞÖÆÖØ¸´Ìύͬһ±íµ¥

ASP½Ì³Ì   µã»÷£º´Î   ·¢²¼Ê±¼ä£º2005-9-28   ¡¾×ÖÌ壺´ó ÖРС¡¿   À´Ô´£ºGzu521.com
Gzu521.comÎÒµÄÑ§Ï°Íø

¡¡¡¡ÔÚinternetÉÏÎÒÃÇÿÌì¶¼»áÓöµ½Êý²»ÇåµÄ±íµ¥£¬Ò²¿´µ½ÆäÖд󲿷ֲ¢Ã»ÓÐÏÞÖÆÓû§¶à´ÎÌύͬһ¸ö±íµ¥¡£È±·¦ÕâÖÖÏÞÖÆÓÐʱºò»á²úÉúijЩԤÁϲ»µ½µÄ½á¹û£¬ÈçÖØ¸´¶©ÔÄÓʼþ·þÎñ»òÖØ¸´Í¶Æ±µÈ¡£»òÐíһЩasp³õѧÕß²¢²»Çå³þÔÚaspÓ¦ÓÃÖÐÈçºÎÏÞÖÆÖØ¸´Ìύͬһ±íµ¥£¬ËùÒÔÔÚÕâÀïÏò´ó¼Ò½éÉÜÔÚaspÓ¦ÓÃÖзÀÖ¹Óû§ÔÚµ±Ç°»á»°ÆÚ¼ä¶à´ÎÌύͬһ±íµ¥µÄÒ»¸ö¼òµ¥·½·¨¡£

¡¡¡¡Õâ¸ö¹¤×÷Ö÷ÒªÓÉËĸö×Ó³ÌÐò×é³É£¬ÔÚ½ÏΪ¼òµ¥µÄÓ¦Óó¡ºÏ£¬ÄãÖ»Òª½«ÕâЩ´úÂë·ÅÔÚ°üº¬ÎļþÖÐÖ±½ÓÒýÓü´¿É£»¶ÔÓÚÄÇЩ½ÏΪ¸´ÔӵĻ·¾³£¬ÎÒÃÇÔÚÎÄÕµÄ×îºó¸ø³öһЩ¸Ä½ø½¨Òé¡£ @5/*tIzq$r€B@ [ ±¾ ×Ê ÁÏ À´ Ô´ ÓÚ ¹ó ÖÝ Ñ§ ϰ Íø ÍøÂç±à³ÌASP½Ì³Ì http://Www.gzU521.com ] @5/*tIzq$r€B@

¡¡¡¡Ò»¡¢»ù±¾¹¤×÷¹ý³Ì

¡¡¡¡ÏÂÃæÎÒÃÇÒÀ´ÎÌÖÂÛÕâËĸö×Ó³ÌÐò¡£ ¡¡

¡¡£¨Ò»£©³õʼ»¯

¡¡¡¡ÕâÀïÎÒÃÇÒªÔÚsession¶ÔÏóÖб£´æÁ½¸ö±äÁ¿£¬ÆäÖУº

¡¡¡¡ ¢Å ÿһ¸ö±íµ¥¶ÔÓ¦Ò»¸ö³ÆÎªfidµÄΨһ±êʶ£¬ÎªÊ¹¸ÃֵΨһҪÓõ½Ò»¸ö¼ÆÊýÆ÷¡£

¡¡¡¡ ¢Æ ÿµ±Ò»¸ö±íµ¥³É¹¦Ìá½»£¬±ØÐëÔÚÒ»¸ödictionary¶ÔÏóÖд洢ËüµÄfid¡£

¡¡¡¡ÎÒÃÇÓÃÒ»¸öרÓõĹý³ÌÀ´³õʼ»¯ÉÏÊöÊý¾Ý¡£ËäÈ»ÒÔºó¸÷¸ö×Ó³ÌÐò¶¼Òªµ÷ÓÃËü£¬µ«Êµ¼ÊÉÏÿһ¸ö»á»°ÆÚ¼äËüÖ»Ö´ÐÐÒ»´Î£º

sub initializefid()
¡¡if not isobject(session("fidlist")) then
¡¡¡¡set session("fidlist")=server.createobject("scripting.dictionary")
¡¡¡¡session("fid")=0
¡¡end if
end sub

¡¡¡¡£¨¶þ£©Éú³É±íµ¥µÄΨһ±êʶ·û

¡¡¡¡ÏÂÃæÕâ¸öº¯Êýgeneratefid()ÓÃÓÚÉú³É±íµ¥µÄΨһ±êÖ¾¡£¸Ãº¯ÊýÊ×ÏȽ«fidÖµ¼Ó1£¬È»ºó·µ»ØËü£º

function generatefid()
¡¡initializefid
¡¡session("fid") = session("fid") + 1
¡¡generatefid = session("fid")
end function

¡¡¡¡£¨Èý£©µÇ¼ÇÒÑÌá½»±íµ¥

¡¡¡¡µ±±íµ¥³É¹¦µØÌύʱ£¬ÔÚdictionary¶ÔÏóÖеǼÇËüµÄΨһ±êʶ£º

sub registerfid()
¡¡dim strfid
¡¡initializefid
¡¡strfid = request("fid")
¡¡session("fidlist").add strfid, now()
end sub

¡¡¡¡£¨ËÄ£©¼ì²é±íµ¥ÊÇ·ñÖØ¸´Ìá½»

¡¡¡¡ÔÚÕýʽ´¦ÀíÓû§Ìá½»µÄ±íµ¥Ö®Ç°£¬Ó¦¸ÃÔÚdictionary¶ÔÏóÖмì²éËüµÄfidÊÇ·ñÒѾ­µÇ¼Ç¡£ÏÂÃæµÄcheckfid()º¯ÊýÓÃÀ´Íê³ÉÕâ¸ö¹¤×÷£¬ÈçÒѾ­µÇ¼Ç£¬Ëü·µ»Øfalse£¬·ñÔò·µ»Øtrue:

function checkfid()
¡¡dim strfid
¡¡initializefid
¡¡strfid = request("fid")
¡¡checkfid = not session("fidlist").exists(strfid)
end function

¡¡¡¡¶þ¡¢ÈçºÎʹÓÃ

¡¡¡¡ÓÐÁ½¸öµØ·½ÒªÓõ½ÉÏÊöº¯Êý£¬¼´±íµ¥Éú³ÉʱÓë½á¹û´¦Àíʱ¡£¼ÙÉèÉÏÊöËĸö×Ó³ÌÐòÒѾ­·ÅÈë°üº¬Îļþforms.incÖУ¬ÏÂÃæµÄ´úÂë¸ù¾ÝfidÖµÀ´¾ö¶¨Éú³É±íµ¥»¹ÊÇ´¦Àí±íµ¥½á¹û£¬ËüËùÃèÊöµÄ´¦Àí¹ý³ÌÊʺÏÓÚ´ó¶àÊýaspÓ¦ÓãºL3oN ^OL|l5MbZcK[ ´ËÎÄתÌùÓÚÎÒµÄÑ§Ï°ÍøÍøÂç±à³ÌASP½Ì³Ì http://www.Gzu521.com]L3oN ^OL|l5MbZcK

£¼ %option explicit%£¾
£¼ !--#include file="forms.inc"--£¾
£¼ html£¾
£¼ head£¾
£¼ title£¾±íµ¥Ìá½»²âÊÔ£¼ /title£¾
£¼ /head
£¼ body£¾
£¼ %
if request("fid") = "" then
generateform
else
processform
end if
%£¾
£¼ /body£¾
£¼ /html£¾

¡¡¡¡ generateform¸ºÔðÉú³É±íµ¥£¬±íµ¥ÖÐÓ¦¸Ãº¬ÓÐÒ»¸öÒþ²ØµÄfid£¬È磺

£¼ %
sub generateform()
%£¾
£¼ form action="£¼ %=request.servervariables("path_info")%£¾" method=get£¾
£¼ input type=hidden name=fid value="£¼ %=generatefid()%£¾"£¾
£¼ input type=text name="param1" value=""£¾
£¼ input type=submit value="ok"£¾
£¼ /form£¾
£¼ %
end sub
%£¾

¡¡¡¡ processform¸ºÔð´¦Àíͨ¹ý±íµ¥Ìá½»µÄÄÚÈÝ£¬µ«ÔÚ´¦Àí֮ǰӦ¸ÃÏȵ÷ÓÃcheckfid()¼ì²éµ±Ç°±íµ¥ÊÇ·ñÒѾ­Ìá½»£¬´úÂëÀàÈ磺

£¼ %
sub processform()
¡¡if checkfid() then
¡¡¡¡response.write "ÄãÊäÈëµÄÄÚÈÝÊÇ" & request.querystring("param1")
¡¡¡¡registerfid
¡¡else
¡¡¡¡response.write "´Ë±íµ¥Ö»ÄÜÌá½»Ò»´Î!"
¡¡end if
end sub
%£¾

¡¡¡¡ Èý¡¢ÏÞÖÆÓë¸Ä½ø´ëÊ©

¡¡¡¡ÉÏÃæÎÒÃǽéÉÜÁËÔÚµ±Ç°»á»°ÆÚ¼äÏÞÖÆÍ¬Ò»±íµ¥±»¶à´ÎÌá½»µÄÒ»ÖÖ·½·¨¡£ÔÚʵ¼ÊÓ¦ÓÃÖпÉÄÜÐèÒª´Ó¶à·½Ãæ¼ÓÒԸĽø£¬ÀýÈ磺 ¡¡

¡¡¡¡ ¢Å ÔÚµÇ¼Ç±íµ¥id֮ǰ¼ì²éÓû§ÊäÈëÊý¾ÝµÄºÏ·¨ÐÔ£¬Ê¹µÃÊý¾Ý²»ºÏ·¨Ê±Óû§¿ÉÒÔ°´¡°ºóÍË¡±°´Å¥·µ»Ø£¬ÔÚÐÞÕýºóÔÙ´ÎÌύͬһ±íµ¥¡£

¡¡¡¡ ¢Æ ÕâÖÖ¶Ô±íµ¥Ìá½»µÄÏÞÖÆ×î¶àÖ»ÄÜÔÚµ±Ç°»á»°ÆÚ¼äÓÐЧ¡£Èç¹ûÒªÇóÕâÖÖÏÞÖÆÄܹ»¿çÔ½¶à¸ö»á»°£¬ÄÇô¾ÍÒªÓõ½cookeis»òÊý¾Ý¿âÀ´±£´æÏà¹ØÊý¾ÝÁË¡£

ÔðÈα༭£ºgzu521

ÍøÂç±à³Ì·ÖÀà
ASP½Ì³Ì
.Net½Ì³Ì
Java½Ì³Ì
PHP½Ì³Ì
Êý¾Ý¿â»ù´¡
ACCESS½Ì³Ì
SQL Server½Ì³Ì
MySQL½Ì³Ì
Oracle½Ì³Ì
·ÖÀàÍÆ¼öÐÅÏ¢
¸ü¶à...
´óÀà×îÐÂÎÄÕÂ
¸ü¶à...