Ò׽ؽØͼÈí¼þ¡¢µ¥Îļþ¡¢Ãâ°²×°¡¢´¿ÂÌÉ«¡¢½ö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³ÌÐòµ÷ÓÃÉãÏñÍ·²¢¿ØÖÆÉãÏñÍ·½øÐÐÅÄÕÕ

Õ⼸ÌìºÃ¶àÈËÎÊÎÒÈçºÎÔÚasp³ÌÐòÖпØÖÆÉãÏñÍ·È¥×¥ÅÄÕÕƬ£¬asp¼¼Êõ»¹ÊÇ99ÄêµÄʱºò¿´¹ýÒ»µãµã£¬Ôç¾Í×ÅÃ×·¹³ÔÁË£¬²»¹ý¼ÈÈ»ÓÐÈËÎÊ£¬ÄǾÍÊÇ¿´µÃÆðÔÛ£¬»¨ÁËÒ»¸öÍíÉϵÄʱ¼ä°Ñasp³ÌÐòµ÷ÓÃÉãÏñÍ·ÅÄÕÕµÄÎÊÌâ¸ã¶¨ÁË£¬ÏּǼÈçÏ£¬ÈÃÓÐÀàËÆÐèÇóµÄͬѧ¿ÉÒÔÉÙ×ßЩÍä·¡£
Óõ½µÄ¼¼Êõ£º
1.asp³ÌÐòÖÐ×÷base64±àÂëºÍ½âÂ룬ʹÓõÄÊÇmsxml×é¼þ£ ......

ASPÑ­»·Êä³ö±í¸ñÐÐtrµÄ·½·¨

  <%
for i=1 to rs.recordCount '±äÁ¿i´Ó1Ñ­»·µ½Êý¾Ý¿âÖеÄÈ«²¿¼Ç¼Êý
if (i mod 1 =1) then 'ÿ¸ötr¼´Ã¿ÐÐÏÔʾ1¸ö¼Ç¼,¿É¸ù¾ÝÐèÒª×ÔÐÐÐÞ¸Ä, ½«×ó±ßµÄ1ÐÞ¸ÄΪ2¼´ÏÔʾÁ½ÐС£
response.write "<tr align='center'>"
end if
%>
´Ë´¦ÎªÒªÑ­»·µÄÄÚÈÝ
  <%if (i mod 1 = 0) then ......

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

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

asp .net Ò³Ãæ»Ø³µ´¥·¢button °´Å¥Ê¼þ

1¡£Éî²ã´ÎÀ´ËµÕâ²»ÊÇasp.net µÄÎÊÌ⣬¶øÊÇhtml form µÄsubmit °´Å¥¾ÍÊÇÈçºÎÉè¼Æ¡£
µ±ÄãµÄ¹â±ê½¹µã½øÈëij¸ö±íµ¥ÔªËصÄʱºò£¬»á¼¤»î¸Ã±íµ¥µÄµÚÒ»¸ö£¨
Á÷²¼¾Ö˳´Ó×óµ½ÓÒ£¬´ÓÉÏÖÁÏ£©
type=submit µÄ°´Å¥£¨¼ÙÈçÓУ©£¬µÈ´ýÏìÓ¦»Ø³µÊ¼þ£¬²¢Ìá½»¸Ãform
Äã¿ÉÒÔ²âÊÔһϴúÂë
<form action="">
 <input type ="t ......

[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ºÅ