Çóhtml¶Áд.txtÎļþµÄ´úÂë,¼± - Web ¿ª·¢ / HTML(CSS)
Çóhtml¶Áд.txtÎļþµÄ´úÂë,¼±
ÊÇä¯ÀÀtxtÎļþ¡£¡£»¹ÊÇдÈëÎı¾µ½.txtÎļþ¡£
¿ÉÒÔËÑË÷ÏÂFSO¡£
Êǽ«a.txtÎļþÀïÃæµÄÄÚÈݶÁ³öÀ´·ÅÈëµ½Ò³ÃæÖÐÈ¥¡£¡£
»¹Óн«Ò³ÃæµÄÐÅϢдÈëµ½b.txtÖС£¡£
FSOΪ IIS ÄÚÖÃ×é¼þ£¬Èç¹ûµçÄÔûװIISµÄ»°£¬ÈçºÎ×ö£¿
FSOÍâû½Ó´¥¹ýÆäËûµÄ¡£Ö»ÄܰﶥÁË¡£¡£
htmlÊǿͻ§¶ËÔËÐеĴúÂë
¾ÝÎÒËùÖª£¬html±¾ÉíûÓÐÈκζÔtxtÎļþµÄ¶Áд²Ù×÷´úÂë
Èç¹ûÄãÏëÓÃjavascriptʵÏÖÕâ¸ö¹¦ÄÜ£¬ÄÇôÄãÐèÒª¾ßÓпͻ§¶ËµçÄԵĶÁдȨÏÞ
HTML code:
<%
Dim oRs
Dim oConn
Set oConn = Server.CreateObject("ADODB.Connection")
oConn.Open "Driver={Microsoft Text Driver (*.txt; *.csv)};Dbq=" & Server.Mappath("/") & ";Extensions=asc,csv,tab,txt;"
Sql = "Select * from test.txt"
Set oRs = Server.CreateObject("ADODB.RecordSet")
oRs.Open Sql, oConn, 1, 1
Response.Write "<table border=1 width=400>"
Response.Write "<tr><td>±àºÅ</td><td>Óû§Ãû</td><td>ÃÜÂë</td></tr>"
Do While Not oRs.Eof
Response.Write "<tr><td>" & oRs(0) & " </td><td>" & oRs(1) & " </td
Ïà¹ØÎÊ´ð£º
ÎÒµÄjava applet ǶÈëhtmlºóÎÞ·¨ÏÔʾ£¬¶øÓÃappletviewerÏÔʾÕý³£ÎªÊ²Ã´£¬»¹ÓоÍÊÇÓÃhtml converterת»¯ºó¿ÉÒÔÏÔʾ£¬ÎªÊ²Ã´£¿Çë´óÏÀ´Í½Ì£¡
HTML code:
<HTML>
<HEAD>
<TITLE>TEST.HTML< ......
ÄÄλ¸ßÊÖÄܰïÎÒ½â¾öÕâ¸öÎÊÌ⣺
ÓÐûÓÐcssʵÏÖ±íµ¥µÄÏÂÀ¿ò¼ýÍ·ÓÃͼƬ´úÌæ£¿²»ÓÃjs
ÎÒʹÓÃÁËjsºó£¬ÔÊÐí¿Ø¼þÔËÐÐǰģ¿é±äÐΣ¬ÔÊÐíºó²ÅÕý³£ÏÔʾ£¬ËùÒÔÎÒÏëÔËÓÃcssÀ´ÊµÏÖ¡£
лл£¬ÔÚÏߵȡ£
ºÃÏñ¶¼ÊÇÓÃJS¡£¡£À´ÊµÏÖ± ......
ΪʲôHTMLÒÔ¼°Ò»Ð©ÆäËü±êÇ©»áÏÔÊ¾Ò»Ð©ÌØ¶¨±íÏÖÐÎÊ½ÄØ£¿ÈçHTMLÖеĻ»ÐбêÇ©<BR/>ÔڵײãÊÇÔõÑùʵÏÖµÄÄØ£¿ÏÖʵµÄÔÀíÊÇÊ²Ã´ÄØ
È¥W3C¹Ù·½ÍøÕ¾ÉÏ£¬¿´¿´°É£¡ÎÒÏëÒ»¿´Äã¾ÍÃ÷°×ÁË
ÎҲºͱàÒëÔÀíÓйأ¬ä¯ÀÀÆ÷Àï¿É ......
ÔÚ·¢±íÆÀÂÛʱ ¹ýÂË ÈçºÎ£º<br/> <hr/> Ë«ÒýºÅ µ¥ÒýºÅ »¹ÓÐÆäËû µÈ Óкõķ½·¨¸æËßһϠлл
.replace(/<\w+[^>]*>/g,"").replace(/'/g,"''")
½«µ¥ÒýºÅ»»³É2¸ö ......