有哪位高手帮忙做个简单的程序--关于用vb编程导出数据库内容的

gotosun 中国移动研究院 项目经理  2004-08-27 07:10:15
要求是:
数据库是access,两个列
窗体上有两个输入的框,导入数据 导入按钮
导出按钮 导出一个文本
...全文
57 点赞 收藏 2
写回复
2 条回复
切换为时间正序
当前发帖距今超过3年,不再开放新的回复
发表回复
RUKYO 2004-08-27
'Access数据库导出到Txt文件
'工程->引用->Microsoft ActiveX Data Objects 2.x Library
Option Explicit
Public mCnnString As String

Private Sub Command1_Click()
Dim mCnn As New ADODB.Connection
mCnn.Open mCnnString
mCnn.CursorLocation = adUseClient
mCnn.Execute "Select * Into [Text;DATABASE=" & App.Path & "\].[db1.Txt] From [YourTable]" 'db1.Txt是程序执行后生成,YourTable是db1.mdb其中的一个表
Kill App.Path & "\Schema.ini" '删除临时文件
End Sub

Private Sub Form_Load()
mCnnString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.Path & "\db1.mdb" & ";Persist Security Info=False"
End Sub
回复
danielinbiti 2004-08-27
这个随便找个数据库程序不就成了嘛。

只是记录插入和记录读出写入文本文件
回复
相关推荐
发帖

1188

社区成员

VB 数据库(包含打印,安装,报表)
申请成为版主
帖子事件
创建了帖子
2004-08-27 07:10
社区公告
暂无公告