¹ØÓÚASPµÄReplaceº¯Êý
Replaceº¯ÊýÈçºÎĬÈÏÊÇ´Ó×ó¶ËÌæ»»£¬ÈçºÎʹÆä´ÓÓұ߿ªÊ¼Ìæ»»£¬¼´Ìæ»»Ò»¸ö×Ö·û´®µÄ×îºóÒ»¸ö×Ö·û£¬Ìæ»»´ÎÊýΪ1´Î£¬Ð»Ð»
ÒýÓà VBScript code <% Response.Write ReplaceRev("abcdefXXXghi","XXX","ZZZZ")Function ReplaceRev(so, sf, st)Dim p p=InStrRev(so, sf)If p=0OrIsNull(p)Then ReplaceRev= soElse ReplaceRev=Mid¡ Õý½â ·Ç³£ºÃµÄº¯Êý ÿ¸ö³õѧÕß¶¼Ó¦ÊÕ¼¯ÏÂÀ´±£´æµÄ×Ô¼ºµÄº¯Êý¿âÖÐ ¶ø²»ÊÇÿ´ÎÓõ½ÁËÔÙµ½ÍøÉ졂 ÎÒÏȱ£´æÏÂÀ´ лл
Ïà¹ØÎÊ´ð£º
<%if request.QueryString("start") <>"" then%> <%if cint(start)>0 then%> <a href="search.asp?q= <%=q%>&start= <%if request.Query ......
Îļþ£ºfolder.inc HTML code: <% Dim folderini,pos,pageName fPath = Request.ServerVariables("PATH_TRANSLATED") pos = instrRev(fPath,"\") folderini = Left(fPath,pos)+&qu ......
ÎÒ°ïѧУ×öÁËÒ»¸öÕ¾£® ÔÚÐ£Ô°ÍøµÄÇé¿öÏ£¬Äܹ»µÇ½³É¹¦£¬ºǫ́ÕʺŶ¼ÄÜͨ¹ý£¬½øÈëºǫ́ µ«ÊÇÔÚÍâÍø£Á£ÄµÄÇé¿öÏ£¬Äܹ»µÇ½ºǫ́µÄÒ³Ãæ£¬Ò³ÃæÊÇ£Á£Ó£ÐÎļþ£® µ«ÊÇÊäÈëÕʺźÍÃÜÂëµÄʱºò£¬ÍøÒ³ÔËÐкܾö¼ ......
<% Sql="select top 8 * from NewsData where d_classid in (select classid from NewsClass where ParentID=16)" Rs.Open Sql, conn, 1,1 Do Until Rs.Eof
......
ÓÐËÄܸø½²½²£¬Ôõô×öÂ𣿠ллÀ²£¡ ¸ÊÌØÍ¼ ÊÇɶ£¿ ½âÌâ˼·.¿´Ò»Ï½ø¶ÈÌõµÄÏÔʾ.. ÆäʵÄã¾ÍŪһ¶Ñtable ÿ¸ötableµÄ¿í¶È²»Í¬.µ×É«²»Í¬¼´¿É µ±È»ÓÃdiv¿ØÖÆÎ»ÖøüºÃ ÄãŪ100¸ötable¸ù¾Ý½ø¶ÈÆäÖÐǰ20¸ö·Ö¸øµ ......