INIT OK 20.1.4

2020-06-09 10:30:25 +02:00
parent 96e5588d9d
commit 291939e03f
25 changed files with 54 additions and 60 deletions
@@ -32,7 +32,7 @@ Public Class GIROInfo_VC
        Dim _OpenFileDialog As New OpenFileDialog
        _OpenFileDialog.Filter = "xls Files (.xls)|*.xls|xlsx Files (.xlsx)|*.xlsx|All Files (*.*)|*.*"
        _OpenFileDialog.FilterIndex = 1
-        If _OpenFileDialog.ShowDialog() = Windows.Forms.DialogResult.OK And (Not String.IsNullOrEmpty(_OpenFileDialog.FileName)) Then
+        If _OpenFileDialog.ShowDialog() = System.Windows.Forms.DialogResult.OK And (Not String.IsNullOrEmpty(_OpenFileDialog.FileName)) Then
            Dim _xlsFile As String = _OpenFileDialog.FileName
            _cs = "Provider=Microsoft.ACE.OLEDB.12.0;"
            _cs += "Data Source=" & _xlsFile.ToString & ";"