What is Web±à³Ì Readers Blog?

    Web±à³Ì Readers Blog¼¯ÖÐÁËWeb×ÊÉî³ÌÐòÔ±µÄ¼¼ÇɺÍʵս¾­Ñ飬º­¸ÇÁËWeb±à³ÌµÄÈ«²¿·¶Î§: 3P(ASP, JSP, PHP) web±à³Ì¼¼Êõ£¬MySQLÊý¾Ý¿â¿ª·¢£¬·þÎñÆ÷ÍøÂ簲ȫºÍDIV+CSS²¼¾ÖµÈ£¬ÌṩһЩÓÅÐãµÄ±à³ÌÔ´Â룬ʹÄúµÄWeb±à³Ìѧϰ֮·¸ü¼Óƽ̹¡£

ä¯ÀÀģʽ: ±ê×¼ | Áбí

Asp±àÂëÓÅ»¯

Submitted by ×÷Õß: admin 2008-05-06 15:21:58

ASP(Active Server Page)ÊÇMicrosoft¹«Ë¾ÍƳöµÄ»ùÓÚPWS(Personal Web Server)&IIS(InternetInformation Server)ƽ̨µÄ¡¢»ùÓÚISAPI(InternetServiceAPI)Ô­ÀíµÄ¶¯Ì¬ÍøÒ³¿ª·¢¼¼Êõ£¬Ä¿Ç°ÈÕÇ÷³ÉÊìÍêÉÆ¡£ÔÚÕâÀï½ö¾Í´úÂëÓÅ»¯½øÐÐһЩ¼òµ¥ÌÖÂÛ¡£


1¡¢¡¡¡¡ÉùÃ÷VBScript±äÁ¿


ÔÚASPÖУ¬¶ÔvbscriptÌṩÁËÇ¿¾¢µÄÖ§³Ö£¬Äܹ»Î޷켯³ÉvbscriptµÄº¯Êý¡¢·½·¨£¬ÕâÑù¸øÀ©Õ¹ASPµÄÏÖÓй¦ÄÜÌṩÁ˺ܴó±ãÀû¡£ÓÉÓÚASPÖÐÒѾ­Ä£ºýÁ˱äÁ¿ÀàÐ͵ĸÅÄËùÒÔ£¬ÔÚ½øÐÐASPÓëvbscript½»»¥µÄ¹ý³ÌÖУ¬ºÜ¶à³ÌÐòÔ±Ò²¹ßÓÚ²»ÉùÃ÷vbscriptµÄ±äÁ¿£¬ÕâÑù¼ÓÖØÁË·þÎñÆ÷µÄ½âÎö¸ºµ££¬½ø¶øÓ°Ïì·þÎñÆ÷µÄÏìÓ¦ÇëÇóËÙ¶È¡£
¼øÓÚ´Ë£¬ÎÒÃÇ¿ÉÒÔÏóÔÚVBÖÐÇ¿ÖÆÓû§½øÐбäÁ¿ÉùÃ÷Ò»ÑùÔÚvbscriptÖÐÇ¿ÖÆÓû§½øÐбäÁ¿ÉùÃ÷¡£ÊµÏÖ·½·¨ÊÇÔÚASP³ÌÐòÐÐÊ×·ÅÖÃ<% optionexplicit%>¡£

2¡¢¡¡¡¡¶ÔURLµØÖ·½øÐбàÂë


ÔÚÎÒÃÇʹÓÃasp¶¯Ì¬Éú³ÉÒ»¸ö´ø²ÎÊýURLµØÖ·²¢½øÐÐÌø×ªÊ±£¬ÔÚIEÖнâÎöºÜÕý³££¬µ«ÔÚNetScrapeä¯ÀÀʱȴÓдíÎóÈçÏ£º
HTTP Error 400
400 Bad Request
Due to malformed syntax, the request could not be understood by the server.
The client should not repeat the request without modifications.
½â¾ö·½·¨ÊǶÔÉú³ÉµÄURL²ÎÊýʹÓÃASPÄÚÖÃserver¶ÔÏóµÄURLencode·½·¨½øÐÐURL±àÂ룬Àý×ÓÈçÏ£º
<%
URL="xur.asp"
var1="username=" & server.URLencode("xur")
var2="&company=" & server.URLencode("xurstudio")
var3="&phone=" & server.URLencode("021-53854336-186")
response.redirect URL & "?" & var1 & var2 & var3
%>

3¡¢¡¡¡¡Çå¿Õ¶ÔÏó


µ±Ê¹ÓÃÍê¶ÔÏóºó£¬Ê×ÏÈʹÓÃClose·½·¨À´ÊͷŶÔÏóËùÕ¼ÓõÄϵͳ×ÊÔ´£»È»ºóÉèÖöÔÏóֵΪ“nothing”ÊͷŶÔÏóÕ¼ÓÃÄÚ´æ¡£µ±Ä꣬ÎÒ¾ÍÊÇÔÚÒ»ÕÅÒ³ÃæÉÏ´´½¨Á˰ÙÓà¸öûÓÐÇå¿Õ¶ÔÏóµÄ¼Ç¼¼¯¶ø±ÀÀ£ÁËÎÒµÄIIS¡£ÏÂÃæµÄ´úÂëʹÓÃÊý¾Ý¿âÄÚÈݽ¨Á¢Ò»¸öÏÂÀ­ÁÐ±í¡£´úÂëʾÀýÈçÏ£º
<% myDSN="DSN=xur;uid=xur;pwd=xur"
mySQL="select * from authors where AU_ID<100"
set conntemp=server.createobject("adodb.connection")
conntemp.open myDSN
set rstemp=conntemp.execute(mySQL)
if rstemp.eof then
response.write "Êý¾Ý¿âΪ¿Õ"
response.write mySQL
conntemp.close
set conntemp=nothing
response.end
¡¡end if%>
<%do until rstemp.eof %>
<%
rstemp.movenext
loop
rstemp.close
set rstemp=nothing
conntemp.close
set conntemp=nothing
%>

4¡¢Ê¹ÓÃ×Ö·û´®½¨Á¢SQL²éѯ


ʹÓÃ×Ö·û´®À´½¨Á¢²éѯ²¢²»Äܼӿì·þÎñÆ÷µÄ½âÎöËÙ¶È£¬Ïà·´£¬Ëü»¹»áÔö¼Ó·þÎñÆ÷µÄ½âÎöʱ¼ä¡£µ«ÔÚÕâÀïÈÔÈ»ÍÆ¼öʹÓÃ×Ö·û´®´úÌæ¼òµ¥µÄ²éѯÓï¾äÀ´½øÐвéѯ¡£ÕâÑù×öµÄºÃ´¦ÊÇ£¬¿ÉÒÔѸËÙ·¢ÏÖ³ÌÐòÎÊÌâËùÔÚ£¬´Ó¶ø±ãÀû¸ßЧµØÉú³É³ÌÐò¡£Ê¾ÀýÈçÏ£º
<%mySQL= ""select * "
mySQL= mySQL & "from publishers"
mySQL= mySQL & "where state='NY'"
response.write mySQL
set rstemp=conntemp.execute(mySQL)
rstemp.close
set rstemp=nothing
%>

5¡¢¡¡¡¡Ê¹ÓÃcase½øÐÐÌõ¼þÑ¡Ôñ


ÔÚ½øÐÐÌõ¼þÑ¡ÔñµÄʱºò£¬¾¡Á¿Ê¹ÓÃcaseÓï¾ä£¬±ÜÃâʹÓÃifÓï¾ä¡£Ê¹ÓÃcaseÓï¾ä£¬¿ÉÒÔʹ³ÌÐòÁ÷³Ì»¯£¬Ö´ÐÐÆðÀ´Ò²±ÈifÓï¾äÀ´µÄ¿ì¡£Ê¾ÀýÈçÏ£º
<%
¡¡¡¡FOR i = 1 TO 1000
¡¡¡¡ n = i
¡¡¡¡ Response.Write AddSuffix(n) & "
"
¡¡¡¡NEXT
¡¡¡¡%>
¡¡¡¡<%
¡¡¡¡Function AddSuffix(num)
numpart = RIGHT(num,1)
SELECT CASE numpart
CASE "1"
IF InStr(num,"11") THEN
num = num & "th"
ELSE
num = num & "st"
END IF
CASE "2"
IF InStr(num,"12") THEN
num = num & "th"
ELSE
num = num & "nd"
END IF
CASE "3"
IF InStr(num,"13") THEN
num = num & "th"
ELSE
num = num & "rd"
END IF
CASE "4"
num = num & "th"
CASE ELSE
num = num & "th"
END SELECT
AddSuffix = num
¡¡¡¡END FUNCTION
%>

6¡¢¡¡¡¡Ê¹ÓÃadovbs.incÎļþÖж¨ÒåµÄ³£Á¿´ò¿ª¼Ç¼¼¯


´ò¿ª¼Ç¼¼¯Ê±£¬¿ÉÒÔ¶¨Òå¼Ç¼¼¯´ò¿ªµÄÓαêÀàÐͺÍËø¶¨ÀàÐÍ¡£ÔÚadovbs.incÎļþÖж¨ÒåÁËһЩ³£Á¿À´¶¨ÒåÕâЩÀàÐÍ¡£adovbs.incÎļþ±£´æÔÚ\inetpub\iissamples\IISamplesĿ¼ÏÂÃæ¡£ÏÂÃæÁоټ¸¸ö³£ÓõÄÓαêÀàÐͺÍËø¶¨ÀàÐÍ¡£
ÓαêÀàÐÍ£ºadOpenFowardOnlyÓαêÖ»ÄÜÏòǰ£»adOpenKeysetÓαê¿ÉÏòǰ»òÕßÏòºó£¬ÈçÒ»Óû§Ìí¼Ó¼Ç¼£¬Ð¼Ç¼²»»á³öÏÖÔڼǼ¼¯ÖУ»adOpenDynamicÓÎ±ê¶¯Ì¬ËæÒ⣻adOpenStatic¼Ç¼¼¯²»¶ÔÆäËûÓû§Ôì³ÉµÄ¼Ç¼ÐÞ¸ÄÓÐËù·´Ó³¡£
Ëø¶¨ÀàÐÍ£ºadLockReadOney²»ÄÜÐ޸ļǼ¼¯ÖеļǼ£»adLockPessimisticÔڱ༭һÌõ¼ÇÂ¼Ê±Ëø¶¨Ëü£»adLockOptimsticµ÷ÓüǼ¼¯Update·½·¨Ê±²ÅËø¶¨¼Ç¼£»adLockBatchOpeimstic¼Ç¼ֻÄܳÉÅú¸üС£
<!--#INCLUDE VIRTUAL="/ADOVBS.INC" -->
<%
connectme="DSN=xur;uid=xur;pwd=xur"
sqltemp="select * from publishers where name='xur'"
set rstemp=Server.CreateObject("adodb.Recordset")
rstemp.open sqltemp, connectme, adOpenStatic£¬adLockOptimstic
response.write rstemp.recordcount & " records in
" & sqltemp
rstemp.close
set rstemp=nothing
%>

7¡¢¡¡¡¡±ÜÃâÔÚʹÓÃglobal.asaÎļþÖнøÐжÔÏó¶¨Òå


ÓÉÓÚglobal.asaÎļþÖеÄÄÚÈÝ¿ÉÒÔΪվµãÄÚËùÓÐÎļþÒýÓã¬ÎÞÒÉ£¬ÔÚglobal.asaÎļþÖнøÐжÔÏó¶¨Òå¿ÉÒÔʡȥºÜ¶àÖØ¸´¹¤×÷¡£±ÈÈçÔÚglobal.asaÖеÄapplication_onstartº¯ÊýÖнøÐÐÈç϶¨Ò壺
<%SUB application_onstart
set application("theCONN")=server.createobject("adodb.connection")
END SUB %>;
ÕâÑù¾Í¿ÉÒÔÔÚÕ¾µãÈκδúÂëÖÐ×öÀàËÆÒýÓãº
<%
mySQL="select * from publishers where state='xur'
set rstemp=application("theconn").execute(mySQL)
%>
ͬÑùµØ£¬¿ÉÒÔÔÚsession_onstartº¯ÊýÖд´½¨¼Ç¼¼¯¶ÔÏó
<%SUB session_onstart
set session("rstemp")=server.createobject("adodb.recordset")
END SUB %>
È»ºóÔÚÕ¾µãÒ²ÃæÖнøÐÐÈçÏÂÒýÓãº
<%
mySQL="select * from publishers where state='xur'
set session("rstemp")=conntemp.execute(mySQL)
%>
µ«ÕâÑù×öµÄͬʱҲÓкܴóµÄ¸ºÃæÓ°Ï죬ÓÉÓÚApplicationºÍsession±äÁ¿¶¼Ö»ÓÐÔڹرÕÍøÕ¾µÄʱºò²ÅÊÍ·ÅÕ¼ÓõÄ×ÊÔ´£¬ËùÒÔsession²ÎÊý»áÀË·Ñ´óÁ¿²»±ØÒªÄڴ棬¶øÇÒ´Ëʱapplication±äÁ¿³ÉΪ·þÎñÆ÷ÐÔÄܵį¿¾±¡£
½â¾ö·½·¨£º½¨Á¢¶¨Òå¶ÔÏóaspÒ³Ãæ£¬ÔÚÐèÒª½øÐе÷ÓÃÕâЩ¶ÔÏóµÄÒ³ÃæÉÏ£¬ÒýÈëÕâÕÅaspÒ³Ãæ¡£¼ÙÉ趨Òå¶ÔÏóµÄaspÒ³ÃæÃû³ÆÎªdefine.asp£¬ÔòÖ»ÒªÔÚ¶ÔÓ¦aspÒ³ÃæÖмÓÈëÒÔÏÂÓï¾ä¾ÍÄÜÒýÈë¸ÃÒ³Ãæ¡£
<!--#INCLUDE VIRTUAL="/define.asp" -->
ÔÚ½øÐÐÒ³ÃæÒý½øÊ±£¬×îºÃÔÚ´ýÒý½øµÄaspÎļþÖв»Òª°üº¬<%@LANGUAGE="VBSCRIPT"%>Óï¾ä¡£ÒòΪÔÚaspÎļþÖУ¬Ö»ÄÜÓÐÒ»¾äÓÉ@À´¶¨ÒåµÄ½Å±¾½âÎöÓïÑÔ¡£
8¡¢¡¡¡¡°²È«·À»¤
aspÌṩÁ˺ܺõĴúÂë±£»¤»úÖÆ£¬ËùÓеÄasp´úÂë¶¼ÔÚ·þÎñÆ÷¶ËÖ´ÐжøÖ»·µ»Ø¸ø¿Í»§¶Ë´úÂëÖ´Ðнá¹û¡£¼´±ãÕâÑù£¬ÔÚÀϰ汾µÄIISÖл¹¿ÉÒÔÔÚÎļþÃûºóÃæ¼Ò::$DATAÀ´²é¿´aspµÄÔ´´úÂ룬ÕâÒѾ­ÊôÓÚWebServer°²È«·¶³ë²»ÔÚ±¾ÎÄÌÖÂÛ·¶Î§ÄÚ¡£ÏÂÃæÌá³öÁ½µã¼òµ¥µÄ°²È«×¢ÒâÊÂÏî¡£
¡¡¡¡ËäÈ»ÔÚaspÖн¨ÒéÒýÈëÎļþÒÔinc×÷ΪÀ©Õ¹Ãû£¬ÔÚÕâÀïÈÔ½¨ÒéÒÔasp×÷ΪÒýÎļþµÄÀ©Õ¹Ãû¡£µ±ÕâЩ´úÂëÔÚ°²È«»úÖÆ²»ºÃµÄWebServerÉÏÔËÐÐʱ£¬Ö»ÐèÔÚµØÖ·À¸ÉÏÊäÈëÒýÈëÎļþµÄµØÖ·(incΪÀ©Õ¹Ãû)£¬¾Í¿ÉÒÔä¯ÀÀ¸ÃÒýÈëÎļþµÄÄÚÈÝ£¬ÕâÊÇÓÉÓÚÔÚWebServerÉÏ£¬Èç¹ûûÓж¨ÒåºÃ½âÎöijÀàÐÍ£¨±ÈÈçinc£©µÄ¶¯Ì¬Á¬½Ó¿âʱ£¬¸ÃÎļþÒÔÔ´Â뷽ʽÏÔʾ¡£
¡¡¡¡²»Òª°ÑÊý¾Ý¿âÎļþ·ÅÔÚÍøÕ¾½á¹¹ÄÚ²¿£¬ÕâÑù£¬µ±¶ñÒâÈËÊ¿»ñÈ¡Êý¾Ý¿â·¾¶ºó£¬¾Í¿ÉÒÔÇáÒ×»ñÈ¡¸ÃÊý¾Ý¿â£¬½ø¶øËÁÒâ¸ü¸ÄÊý¾Ý¿âÄÚÈÝ¡£±È½ÏºÃµÄ×ö·¨ÊÇ£¬ÎªÊý¾Ý¿â½¨Á¢DSN£¨DateSource Name£©£¬¶øÔÚ½øÐÐÊý¾Ý¿â·ÃÎÊʱֱ½Ó·ÃÎʸÃDSN¡£

¸ÃÎÄÕÂ×ªÔØ×ÔÍøÂç´ó±¾Óª£ºhttp://www.xrss.cn/Dev/Asp/200651031.Html

·ÖÀà:ÍøÕ¾|ASP±¸Íü | Read more ÔĶÁ (279) ÆÀÂÛ (0)





·Ã¿Í ÆÀÂÛ





·¢±íÆÀÂÛ

êÇ¡¡³Æ (±ØÌî)

ÓÊ¡¡Ïä (±ØÌî)

Íø Õ¾

ÑéÖ¤Âë: (±ØÌî)