请问想做一窗口如下:
此主题相关图片如下:t1.jpg
“选择文件”控件代码如下:
With e.For m
Dim dlg As New OpenFileDialog
dlg.Filter= "Excel 97-2003文件(*.xls)|*.xls|Excel 2007文件(*.xlsx)|*.xlsx"
If dlg.ShowDialog = DialogResult.Ok Then
.Controls("TextBox1").value = dlg.FileName
.Controls("ComboBox1").Value = ""
.Controls("Table1").Table.DataTable.DataRows.clear()
.Controls("ComboBox1").Select()
End If
End With
例如对应的数据库下(SQL2005)有表名称为部门表,选择的EXCEL文件内容也与数据库表字段一致。
想将EXCEL文件导入到数据库下,请问老师“导入数据”功能按钮处代码应该如何写才能实现功能?