change excel to text file export
This commit is contained in:
parent
772fc802a7
commit
db20d97253
@ -412,12 +412,12 @@ Public Class frmKonfig
|
||||
|
||||
Private Sub SpeichereLogAlsToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles SpeichereLogAlsToolStripMenuItem.Click
|
||||
Try
|
||||
SaveFileDialog1.Filter = "Excel Datei|*.xls"
|
||||
SaveFileDialog1.Filter = "Text File|*.txt"
|
||||
If SaveFileDialog1.ShowDialog() = DialogResult.OK Then
|
||||
GridControlLogs.ExportToXls(SaveFileDialog1.FileName)
|
||||
GridControlLogs.ExportToText(SaveFileDialog1.FileName)
|
||||
End If
|
||||
Catch ex As Exception
|
||||
MsgBox("Fehler beim Export: " & ex.Message)
|
||||
MsgBox("Error in Export: " & ex.Message)
|
||||
End Try
|
||||
End Sub
|
||||
End Class
|
||||
Loading…
x
Reference in New Issue
Block a user