¼òµ¥µÄasp·Ö´ÊËã·¨£¨ÕýÏò×î´óÆ¥Å䣩
×î½üдվÄÚËÑË÷£¬ËùÒÔÑо¿ÁËÒ»ÏÂËã·¨£¬¸ÃËã·¨µÄÔÀíÈçͼÏÔʾ¡£
ÒÔÏÂÊÇÒ»¸öÓÃaspдµÄ¼òµ¥µÄ·Ö´Ê³ÌÐòÖ÷ÒªµÄ´úÂ룬´Ê¿âÎÒÒѾÓÃaccess½¨Á¢ºÃÁË¡£
Èç¹ûÒª×¢ÖØÐ§ÂÊ£¬MarLenµÄѡȡºÜÊÇÖØÒª£¬·ñÔòЧÂÊ»áÊ®·ÖµÍÏ£¬ÕâÀïMarLenÎÒѡȡµÄÊÇ5¡£
dim faword : faword = ""
do while (len(fword) > 0)
tword = left(fword,5)
'response.write "tword--->" & tword & "<br />"
tlen = len(tword)
do while (tlen > 0)
fw = left(tword,tlen)
'response.write "fw--->" & fw & "<br />"
sql = "select fword from dict where fword='" & fw & "'"
set rsfff = connf.execute(sql)
if not rsfff.eof or tlen=1 then
faword = faword & fw & ","
'response.write fw & "<br />"
exit do
end if
tlen = tlen - 1
loop
'response.write "tlen--->" & tlen & "<br />"
fword = mid(fword,tlen+1)
'response.write "fword--->" & fword & "<br />"
loop
connf.close
dim querywords : querywords = split(faword,",")
querywordsÊDZ£´æ¹Ø¼ü´ÊµÄÊý×é¡£
·Ö´Ê¾Íµ½ÕâÀïÁË£¬¶ÔÓÚÈçºÎÀûÓ÷ִʵĽá¹ûÔÚÊý¾Ý¿âÖвéÕÒ½á¹ûÒ²ÊÇÖµµÃÑо¿µÄ¡£
ÎÒÕâÀïÓÃÁËÇåһɫµÄ“like”£¬“or” sqlÓï¾ä£¬Ð§¹û²»ÊǺÜÀíÏë¡£
Ï£Íû´ó¼ÒÄܹ»ÁôÑÔÌÖÂÛ¡£
Ïà¹ØÎĵµ£º
ActiveX¿Ø¼þÔËÐÐÔÚ¿Í»§¶Ë¡£ÎÒÃÇ¿ÉÒÔ»ñµÃ¿Í»§¶ËµÄһЩÐÅÏ¢£¬ÈçIC¿¨µÄÐÅÏ¢,¿Í»§¶ËµÄÑéÖ¤µÈµÈ¡£µ«ÊÇActiveX¿Ø¼þÒ²ÓÐÐí¶àȱµã£º¿Í»§¶ËµÄ²¿ÊðºÜÀ§ÄÑ£¬Èç¿Í»§¶Ë²»ÄÜÕýÈ·ÏÂÔØ£¬ÏÂÔØÁËÒÔºó²»ÄÜÕýÈ·Ö´ÐУ¬ÏÂÔØµÄʱºòÐèÒªÉèÖÃIEµÄ°²È«¼¶±ðµÈµÈ¡£
¸ü¶àµÄʱºò£¬ÎÒ¶¼ÔÚʹÓÃCOM×é¼þÀ´À©Õ¹ASPµÄ¹¦ÄÜ¡£×¼È·µØËµ£¬ÊÇ·þÎñ¶ËÔËÐеÄActivex Dll ......
·¢Ò»¸ö±ê×¼µÄÊý¾Ý¿âÁ¬½Ó´úÂ롣ϣÍû¶Ô´ó¼ÒÓаïÖú¡£
<%
option explicit
dim startime,endtime,conn,connstr,db
startime=timer()
'¸ü¸ÄÊý¾Ý¿âÃû×Ö
db="data/dvBBS5.mdb"
Set conn = Server.CreateObject("ADODB.Connection")
connstr="Provider=Microsoft.Jet.OLEDB.4.0;Data&n ......
¡¡¡¡Ñ§Ï°Ä¿µÄ£ºÑ§»áÓÃ±íµ¥ÔªËØÏò·þÎñÆ÷´«ËͱäÁ¿£¬È»ºóÏÔʾ±äÁ¿ÔÚ¿Í»§¶ËµÄä¯ÀÀÆ÷¡£
¡¡¡¡Ê×ÏÈ£¬ÈÃÎÒÃÇÀ´¿´Ò»ÏÂDREAMWEAVERµÄ±íµ¥ÔªËØÃ«Ë¢¡£
¡¡¡¡ÏÂÃæÎÒÃÇÀ´Ò»¸öÒ»¸ö¿´±íµ¥ÔªËØ¡£1¡¢Îı¾Óò£¬Õâ¸öÊÇ×î»ù±¾µÄ£¬´«Ë͵ÄÊÇÎı¾ÐÅÏ¢£¬Ò»°ãÓû§Ãû£¬ÃÜÂë¶¼ÒªÓÃÕâ¸ö´«ËÍ£¬²»¹ýÒªÊÇÃÜÂëµÄ»°ÒªÔÚÀàÐÍÀïÃæÑ¡ÔñÃÜÂ룬ÕâÑù¾Í»áÒÔ*´úÌæÏÔʾ³ ......
¡¡IISĬÈϵĴíÎóÒ³ÊǺܲ»ÓѺõģ¬ºÜ¶àÈË¿´µ½Ä¬ÈϵĴíÎóҳʱ¶¼»á˵£ºÍøÕ¾´ò²»¿ªÁË£¡°×°×ËðʧÁËÕⲿ·ÖÁ÷Á¿¡£¶øÈç¹û´íÎóÒ³Ö±½ÓÌø×ªµ½Ê×Ò³ÓÖ¶ÔËÑË÷ÒýÇæºÜ²»ÓѺ㬸㲻ºÃÊ×Ò³»¹»á±»·âµô¡£ËùÒÔ¸ù¾ÝÇé¿ö£¬ÓÐÁ½¸ö·½·¨½â¾öÕâ¸öÎÊÌ⣺
¡¡¡¡Èç¹ûÊDz©¿ÍµÈÄÚÈÝÐ͵ÄÍøÕ¾£¬¿ÉÒÔ·µ»ØÒ»¸ö´øÓÐ404´íÎóµÄËÑË÷¿òÈ÷ÿÍËÑË÷£¬ÈôÊǵç×ÓÉÌÎñÐÍÍøÕ¾ ......
ASPϵÁк¯Êý´óÈ«-ÍøÉÏÊÕ¼¯µÄһЩASPº¯Êý¼°±í´ïʽ
ASPº¯Êý
´óÈ«¡¡
ASPº¯ÊýÓëVBSCRIPTÀàËÆ£¬ÒÔϾÙһЩ³£Óõĺ¯Êý¡¡
¡¡
Array()¡¡
¡¡
º¯Êý·µ»ØÒ»¸öÊý×é¡¡
¡¡
±í´ïʽ Array(list)¡¡
¡¡
ÔÊÐíÊý¾ÝÀàÐÍ: ×Ö·û£¬Êý×Ö¾ù¿É¡¡
¡¡
ʵÀý£º <%¡¡
¡¡
Dim
myArray()¡¡
¡¡
For i = 1 to 7¡¡
¡¡
Redim Preser ......