请高手赐教，数据导入问题？

36B 2003-06-05 09:39:18

在vb.net中如何把txt文件的数据导入到sql中？txt文件是excel生成的，用tab或空格分开数据。

...全文

101 12 打赏收藏转发到动态举报

写回复

用AI写文章

12 条回复

切换为时间正序

请发表友善的回复…

发表回复

LongBow007 2003-06-09

打赏
举报

这种文本文件好像也可以当做数据库看待,而且支持sql语句
你的机子上有没有Microsoft Text Driver(*.txt;*.csv)这个驱动程序
试试它吧

36B 2003-06-09

打赏
举报

仍未解决，郁闷ing......

36B 2003-06-09

打赏
举报

Dim fs As New System.IO.FileStream("D:\DATA\market.txt", IO.FileMode.Open)
Dim sr As New System.IO.StreamReader(fs, System.Text.Encoding.GetEncoding("gb2312"))
sr.BaseStream.Seek(0, System.IO.SeekOrigin.Begin)
While (sr.Peek() > -1)
Dim myArray() As String = sr.ReadLine().Split
TextBox1.Text = TextBox1.Text + "INSERT INTO tablename(a,b,c) VALUES('" + myArray(0) + "','" + myArray(1) + "','" + myArray(2) + "',……'" + myArray(x) + "')"

读出数据已解决，代码如上，问题是如何用sql命令写入到数据库中，用下面方法报错：
OleDbConnection1.Open()
OleDbInsert.CommandText = "INSERT INTO tablename(a,b,c) VALUES('" + myArray(0) + "','" + myArray(1) + "','" + myArray(2) + "',……'" + myArray(x) + "')"
OleDbInsert.ExecuteReader()
OleDbConnection1.Close()
应怎样写，请各位高手赐教，感激不尽！！！

dotnba 2003-06-09

打赏
举报

关注

36B 2003-06-06

打赏
举报

谢谢楼上的，对不起，我要的是txt格式的方法。

citylamp 2003-06-06

打赏
举报

将excel表格或是mdb导入sql 2000
Sub Page_Load(sender As Object, e As EventArgs)
Dim myDataset As New DataSet()
Dim myOleDbConnection As OleDbConnection = New OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0;" & _
"Data Source=e:\wish you luck.xls;" & _
"Extended Properties=""Excel 8.0;""")
Dim myOleDbCommand As OleDbCommand = New OleDbCommand("SELECT * FROM [Sheet1$]",myOleDbConnection)
Dim myData As OledbDataAdapter= New OledbDataAdapter(myOleDbCommand)

myData.Fill(myDataset)

DataGrid1.DataSource = myDataset.Tables(0).DefaultView
DataGrid1.DataBind()
End Sub

36B 2003-06-06