VB实现从EXECL中上传到SQLSERVER，跪求答案，谢谢．

来源：百度知道 编辑：UC知道 时间：2024/05/03 00:43:45
VB实现从EXECL中上传到SQLSERVER，如何定位EXECL中的具体单元格啊．我的做法是把EXECL的单元格放入数组中，再上传到SQL的存储过程中，让存储过程来筛选数据．跪求答案(假如能有完整的答案更好），谢谢．
可否给出更具体的代码,具体过程是:将EXECL中某一列的数据传给一个值,然后通过VB传给SQL的存储过程,最后由数据过程筛选数据.判断哪些写入.存储过程就不用给出来了.VB阶段的代码.谢谢

我有导出的例子，也许会对你有帮助
Private Function ExportDetail(strFileName As String) As Boolean

Dim iRow As Long
Dim myExcel As Excel.Application
Dim xlBook As Excel.Workbook
Dim xlSheet As Excel.Worksheet

On Error GoTo ErrAction
ExportDetail = False

Set myExcel = New Excel.Application
myExcel.Visible = False
myExcel.SheetsInNewWorkbook = 1
Set xlBook = myExcel.Workbooks.Add
Set xlSheet = xlBook.Worksheets(1)

xlSheet.Columns.ClearFormats
xlSheet.Cells(1, 1) = "物料BOM【" & TreeFile.SelectedItem.Text & "】"
xlSheet.Range("A1:U1").MergeCells = True

xlSheet.Cells(2, 1) = "标题项"
xlSheet.Cells(2, 2) = "中文名称"
xlSheet.Cells(2, 3) = "英文名称"
xlSheet.Cells(2, 4) = "文档号"
xlSheet.Cells(2, 5) = "物料号"
xlSheet.Cel