欧美成人精品手机在线观看_69视频国产_动漫精品第一页_日韩中文字幕网 - 日本欧美一区二区

公司開發(fā)工資軟件，最大的問(wèn)題在于數(shù)據(jù)庫(kù)的導(dǎo)入導(dǎo)出方便。導(dǎo)出好辦，咱輸出excel就行了，但是導(dǎo)入呢？想來(lái)想去，采用如下方法：[br]財(cái)務(wù)人員用excel用的比較多，對(duì)格式也比較熟悉，所以，借用這個(gè)機(jī)會(huì)，采用excel保存許多數(shù)據(jù)，然后將這個(gè)excel使用無(wú)組件上傳到服務(wù)器上，然后打開excel，將里面的數(shù)據(jù)寫入到數(shù)據(jù)庫(kù)中。[br][br]無(wú)組件今天不做討論。[br]這里我寫的是將excel中的數(shù)據(jù)讀出來(lái)，然后寫入到數(shù)據(jù)庫(kù)中[br]具體代碼：[br][br]< %[br]'===========================================[br]' 函數(shù)功能：數(shù)據(jù)批量導(dǎo)入[br]' 文章為作者原創(chuàng)，轉(zhuǎn)載請(qǐng)注明文章出處、保留作[br]' 者信息，謝謝支持！[br]' 原理:將excel中的數(shù)據(jù)導(dǎo)入到access[br]'===========================================[br][br]'連接excel數(shù)據(jù)庫(kù)[br]path="./"[br]dim xlsconn,strsource,xlbook,xlsheet,i[br]dim myconn_xsl,xlsrs,sql,objcmd [br]set xlsconn = server.createobject("adodb.connection") [br]set xlsrs = server.createobject("adodb.recordset")[br][br]filename="商品" [br]file2="商品列表" [br]source=server.mappath(path&filename&".xls")[br][br]myconn_xsl="provider=microsoft.jet.oledb.4.0;data source=" &source& ";extended properties=excel 8.0"[br]xlsconn.open myconn_xsl [br][br]sql = "select * from ["&file2&"$]"[br]xlsrs.open sql,xlsconn,1,1 [br]if xlsrs.eof then[br]else[br]i=1[br]response.write ""[br]do while not xlsrs.eof [br]goods_name=xlsrs("商品名")[br]goods_images=xlsrs("圖片")[br]cat_id=xlsrs("商品分類")[br]%>[br][br][br] [br] [br] [br][br][br]<% [br] sql="insert into goods(goods_name,goods_images,cat_id) values('"&goods_name&"','"&goods_images&"',"&cat_id&")"[br] conn.execute(sql)[br]i=i+1 [br]xlsrs.movenext[br] loop [br]response.write "

<%=goods_name%>

<%=goods_images%>

<%=cat_id%>

"[br]end if[br]xlsrs.close[br][br]response.write "共導(dǎo)入" & i-1 & "條記錄.
" & vbcrlf[br][br]set xlsconn=nothing [br]set objcmd=nothing[br][br]% >[br][br]這里的圖片要使用ftp上傳到指定的目錄images下面，這樣就行