SystemReady = False
Dim mg As New Merger
Dim Lujin As String = e.Form.Controls("Label1").Text
mg.SourcePath = Lujin
Dim Geshi As String = Lujin.SubString(Lujin.Length-3)
Dim STN As String = e.Form.Controls("TextBox1").Value
If Geshi = "xls" Then
mg.Format = "excel"
STN = STN & "$"
End If
mg.SourceTableName = STN
mg.DataTableName = e.Form.Controls("TextBox2").Value
mg.Merge()
SystemReady = True
这个是确认导入按钮的代码
TextBox1 是导入源表名输入框
TextBox2 是导入表表名输入框