<% ' 建立 Connection 物件 Set conn = Server.CreateObject("ADODB.Connection") Driver = "Driver={Microsoft Excel Driver (*.xls)};" DBPath = "DBQ=" & Server.MapPath( "distributor.xls" ) ' 呼叫 Open 方法連結資料庫 conn.Open Driver & DBPath Set rs = Server.CreateObject("ADODB.Recordset") ' 開啟資料來源, 參數二為 Connection物件 rs.Open "Select * From [列網名單$]", conn, 2, 2 %> 無標題文件

亞洲_Asia 大洋洲_Oceania 非洲_Africa 歐洲_Europe 美洲_America 南美洲_SouthAmerica 

 [ 北美洲 ]    [ 中南美洲 ]    [ 非洲 ]     [ 歐洲 ]     [ 亞洲 ]     [ 大洋洲 ]       











Copyright 2004 © FATEK AUTOMATION CORP. All Rights Reserved. This site is best viewed in 1024 x 768 true color with IE5.0+ or Netscape 7.0