ªð¦^¦Cªí ¤W¤@¥DÃD µo©«

[¤À¨É] Àò¨úexcel¤º®e¨ì­¶­±

[¤À¨É] Àò¨úexcel¤º®e¨ì­¶­±

(«e´£¡G§A­n¤¹³\浏Äý¾¹³X°Ý¥»¦a)
  1. <html>
  2. <head>
  3. <title>Untitled Page</title>
  4. </head>
  5. <script language="javascript" type="text/javascript">
  6. function importXLS(fileName)
  7. {
  8.         objCon = new ActiveXObject("ADODB.Connection");
  9.         objCon.Provider = "Microsoft.Jet.OLEDB.4.0";
  10.         objCon.ConnectionString = "Data Source=" + fileName + ";Extended Properties=Excel 8.0;";
  11.         objCon.CursorLocation = 1;
  12.         objCon.Open;
  13.         var strQuery;
  14.         var strSheetName = "Sheet1$";
  15.         var rsTemp = new ActiveXObject("ADODB.Recordset");
  16.         rsTemp = objCon.OpenSchema(20);
  17.         while(!rsTemp.EOF)
  18.         {
  19.                 if (rsTemp("TABLE_TYPE")=="TABLE")
  20.                 {
  21.                         //alert(rsTemp("TABLE_NAME"));
  22.                         rsExcel = new ActiveXObject("ADODB.Recordset");
  23.                         strQuery = "SELECT * FROM [" + rsTemp("TABLE_NAME") + "]";
  24.                         rsExcel.ActiveConnection = objCon;
  25.                         rsExcel.Open(strQuery);
  26.                         mm=rsTemp("TABLE_NAME")+"ªí内®e<br><table  border='1' cellspacing='0' cellpadding='0'>"
  27.                         for(i = 0;i<rsExcel.Fields.Count;++i)
  28.                                 {
  29.                                         mm=mm+"<td>"+rsExcel.Fields(i).name+"</td>";
  30.                                 }
  31.                         while(!rsExcel.EOF)
  32.                         {
  33.                                 mm=mm+"<tr>"
  34.                                 for(i = 0;i<rsExcel.Fields.Count;++i)
  35.                                 {
  36.                                         mm=mm+"<td>"+rsExcel.Fields(i).value+"</td>";
  37.                                 }
  38.                                 mm=mm+"</tr>"
  39.                                 rsExcel.MoveNext;
  40.                         }
  41.                 }
  42.                 document.write(mm+"</table><br>")
  43.                 mm=""
  44.                 rsExcel = null
  45.                 rsTemp.MoveNext;
  46.         }
  47.         objCon.Close;
  48.         objCon =null;
  49.         rsExcel = null;
  50. }
  51. </script>
  52. </head>
  53. <body>
  54. <input type="file" id="f" />
  55. <input type="button" id="b" value="Åã¥Ü¤u§@鷺®e" onClick="if(f.value=='')alert('½Ð¿ï¾Üxls¤å¥ó');else importXLS(f.value)" />
  56. </body>
  57. </html>
½Æ»s¥N½X

¦^´_ 1# HHAAMM


   
1.gif
2010-10-19 21:47

TOP

ÁÂÁ¡A«Ü¤£¿ù¡A¨C­Ó¤u§@ªí¤º®e³£§ì¥X¨Ó¤F¡C
¥Ø«eÁÙ¤£ª¾¹D§@¦ó¨Ï¥Î¡A¤U¦¸¸I¨ì¦³·lÃa¤å¥ó®É¸Õ¸Õ¯à¤£¯à§ì¥X¨Ó¡C

TOP

«e¦~¡A³æ¦ìÅý½s¼g­Ó¦b¤ººôùبϥΪººô¯¸¡A¬ðÀ»¤F¨â­Ó¬P´Áªºasp«áÁ`ºâ¬Oµ¹¹ï¥I¥X¨Ó¤F¡C¦b¾Ç²ß¤¤·P¨ì¡A¦h¥Î¤_«È¤áºÝªºjavascript¬½¦³·N«ä¡A¤S¦]爲³ßÅwexcel¡A©Ò¥H¸ÕµÛ±N¨âªÌµ²¦X°_¨Ó¡C³o­ÓÀ³¸Ó¨S¦³¤°麽¹ê¥Î»ù­Èªº¡A½sµ{«ä¸ô¬O¥ÎADO³X°Ý¼Æ¾Ú®w¡A¨ä¹ê¬O¬½Â²³æªº¡C

TOP

«Ü¦n©_¡A¦³¬Ý¨ìrsTemp = objCon.OpenSchema(20);¤ÎobjCon.Close;
¨ì©³excel¦³¨S¦³¥´¶}¡H
­Y·lÃa¤F¥¿±`µLªk¶}±Òªº¤å¥ó¯à§_¨ú¨ì¼Æ¾Ú¡H

TOP

        ÀR«ä¦Û¦b : ºw¤ô¦¨ªe¡C²É¦Ì¦¨ÅÚ¡A¤Å»´¤vÆF¡A¤Å¥Hµ½¤p¦Ó¤£¬°¡C
ªð¦^¦Cªí ¤W¤@¥DÃD