本文介绍了您好我有Microsoft Access数据库(.mdb)文件表转换为csv的处理方法,对大家解决问题具有一定的参考价值,需要的朋友们下面随着小编来一起学习吧!
问题描述
请帮助我,先生...
谢谢
praveen
please help me sir...
thank you
praveen
推荐答案
Dim cn As New OleDbConnection
Dim qry As String = "SELECT * FROM YOURTABLE"
Dim myReader As OleDbDataReader
Dim myWriter As New StreamWriter(DIRECTORY AND NAME OF THE FILE)
Try
cn.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & PATH TO YOUR TABLE& ";Persist Security Info=True"
cn.Open()
Using cmd As New OleDbCommand(qry, cn)
myReader = cmd.ExecuteReader()
myWriter.Writeline(ALL YOU HEADERS SEPERATED BY COMMAS)
While myReader.Read()
string line = myReader(FIELD IN YOUR TABLE) +
"," + myReader(FIELD IN YOUR TABLE)
myWriter.Writeline(line)
End While
End Using
myReader.Close()
cn.Close()
Catch ex As Exception
End Try
这是您的意思吗?
is this what you meant?
这篇关于您好我有Microsoft Access数据库(.mdb)文件表转换为csv的文章就介绍到这了,希望我们推荐的答案对大家有所帮助,也希望大家多多支持!