TS active ka pa ba dto sa thread mo? may papatulong sana ako sa program ko e
Language: VB.Net
Program: SQLEXPRESS to Excel 2007 (xlsx)
Newbie lang kasi ako sa program and may data ako na almost 100k + kaso ang data extraction ko is cell by cell
Eto TS yung sample ng 1 by one extraction ko
umaabot ng 10secs pero 300 lines e
For i = 0 To dt.Rows.Count - 1
myExcel.ActiveCell.Value = dt.Rows(i).Item(0)
myExcel.ActiveCell.Offset(0, 1).Value = dt.Rows(i).Item(1)
myExcel.ActiveCell.Offset(0, 2).Value = dt.Rows(i).Item(2)
myExcel.ActiveCell.Offset(0, 3).Value = dt.Rows(i).Item(3)
myExcel.ActiveCell.Offset(0, 4).Value = dt.Rows(i).Item(4)
myExcel.ActiveCell.Offset(0, 5).Value = dt.Rows(i).Item(5)
myExcel.ActiveCell.Offset(0, 6).Value = dt.Rows(i).Item(6)
myExcel.ActiveCell.Offset(0, 7).Value = dt.Rows(i).Item(7)
myExcel.ActiveCell.Offset(0, 8).Value = dt.Rows(i).Item(8)
myExcel.ActiveCell.Offset(0, 9).Value = dt.Rows(i).Item(9)
myExcel.ActiveCell.Offset(0, 10).Value = dt.Rows(i).Item(10)
myExcel.ActiveCell.Offset(0, 11).Value = dt.Rows(i).Item(11)
myExcel.ActiveCell.Offset(0, 12).Value = dt.Rows(i).Item(12)
myExcel.ActiveCell.Offset(0, 13).Value = dt.Rows(i).Item(13)
myExcel.ActiveCell.Offset(0, 14).Value = dt.Rows(i).Item(14)
myExcel.ActiveCell.Offset(0, 15).Value = dt.Rows(i).Item(15)
myExcel.ActiveCell.Offset(1, 0).Select()
Next
TY in advance.. nag try na ko maghanap e kaso di ko ma gets yung ibang tutorial almost a month ko na poblema to TS sana matulungan mo ko.