目的自定义地址与文件名，导出去掉双引号，不知道哪里出错了，谢谢 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Dim dlg As New SaveFileDialog
dlg.Filter= "TXT文件|*.txt" '设置筛选器
If dlg.ShowDialog = DialogResult.Ok Then
    Dim ex As New Exporter
    ex.SourceTableName = "表A"
    ex.Header= False
    ex.FilePath = FileSys.GetParentPath(dlg.FileName)
    ex.NewTableName = FileSys.GetName(dlg.FileName.replace(".txt", "")
    ex.Format ="Delimited"
    ex.Export()
    Dim str As String = FileSys.ReadAllText(dlg.FileName, Encoding.Default)
    str = str.replace("""", "")
    FileSys.WriteAllText(dlg.FileName, str, False, Encoding.Default)
End If

主题：目的自定义地址与文件名，导出去掉双引号，不知道哪里出错了，谢谢