Ò׽ؽØÍ¼Èí¼þ¡¢µ¥Îļþ¡¢Ãâ°²×°¡¢´¿ÂÌÉ«¡¢½ö160KB

ASP²É¼¯ ASP²É¼¯³ÌÐòÔ­Àí

ASP²É¼¯-ASP²É¼¯³ÌÐòÔ­Àí
²É¼¯³ÌÐòµÄÖ÷Òª²½ÖèÈçÏ£º
Ò»¡¢»ñÈ¡±»²É¼¯µÄÒ³ÃæµÄÄÚÈÝ
¶þ¡¢´Ó»ñÈ¡´úÂëÖÐÌáÈ¡ËùÓÐÓõÄÊý¾Ý
Ò»¡¢»ñÈ¡±»²É¼¯µÄÒ³ÃæµÄÄÚÈÝ
ÎÒĿǰËùÕÆÎÕµÄASP³£ÓûñÈ¡±»²É¼¯µÄÒ³ÃæµÄÄÚÈÝ·½·¨£º
1¡¢ÓÃserverXMLHTTP×é¼þ»ñÈ¡Êý¾Ý
ÒÔÏÂÄÚÈÝΪ³ÌÐò´úÂë:
ÒÔÏÂΪÒýÓõÄÄÚÈÝ£º
Function GetBody(weburl) 
    '´´½¨¶ÔÏó
    Dim ObjXMLHTTP
    Set ObjXMLHTTP=Server.CreateObject("MSXML2.serverXMLHTTP")
    'ÇëÇóÎļþ,ÒÔÒì²½ÐÎʽ
    ObjXMLHTTP.Open "GET",weburl,False
    ObjXMLHTTP.send
    While ObjXMLHTTP.readyState <> 4
        ObjXMLHTTP.waitForResponse 1000
    Wend
    'µÃµ½½á¹û
     GetBody=ObjXMLHTTP.responseBody
    'ÊͷŶÔÏó
     Set ObjXMLHTTP=Nothing
End Function
µ÷Ó÷½·¨£º
GetBody(ÎļþµÄURLfµØÖ·)
2¡¢»òXMLHTTP×é¼þ»ñÈ¡Êý¾Ý
ÒÔÏÂÄÚÈÝΪ³ÌÐò´úÂë:
ÒÔÏÂΪÒýÓõÄÄÚÈÝ£º
Function GetBody(weburl)  
    '´´½¨¶ÔÏó
    Set Retrieval = CreateObject("Microsoft.XMLHTTP")
    With Retrieval
     .Open "Get", weburl, False, "", ""
     .Send
     GetBody = .ResponseBody
     End With
    'ÊͷŶÔÏó
    Set Retrieval = Nothing
End Function
µ÷Ó÷½·¨£º
GetBody(ÎļþµÄURLfµØÖ·)
ÕâÑù»ñÈ¡µÄÊý¾ÝÄÚÈÝ»¹ÐèÒª½øÐбàÂëת»»²Å¿ÉÒÔʹÓÃ
ÒÔÏÂÄÚÈÝΪ³ÌÐò´úÂë:
ÒÔÏÂΪÒýÓõÄÄÚÈÝ£º
Function BytesToBstr(body,Cset)
        dim objstream
        set objstream = Server.CreateObject("adodb.stream")
        objstream.Type = 1
        objstream.Mode =3
        objstream.Open
     &nb


Ïà¹ØÎĵµ£º

TopForAspʵÀý(ÌÔ±¦¿ª·Åƽ̨ASP°æµÄÓ¦ÓÃʵÀý)

ÌÔ±¦¿ª·Åƽ̨£¬ÕâÀï²»ÔÙ·Ñ»°ÁË£¬Ö±½Ó¿´ÍøÖ·£ºhttp://open.taobao.com/
ÕâÀïÓкܶàµÄʵÀý£¬±¾ÈË×î½üÒ²Ò»Ö±ÔÚѧϰ¡£
ǰ¼¸Ìì¿´µ½ÀË×ÓµÄȺÀïÓÐһλÅóÓÑ˵ÏëÒªASPµÄʵÀý£¬×Ô¼º¾ÍÕÒÁ˸öʱ¼ä¼òµ¥Ð´Ò»Ï¡£
µ±È»Ð´µÄ²»ºÃ£¬ÒòΪ±¾È˹¤×÷Ò²±È½Ïæ¡£Ö»ÊǼòµ¥ÄÜÓÃÒ»¸öʵÀýÈ¡µÃXML×Ö·û´®µÄÊý¾Ý¡£ÔÚÕâÀïÒ²ÊÇÅ×שÒýÓñ£¬Ï£Íû´ó¼Ò²»ÒªÅÄש¡ ......

ASPÁ¬½ÓSQLiteÊý¾Ý¿âÒ»Àý

ÒªÓÃASPÀ´²Ù×÷SQLiteÊý¾Ý¿â£¬Ç°ÌáÌõ¼þÊÇÔÚ·þÎñÆ÷Éϵð²×°SQLiteµÄODBCÇý¶¯³ÌÐò£¬¿Éµ½Õâ¸öÕ¾µãÉÏÏÂÔØ°²×°£ºhttp://www.ch-werner.de/sqliteodbc/£¬°²×°ºÃºó¾Í¿ÉÒÔÏñʹÓÃAccessÒ»ÑùÀ´Ê¹ÓÃSQLiteÁË£¡Ï±ßÊÇÒ»¸öSQLiteÊý¾Ý¿â½á¹¹£º
ÒýÓÃÄÚÈÝ
Create TABLE admin(username text,age integer);
ÎÒÃÇÔÙÀ´ÓÃASPÑÝʾÏÂÈçºÎ¶ÔSQLi ......

ASPÓïÑÔ»ù´¡Ö®³£Á¿µÄ¶¨Òå·½·¨

±¾ÎÄÁ´½Ó£ºhttp://www.oversteper.com/wprogram/asp/826.html
ASP ¶¨Òå³£Á¿µÄ·½·¨
³£Á¿£ºÓÃÒ»ÖÖÃû³Æ´úÌæÊý×ÖºÍ×Ö·û´®£¬ÇÒÆäÖµ±£³ÖÒ»Ö±²»±ä¡£
ÔÚ VBscript ÖУ¬¿ÉÒÔÓà const Óï¾äÀ´¶¨Òå³£Á¿¡£
³£Á¿·ÖÊý×ÖÐͺÍ×Ö·û´®ÐÍ¡£
±íʾÈÕÆÚµÄ³£Á¿Ð´ÔÚÁ½¸ö # Ö®¼ä¡£
ʾÀý£º
ÒÔÏÂΪÒýÓÃÄÚÈÝ£º
<%@LANGUAGE="VBSCRIPT" CODEPAG ......

ASPÌõ¼þÓï¾äÖ®select caseÓï¾ä

±¾ÎÄÁ´½Ó£ºhttp://www.oversteper.com/wprogram/asp/828.html
Ìõ¼þÓï¾äÖ® select case  Óï¾ä
1¡¢¶àÌõ¼þ·ÖÖ§µÄʱºòÓÅÏÈʹÓÃselect case½á¹¹£»
      2¡¢Êý×ֵĴóÁ¿ÁоÙʱ×îºÃʹÓÃselect case
      3¡¢±ØÐëʹÓà end select À´½áÊø·ÖÖ§½á¹¹
ʾÀý£º
ÒÔÏÂΪ ......
© 2009 ej38.com All Rights Reserved. ¹ØÓÚE½¡ÍøÁªÏµÎÒÃÇ | Õ¾µãµØÍ¼ | ¸ÓICP±¸09004571ºÅ