以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  上报按钮代码,版主看看,谢谢  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=3637)

--  作者:杨浩
--  发布时间:2009/7/21 8:57:00
--  上报按钮代码,版主看看,谢谢
Dim dlg As New SaveFileDialog \'指定一个新的SaveFileDialog
dlg.Filter= "上报文件|*.mdb" \'设置筛选器
dlg.OverwritePrompt =
If dlg.ShowDialog = DialogResult.Ok Then \'如果用户单击了确定按钮
Dim ex as New Exporter
ex.SourceTableName = "调资基础数据" \'指定导出表
ex.filepath =  \'指定目标文件
ex.Export() \'开始导出
MessageBox.Show("成功生成上报数据!!!", "提示", MessageBoxButtons.OK,MessageBoxIcon.Information)  
End If

1、dlg.OverwritePrompt =    如何使用?
2、ex.filepath =  \'指定目标文件   如何设置成
Dim dlg As New SaveFileDialog \'指定一个新的SaveFileDialog
dlg.Filter= "上报文件|*.mdb" \'设置筛选器
dlg.OverwritePrompt =
If dlg.ShowDialog = DialogResult.Ok Then \'如果用户单击了确定按钮
这段代码出现窗口自己选择的路径和自己录入的文件名?
谢谢

--  作者:杨浩
--  发布时间:2009/7/21 9:22:00
--  
各位版主帮帮忙,看看,谢谢
--  作者:杨浩
--  发布时间:2009/7/21 9:33:00
--  
各位版主帮帮忙,看看,谢谢

--  作者:yangming
--  发布时间:2009/7/21 9:34:00
--  

加了一个可选表名的文本框

 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:上报文件.table


--  作者:梦倩
--  发布时间:2009/7/21 9:35:00
--  
我做的上报数据的按钮:

Dim dlg As New SaveFileDialog
dlg.Filter= "上报文件|*.mdb"
dlg.OverwritePrompt = True
If dlg.ShowDialog = DialogResult.Ok Then
    Dim ex as New Exporter
    ex.SourceTableName = "订单"
    ex.NewTableName = "订单"
    ex.Format = "Access"
    ex.filepath =  dlg.filename
    ex.Export() 
    MessageBox.Show("上报数据完成!", "提示", MessageBoxButtons.OK,MessageBoxIcon.Information)
End If

--  作者:杨浩
--  发布时间:2009/7/21 10:16:00
--  
 

l         FilePath字符型,指定目标数据库文件名,含文件路径。如果导出格式是dBASE或者文本文件,那么只需指定路径。


导成TXT或DBF如何实现?
--  作者:杨浩
--  发布时间:2009/7/21 10:17:00
--  
Dim dlg As New SaveFileDialog
dlg.Filter= "上报文件|*.TXT"
dlg.OverwritePrompt = True
If dlg.ShowDialog = DialogResult.Ok Then
    Dim ex as New Exporter
    ex.SourceTableName = "调资基础数据"
    ex.Format = "Delimited"
    ex.filepath =  dlg.filename
    ex.Export()
    MessageBox.Show("上报数据完成!", "提示", MessageBoxButtons.OK,MessageBoxIcon.Information)
End If

提示路径错误
--  作者:杨浩
--  发布时间:2009/7/21 10:18:00
--  
如何实现动态选择的路径和录入的文件名?
--  作者:杨浩
--  发布时间:2009/7/21 10:20:00
--  
老六应该做一个这方面的例子,任何多单位使用的软件都存在上报、接收、备份、恢复、下发!!!!
--  作者:杨浩
--  发布时间:2009/7/21 10:21:00
--  
既然要搞开发版就要完善这方面!!!开发出来的软件肯定是多单位使用的