1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40
| sql = "INSERT INTO Products(ArticleSupply,CompanyId,EntourageId,ProductType,GemBarCode,Image1,Image2,ImageType,Design,SetStyle," & vbCrLf & _
" Occasions, SizeRange, Size, UsSize, Market, Collection, Material, Weight, Karat, CenterStone,Center,GemStone, Color, Shape," & vbCrLf & _
" SizeOfStone, Cut, CaratOfStone, Entourage, " & vbCrLf & _
" TotalCarat,MouldNumber,PriceA,PriceB,PriceC,currency,ManufacturingDate)" & vbCrLf & _
" VALUES " & vbCrLf & _
"( '" & dtt.Rows(i).Item("ArticleSupply") & "'," & vbCrLf & _
" " & dtt.Rows(i).Item("CompanyId") & ", " & vbCrLf & _
" " & dtt.Rows(i).Item("EntourageId") & ", " & vbCrLf & _
" " & dtt.Rows(i).Item("ProductType") & "," & vbCrLf & _
" '" & dtt.Rows(i).Item("GemBarCode") & "', " & vbCrLf & _
" '" & dtt.Rows(i).Item("Image1") & "', " & vbCrLf & _
" '" & dtt.Rows(i).Item("Image2") & "', " & vbCrLf & _
" '" & dtt.Rows(i).Item("ImageType") & "', " & vbCrLf & _
" " & dtt.Rows(i).Item("Design") & ", " & vbCrLf & _
" " & dtt.Rows(i).Item("SetStyle") & ", " & vbCrLf & _
" " & dtt.Rows(i).Item("Occasions") & ", " & vbCrLf & _
" " & dtt.Rows(i).Item("SizeRange") & ", " & vbCrLf & _
" " & dtt.Rows(i).Item("Size") & ", " & vbCrLf & _
" " & dtt.Rows(i).Item("UsSize") & ", " & vbCrLf & _
" " & dtt.Rows(i).Item("Market") & ", " & vbCrLf & _
" " & dtt.Rows(i).Item("Collection") & ", " & vbCrLf & _
" " & dtt.Rows(i).Item("Material") & ", " & vbCrLf & _
" " & dtt.Rows(i).Item("Weight") & ", " & vbCrLf & _
" " & dtt.Rows(i).Item("Karat") & ", " & vbCrLf & _
" " & dtt.Rows(i).Item("CenterStone") & ", " & vbCrLf & _
" " & dtt.Rows(i).Item("Center") & ", " & vbCrLf & _
" " & dtt.Rows(i).Item("GemStone") & ", " & vbCrLf & _
" " & dtt.Rows(i).Item("Color") & ", " & vbCrLf & _
" " & dtt.Rows(i).Item("Shape") & ", " & vbCrLf & _
" " & dtt.Rows(i).Item("SizeOfStone") & ", " & vbCrLf & _
" " & dtt.Rows(i).Item("Cut") & ", " & vbCrLf & _
" " & dtt.Rows(i).Item("CaratOfStone") & ", " & vbCrLf & _
" " & dtt.Rows(i).Item("Entourage") & ", " & vbCrLf & _
" " & dtt.Rows(i).Item("TotalCarat") & ", " & vbCrLf & _
" " & dtt.Rows(i).Item("MouldNumber") & ", " & vbCrLf & _
" " & dtt.Rows(i).Item("PriceA") & ", " & vbCrLf & _
" " & dtt.Rows(i).Item("PriceB") & ", " & vbCrLf & _
" " & dtt.Rows(i).Item("PriceC") & ", " & vbCrLf & _
" " & dtt.Rows(i).Item("currency") & ", " & vbCrLf & _
" " & dtt.Rows(i).Item("ManufacturingDate") & ")" |
Partager