ASPͼƬÉÏ´«µ½Êý¾Ý¿âÖÐʵÀý
ASP£¨Active Server Pages£©ÊÇMicrosoftºÜÔç¾ÍÍƳöµÄÒ»ÖÖWEBÓ¦ÓóÌÐò½â¾ö·½°¸£¬Ò²ÊǾø´ó¶àÊý´ÓÊÂÍøÕ¾¿ª·¢ÈËÔ±ºÜÊìϤµÄÒ»¸ö±È½Ï¼òµ¥µÄ±à³Ì»·¾³¡£Í¨¹ýASPÎÒÃÇ¿ÉÒÔ´´½¨¹¦ÄÜÇ¿´óµÄ¶¯Ì¬µÄWEBÓ¦ÓóÌÐò¡£ASPËäÈ»¹¦ÄܺÜÇ¿´ó£¬µ«ÓÐЩ¹¦ÄÜÓô¿ASP´úÂëÍê³É²»ÁË£¬ÎªÁËÄܱ£Ö¤¿ª·¢³ö¹¦Äܸü¼ÓÇ¿´óµÄWEBÓ¦ÓóÌÐò£¬ÎÒÃÇ¿ÉÒÔ½èÖúµ÷ÓÃCOM×é¼þ¡£
ÔÚÈÕ³£¹¤×÷ÖУ¬ÀýÈ翪·¢Ò»¸ö“ÉÌÆ·ÍøÉÏÏúÊÛϵͳ”°É£¬ÎªÁËʹ¹Ë¿Í¶ÔÉÌÆ·µÄÍâ¹ÛÓÐËùÁ˽⣬Ҳ¾ÍÊǹ˿ÍÔÚ¿´ÉÌÆ·µÄÎÄ×Ö½éÉܵÄͬʱÔÚÎÄ×ÖµÄÅÔ±ßÓиÃÉÌÆ·µÄͼƬ¼ÓÒÔ˵Ã÷£¬ÕâÑù¹Ë¿Í¾Í¿ÉÒÔ¶Ô¸ÃÉÌÆ·ÓиöϵͳµÄÁ˽⣬¶ÔÍÆÏúÉÌÆ·ÓкܴóµÄ°ïÖú¡£ËùÒÔÎÒÃÇÔÚ¿ª·¢ÏµÍ³Ê±µ±È»¾ÍÒª¼ÓÈëͼƬ´¦ÀíÄ£¿é£¬¼´ÈçºÎ°ÑͼƬÉÏ´«µ½·þÎñÆ÷£¨Í¼Æ¬¿ÉÒÔ·ÅÔÚWEB·þÎñÆ÷ÉÏijһ¸öÎļþ¼ÐÀïÒ²¿ÉÒÔ·ÅÔÚSQL Server·þÎñÆ÷ÀºÍÈçºÎÈÃÉÏ´«µÄͼƬÔÚä¯ÀÀÆ÷¶ËÏÔʾ³öÀ´£¬ÕⶼÊÇ¿ª·¢ÈËÔ±Òª¿¼Âǵ½µÄÎÊÌâ¡£
ÉÏ´«Í¼Æ¬µ½·þÎñÆ÷ÓжàÖÖ·½·¨£¬¿ÉÒÔʹÓÃÎļþÉÏ´«×é¼þÒ²¿ÉÒÔʹÓô¿ASP´úÂëÀ´ÊµÏÖ¡£ÔÚCSDNµÄWEB°æASPÉϾ³£ÓÐÍøÓÑÎÊÕâÑùµÄÎÊÌâ“ÈçºÎÀûÓÃASP°ÑͼƬÉÏ´«µ½Êý¾Ý¿âÀ¬ÎªÁË·½±ãCSDNÐèÒªÁ˽âÕâ·½ÃæµÄ֪ʶ£¬ÕâƪÎÄÕ½«Ïêϸ½²½âʹÓÃASPÉÏ´«Í¼Æ¬µÄ×ö·¨²¢¸ø³ö´úÂ룬ÒÔ÷϶ÁÕß¡£
Ê×ÏÈÁ˽âÒ»ÏÂÔÚ³ÌÐòÖÐÓõ½µÄ¸÷ÖÖ¶ÔÏó¼°ÆäÓï·¨£º
1£© Request.BinaryRead()·½·¨
¡ñ ʹÓÃRequest.BinaryRead()·½·¨¿ÉÒÔ»ñÈ¡Ìá½»µÄÎļþÊý¾Ý
¡ñ Óï·¨
VarReValue= Request.BinaryRead(number)
±äÁ¿VarReValue·µ»ØÖµ±£´æ´Ó¿Í»§¶Ë¶ÁÈ¡µ½µÄ¶þ½øÖÆÊý¾Ý£»
²ÎÊýnumberÖ¸Ã÷Òª´Ó¿Í»§¶Ë¶ÁÈ¡µÄ¶þ½øÖÆÊý¾ÝÁ¿µÄ´óС¡£
2£© Response.BinaryWrite()·½·¨
¡ñ ʹÓÃResponse.BinaryWrite()·½·¨¿ÉÒÔ´ÓÊý¾Ý¿âÖлñȡͼƬÊý¾Ý²¢ÏÔʾµ½¿Í»§¶ËµÄä¯ÀÀÆ÷ÖС£
¡ñ Óï·¨
Response.BinaryWrite data
²ÎÊýdataÊÇҪд½ø¿Í»§¶Ëä¯ÀÀÆ÷ÖеĶþ½øÖÆÊý¾Ý°ü¡£
3£© AppendChunk·½·¨
¡ñ AppendChunk·½·¨µÄ×÷ÓÃÊǽ«¶þ½øÖÆÊý¾Ý×·¼Óµ½Field»òParameter¶ÔÏó¡£
¡ñ Óï·¨
object.AppendChunk data
²ÎÊýdataΪҪ׷¼Óµ½Field»òParameter¶ÔÏóÖеÄÊý¾Ý°ü¡£
4£© GetChunk·½·¨
¡ñ GetChunk·½·¨·µ»Ø¶þ½øÖÆÊý¾ÝµÄÄÚÈÝ¡£
¡ñ Óï·¨
object. GetChunk(size)
²ÎÊýsizeÖ¸Ã÷Òª·µ»Ø¶þ½øÖÆÊý¾ÝµÄ³¤¶È£¬¿ÉÒÔÊdz¤ÕûÐͱí´ïʽ¡£
5£© Request.TotalBytes·½·¨
¡ñ Request.TotalBytes·½·¨·µ»Ø´Ó¿Í»§¶Ë¶ÁÈ¡µ½µÄÊý¾ÝµÄ×Ö½ÚÊý£¬Õâ¸öÖµ¸úÉÏÃæËùÌáµ½µÄnumberÏà¶ÔÓ¦£¬¿ÉÒÔ´óÓÚ»òµÈÓÚnumberÖµ¡£
¡ñ Óï·¨
number= Re
Ïà¹ØÎĵµ£º
1. ASPÁ¬½ÓAccessÊý¾Ý¿âÓï¾ä
Set Conn=Server.CreateObject("ADODB.Connection")
Connstr="DBQ="+server.mappath("www/bbs.mdb")+";DefaultDir=;DRIVER={Microsoft
AccessDriver(*.mdb)};"
Conn.Open connstr
ÆäÖÐSet Conn=Server.CreateObject("ADODB.Connection")Ϊ½¨Á¢Ò»¸ö·ÃÎÊÊý¾ÝµÄ¶ÔÏó
server.mappath("w ......
×î¼òµ¥µÄ×ö·¨ÊÇÔÚÒ³ÃæµÄ<head></head>±êÇ©ÖмÓÈëÒÔÏ´úÂ룺
<meta http-equiv="Refresh" content="10;url='xxx.asp'">
ÕâÑù¾Í»áÔÚÒ³Ãæ´ò¿ªºó10ÃëÖÓÌøתµ½xxx.aspÁË¡£
Ò²¿ÉÒÔÓÃjavascriptµÄsettimeoutÀ´Íê³É£¬ÔÚÒ³ÃæÖмÓÈëÒÔÏ´úÂ룺
<script language=javascript>
var the_timeout = setTime ......
»ú¹¹Ãû³Æ£º ÈÕÆÚ£º2009 - 09 - 14 ²é¿´´ÎÊý£º
334 ´Î
ASP.NetºÍASPµÄ×î´óÇø±ðÔÚÓÚ±à³Ì˼άµÄת»»£¬¶ø²»½ö½öÔÚÓÚ¹¦ÄܵÄÔöÇ¿¡£ASPʹÓÃVBS/JSÕâÑùµÄ½Å±¾ÓïÑÔ»ìºÏhtmlÀ´±à³Ì£¬¶øÄÇЩ½Å±¾ÓïÑÔÊôÓÚÈõÀàÐÍ¡¢ÃæÏò½á¹¹µÄ±à³ÌÓïÑÔ£¬¶ø·ÇÃæÏò¶ÔÏó£¬Õâ¾ÍÃ÷Ï ......
<bgsound src="wen.mid" loop="0">
<% dim weh
If Time >=#1:00:00 AM# And Time < #6:00:00 PM# Then
weh = "<bgsound src="1.mid" loop="0">"
Else If Time >#6:00:00 AM# And Time < #9:00:00 PM#
weh = "<bg ......