因為乙個客戶要用asp做乙個excel匯入到access的功能，最近查詢了一下相關的文章，現總結了一下精華部分！
其實這個功能的原理很簡單，因為excel本身就可以當做資料庫的，所以只需要將excel作為資料來源，再按需要將其中的字段儲存到資料庫中即可。
本文以access為例，上碼！
dim conn
dim conn2
set conn=createobject("adodb.connection")
conn.open "provider=microsoft.jet.oledb.4.0;jet oledb:database password=;data source=c:\book1.mdb"
'連線資料庫
set conn2=createobject("adodb.connection")
conn2.open "provider=microsoft.jet.oledb.4.0;jet oledb:database password=;extended properties=excel 5.0;data source=c:\book1.xls"
'連線excel表作為資料來源，注意驅動要正確，因為每個版本的excel驅動都有不一樣的，這裡以2003為例
sql = "select * from [sheet1$]" '注意 [sheet1$]中的sheet1為你的excel表中的頁名，要根據你的表中的頁名一致
set rs = conn2.execute(sql) '將資料讀取到記錄集rs
while not rs.eof
sql = "insert into datatablename([a],[b],[c],[d]) values(' "& fixsql(rs(0)) &","& fixsql(rs(1)) &"','"& fixsql(rs(2)) &"','"& fixsql(rs(3)) &"')"
conn.execute(sql)
rs.movenext
wend
conn.close
set conn = nothing
conn2.close
set conn2 = nothing
'修正資料，這裡你可以自己改，這裡只是將'換成''以免拼接sql時出錯
function fixsql(str)
dim newstr
newstr = str
if isnull(newstr) then
newstr = ""
else
newstr = replace(newstr,"'","''")
end if
fixsql = newstr
end function
Excel資料匯入到Grid
方法一 string strcon provider microsoft.jet.oledb.4.0 data source strsource extended properties excel 8.0 string query select from sheet1 sheet1表示表 oledb...
Excel資料匯入到Access
下面是asp的全部程式，需要做的是建乙個test.mdb資料庫和乙個test.xls的excel 查詢excel準備匯入到access sql select from sheet1 要匯入的excel資料裡面的表的名稱，後面一定要加 set rs conn2.execute sql while no...
Excel資料匯入到oracle
excel資料匯入到oracle 第一步 將要匯入的excel檔案開啟，選擇 另存為 在檔案型別那裡選擇 文字.txt 後確定儲存 第二步 開啟記事本，編寫下列的內容 注釋 1 控制檔案標識 2 剛才由excel檔案轉化過來的檔案的路徑 3 向oracle的資料表t network agent ba...