读书人

关于把excel文件中的数据转入sql数据表

发布时间: 2011-12-30 23:30:45 作者: rapoo

关于把excel文件中的数据转入sql数据表中的问题
代码如下:(好像发现数据交错问题,就是行和行之间的数据有交错问题)
Dim myDataSet As DataSet = New DataSet

Dim ConnStr As String = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\2006.xls;Extended Properties=Excel 8.0 "
Dim query As String = "SELECT * FROM [worksheet$] "
Dim oleCommand As OleDbCommand = New OleDbCommand(query, New OleDbConnection(ConnStr))
Dim oleAdapter As OleDbDataAdapter = New OleDbDataAdapter(oleCommand)
oleAdapter.Fill(myDataSet, "product ")


Dim tb1 as datatable
tb1=mydataset.tables( "product ")

Dim drow as datarow
for each drow in tb1.rows

Dim con as sqlconnection
Dim cmd as sqlcommand
Dim strcmd as string
con=new sqlconnection(ConfigurationSettings.AppsettingS( "cp "))
strcmd= "insert product (Vid,Vendorname,TIIitem,FactoryitemID,Description,Producth,ProductW,ProductL,UM,Bag,Inners,MID,Cases,tcbm,Cuft,Fob,DutyP,DutyD,OtherFeeD,TotalFob,Lec,Lwc,P1,FSP,DifftoP1,LwctoP1,Fobadd,Loadingport,LT,Moqpcs,CaseDimensioncmL,CaseDimensioncmW,CaseDimensioncmH,InnerDimensioncmL,InnerDimensioncmW,InnerDimensioncmH,GROSSWEIGHTkg,GROSSWEIGHTLbs,M1,M2,M3,CaseDimensionInchL,CaseDimensionInchW,CaseDimensionInchH,InnerDimensionInchL,InnerDimensionInchW,InnerDimensionInchH) values (@Vid,@Vendorname,@TIIitem,@FactoryitemID,@Description,@Producth,@ProductW,@ProductL,@UM,@Bag,@Inners,@MID,@Cases,@tcbm,@Cuft,@Fob,@DutyP,@DutyD,@OtherFeeD,@TotalFob,@Lec,@Lwc,@P1,@FSP,@DifftoP1,@LwctoP1,@Fobadd,@Loadingport,@LT,@Moqpcs,@CaseDimensioncmL,@CaseDimensioncmW,@CaseDimensioncmH,@InnerDimensioncmL,@InnerDimensioncmW,@InnerDimensioncmH,@GROSSWEIGHTkg,@GROSSWEIGHTLbs,@M1,@M2,@M3,@CaseDimensionInchL,@CaseDimensionInchW,@CaseDimensionInchH,@InnerDimensionInchL,@InnerDimensionInchW,@InnerDimensionInchH) "
cmd=new sqlcommand(strcmd,con)

cmd.parameters.add( "@vid ",sqldbtype.varchar).value=drow( "vid ")
cmd.parameters.add( "@vendorname ",sqldbtype.varchar).value=drow( "vendorname ")
cmd.parameters.add( "@tiiitem ",sqldbtype.varchar).value=drow( "tiiitem ")
cmd.parameters.add( "@factoryitemid ",sqldbtype.varchar).value=drow( "factoryitemid ")
cmd.parameters.add( "@description ",sqldbtype.varchar).value=drow( "description ")
cmd.parameters.add( "@producth ",sqldbtype.varchar).value=drow( "producth ")
cmd.parameters.add( "@productw ",sqldbtype.varchar).value=drow( "productw ")
cmd.parameters.add( "@productl ",sqldbtype.varchar).value=drow( "productl ")
cmd.parameters.add( "@um ",sqldbtype.varchar).value=drow( "u/m ")
cmd.parameters.add( "@bag ",sqldbtype.varchar).value=drow( "bag ")
cmd.parameters.add( "@inners ",sqldbtype.varchar).value=drow( "inner ")
cmd.parameters.add( "@Mid ",sqldbtype.varchar).value=drow( "Mid ")
cmd.parameters.add( "@cases ",sqldbtype.varchar).value=drow( "case ")
cmd.parameters.add( "@tcbm ",sqldbtype.varchar).value=drow( "tcbm ")
cmd.parameters.add( "@cuft ",sqldbtype.varchar).value=drow( "cuft ")
cmd.parameters.add( "@fob ",sqldbtype.varchar).value=drow( "fob ")
cmd.parameters.add( "@dutyp ",sqldbtype.varchar).value=drow( "Duty % ")


cmd.parameters.add( "@dutyd ",sqldbtype.varchar).value=drow( "Duty $ ")
cmd.parameters.add( "@OtherFeeD ",sqldbtype.varchar).value=drow( "Other Fee $ ")
cmd.parameters.add( "@TotalFob ",sqldbtype.varchar).value=drow( "Total FOB (Incl Duty & Fees) ")
cmd.parameters.add( "@Lec ",sqldbtype.varchar).value=drow( "lec ")
cmd.parameters.add( "@Lwc ",sqldbtype.varchar).value=drow( "Lwc ")
cmd.parameters.add( "@P1 ",sqldbtype.varchar).value=drow( "P1 ")
cmd.parameters.add( "@FSP ",sqldbtype.varchar).value=drow( "FSP ")
cmd.parameters.add( "@DifftoP1 ",sqldbtype.varchar).value=drow( "% Diff to P1 ")
cmd.parameters.add( "@LwctoP1 ",sqldbtype.varchar).value=drow( "LWC % to P1 ")
cmd.parameters.add( "@Fobadd ",sqldbtype.varchar).value=drow( "Fob+ 40% ")
cmd.parameters.add( "@Loadingport ",sqldbtype.varchar).value=drow( "Loadingport ")
cmd.parameters.add( "@LT ",sqldbtype.varchar).value=drow( "L/T ")
cmd.parameters.add( "@moqpcs ",sqldbtype.varchar).value=drow( "moqpcs ")
cmd.parameters.add( "@CaseDimensioncmL ",sqldbtype.varchar).value=drow( "Case DimensioncmL ")
cmd.parameters.add( "@CaseDimensioncmW ",sqldbtype.varchar).value=drow( "Case DimensioncmW ")
cmd.parameters.add( "@CaseDimensioncmH ",sqldbtype.varchar).value=drow( "Case DimensioncmH ")
cmd.parameters.add( "@InnerDimensioncmL ",sqldbtype.varchar).value=drow( "InnerDimensioncmL ")
cmd.parameters.add( "@InnerDimensioncmW ",sqldbtype.varchar).value=drow( "InnerDimensioncmW ")
cmd.parameters.add( "@InnerDimensioncmH ",sqldbtype.varchar).value=drow( "InnerDimensioncmH ")
cmd.parameters.add( "@GROSSWEIGHTkg ",sqldbtype.varchar).value=drow( "GROSS WEIGHT kg ")
cmd.parameters.add( "@GROSSWEIGHTLbs ",sqldbtype.varchar).value=drow( "GROSS WEIGHT (Lbs) ")
cmd.parameters.add( "@M1 ",sqldbtype.varchar).value=drow( "M1 ")
cmd.parameters.add( "@M2 ",sqldbtype.varchar).value=drow( "M2 ")
cmd.parameters.add( "@M3 ",sqldbtype.varchar).value=drow( "M3 ")
cmd.parameters.add( "@CaseDimensionInchL ",sqldbtype.varchar).value=drow( "CaseDimensionInchL ")
cmd.parameters.add( "@CaseDimensionInchW ",sqldbtype.varchar).value=drow( "CaseDimensionInchW ")
cmd.parameters.add( "@CaseDimensionInchH ",sqldbtype.varchar).value=drow( "CaseDimensionInchH ")
cmd.parameters.add( "@InnerDimensionInchL ",sqldbtype.varchar).value=drow( "InnerDimensionInchL ")
cmd.parameters.add( "@InnerDimensionInchW ",sqldbtype.varchar).value=drow( "InnerDimensionInchW ")
cmd.parameters.add( "@InnerDimensionInchH ",sqldbtype.varchar).value=drow( "InnerDimensionInchH ")
con.open()
cmd.executenonquery()
con.close()


next

[解决办法]
帮顶....

读书人网 >asp.net

热点推荐