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

²É¼¯³ÌÐò¡¾ASP¡¿

²É¼¯³ÌÐò
Ô­Àí
²É¼¯³ÌÐòʵ¼ÊÉÏÊÇͨ¹ýÁËXMLÖеÄXMLHTTP×é¼þµ÷ÓÃÆäËüÍøÕ¾ÉϵÄÍøÒ³¡£±ÈÈçÐÂÎŲɼ¯³ÌÐò£¬ºÜ¶à¶¼Êǵ÷ÓÃÁËsinaµÄÐÂÎÅÍøÒ³£¬²¢ÇÒ¶ÔÆäÖеÄhtml½øÐÐÁËÒ»Ð©Ìæ»»£¬Í¬Ê±¶Ô¹ã¸æÒ²½øÐÐÁ˹ýÂË¡£Óòɼ¯³ÌÐòµÄÓŵãÓУºÎÞÐëά»¤ÍøÕ¾£¬ÒòΪ²É¼¯³ÌÐòÖеÄÊý¾ÝÀ´×ÔÆäËûÍøÕ¾£¬Ëü½«Ëæ×ŸÃÍøÕ¾µÄ¸üжø¸üУ»¿ÉÒÔ½ÚÊ¡·þÎñÆ÷×ÊÔ´£¬Ò»°ã²É¼¯³ÌÐò¾Í¼¸¸öÎļþ£¬ËùÓÐÍøÒ³ÄÚÈݶ¼ÊÇÀ´×ÔÆäËûÍøÕ¾¡£È±µãÓУº²»Îȶ¨£¬Èç¹ûÄ¿±êÍøÕ¾³ö´í£¬³ÌÐòÒ²»á³ö´í£¬¶øÇÒ£¬Èç¹ûÄ¿±êÍøÕ¾½øÐÐÉý¼¶Î¬»¤£¬ÄÇô²É¼¯³ÌÐòÒ²Òª½øÐÐÏàÓ¦Ð޸ģ»ËÙ¶È£¬ÒòΪÊÇÔ¶³Ìµ÷Óã¬ËٶȺÍÔÚ±¾µØ·þÎñÆ÷É϶ÁÈ¡Êý¾Ý±ÈÆðÀ´£¬¿Ï¶¨ÒªÂýһЩ¡£
Ò»¡¢ÊÂÀý
ÏÂÃæ¾ÍXMLHTTPÔÚASPÖеÄÓ¦ÓÃ×ö¸ö¼òµ¥ËµÃ÷
<% 
’³£Óú¯Êý 
’1¡¢ÊäÈëurlÄ¿±êÍøÒ³µØÖ·£¬·µ»ØÖµgetHTTPPageÊÇÄ¿±êÍøÒ³µÄhtml´úÂë 
function getHTTPPage(url) 
    dim Http 
    set Http=server.createobject("MSXML2.XMLHTTP") 
    Http.open "GET",url,false 
    Http.send() 
    if Http.readystate<>4 then 
         exit function 
    end if 
    getHTTPPage=bytesToBstr(Http.responseBody,"GB2312") 
    set http=nothing 
    if err.number<>0 then err.Clear 
end function
'2¡¢×ª»»ÂÒÂֱ꣬½ÓÓÃxmlhttpµ÷ÓÃÓÐÖÐÎÄ×Ö·ûµÄÍøÒ³µÃµ½µÄ½«ÊÇÂÒÂ꣬¿ÉÒÔͨ¹ýadodb.stream×é¼þ½øÐÐת»»
Function BytesToBstr(body) 
dim objstream 
set objstream = Server.CreateObject("adodb.stream") 
objstream.Type = 1 
objstream.Mode =3 
objstream.Open 
objstream.Write body 
objstream.Position = 0 
objstream.Type = 2 
objstream.Charset = "GB2312" ’ת»»Ô­À´Ä¬ÈϵÄUTF-8±àÂëת»»³ÉGB2312±àÂ룬·ñÔòÖ±½ÓÓÃXMLHTTP×é¼þµ÷ÓÃÓÐÖÐÎÄ×Ö·ûµÄÍøÒ³µÃµ½µÄ½«ÊÇÂÒÂë 
BytesToBstr = objstream.ReadText 
objstream.Close 
set objstream = nothing 
End Function 
’ÏÂÃæÊÔ×ŵ÷ÓÃhttp://www.googleµÄhtmlÄÚÈÝ 
Dim Url,Html 
Url="http://ww


Ïà¹ØÎĵµ£º

ASPÖÐÈçºÎ±íµ¥ÔªËصĴ«µÝ

¡¡¡¡Ñ§Ï°Ä¿µÄ£ºÑ§»áÓÃ±íµ¥ÔªËØÏò·þÎñÆ÷´«ËͱäÁ¿£¬È»ºóÏÔʾ±äÁ¿ÔÚ¿Í»§¶ËµÄä¯ÀÀÆ÷¡£
¡¡¡¡Ê×ÏÈ£¬ÈÃÎÒÃÇÀ´¿´Ò»ÏÂDREAMWEAVERµÄ±íµ¥ÔªËØÃ«Ë¢¡£
¡¡¡¡ÏÂÃæÎÒÃÇÀ´Ò»¸öÒ»¸ö¿´±íµ¥ÔªËØ¡£1¡¢Îı¾Óò£¬Õâ¸öÊÇ×î»ù±¾µÄ£¬´«Ë͵ÄÊÇÎı¾ÐÅÏ¢£¬Ò»°ãÓû§Ãû£¬ÃÜÂë¶¼ÒªÓÃÕâ¸ö´«ËÍ£¬²»¹ýÒªÊÇÃÜÂëµÄ»°ÒªÔÚÀàÐÍÀïÃæÑ¡ÔñÃÜÂ룬ÕâÑù¾Í»áÒÔ*´úÌæÏÔʾ³ ......

aspÍøÒ³Àï,sql³£ÓòÙ×÷Óï¾ä!

Ìí¼Ó¡¢É¾³ý¡¢ÐÞ¸ÄʹÓÃ
db.Execute(Sql)ÃüÁîÖ´ÐвÙ×÷
╔----------------╗
¡î Êý¾Ý¼Ç¼ɸѡ ¡î
╚----------------╝
×¢Ò⣺µ¥Ë«ÒýºÅµÄÓ÷¨¿ÉÄÜÓÐÎó(ûÓвâʽ)
 
Sql = "Select
Distinct
×Ö¶ÎÃû from Êý¾Ý±í"
Distinctº¯Êý£¬²éѯÊý¾Ý¿â´æ±íÄÚ²»Öظ´µÄ¼Ç¼
 
......

ASPϵÁк¯Êý´óÈ« ÍøÉÏÊÕ¼¯µÄһЩASPº¯Êý¼°±í´ïʽ

ASPϵÁк¯Êý´óÈ«-ÍøÉÏÊÕ¼¯µÄһЩASPº¯Êý¼°±í´ïʽ
ASPº¯Êý
´óÈ«¡¡
ASPº¯ÊýÓëVBSCRIPTÀàËÆ£¬ÒÔϾÙһЩ³£Óõĺ¯Êý¡¡
¡¡
Array()¡¡
¡¡
º¯Êý·µ»ØÒ»¸öÊý×é¡¡

¡¡
±í´ïʽ Array(list)¡¡
¡¡
ÔÊÐíÊý¾ÝÀàÐÍ: ×Ö·û£¬Êý×Ö¾ù¿É¡¡
¡¡
ʵÀý£º <%¡¡
¡¡
Dim
myArray()¡¡
¡¡
For i = 1 to 7¡¡
¡¡
Redim Preser ......

aspÍøÕ¾´ÓACCESSתSQLSERVER


ǰ¼¸ÌìÎªÖÆ×÷Ò»¸öÍøÕ¾£¬ÐèÒª´ÓACCESSתÖÁSQLSERVER£¬´ÓÍøÕ¾Éϲ鿴Á˺ܶàµÄ×ÊÁÏ£¬µ«¾õµÃûÓÐÒ»¸öÄܹ»È«Ã渲¸ÇÒªµãµÄ£¬ËùÒÔÎÒ×ܽáһϣ¬Ë³±ã
¸ø³öһЩ¾­Ñé¡£
   
Ê×ÏÈÈç¹ûÒ»¿ªÊ¼¾ÍÐèÒªÖÆ×÷SQLSERVERµÄÍøÕ¾£¬ÄÇô×îºÃ½«ÄãµÄ°®»ú×°ÉÏWINDOWS2000»òÕß2003ÕâÑùµÄSERVER°æ£¬ÕâÑùµÄ°æ±¾ÊÇÖ§³Ö
SQLSERVERÕýʽ ......

[ASP.net]ѧϰasp.netµÄÍêÕûÁ÷³Ì

±¾ÌùÀ´×ÔZDNetChinaÖÐÎÄÉçÇø http://bbs.zdnet.com.cn/
±¾ÌùµØÖ·£ºhttp://bbs.zdnet.com.cn/viewthread.php?tid=108315
 
Èç¹ûÄãÒѾ­Óн϶àµÄÃæÏò¶ÔÏ󿪷¢¾­Ñé£¬Ìø¹ýÒÔÏÂÕâÁ½²½£º
¡¡¡¡µÚÒ»²½¡¡ÕÆÎÕÒ»ÃÅ.NETÃæÏò¶ÔÏóÓïÑÔ£¬C#»òVB.NET ÎÒÇ¿ÁÒ·´¶ÔÔÚûϵͳѧ¹ýÒ»ÃÅÃæÏò¶ÔÏó(OO)ÓïÑÔµÄǰÌáÏÂȥѧASP.NET¡£ ASP.NETÊÇ ......
© 2009 ej38.com All Rights Reserved. ¹ØÓÚE½¡ÍøÁªÏµÎÒÃÇ | Õ¾µãµØÍ¼ | ¸ÓICP±¸09004571ºÅ