Fixed exception

CodingWonders · Mar 24, 2024 · 6799d84 · 6799d84
1 parent 9158e12
commit 6799d84
Showing 1 changed file with 3 additions and 1 deletion.
diff --git a/Panels/Img_Ops/Drivers/ImportDrivers.vb b/Panels/Img_Ops/Drivers/ImportDrivers.vb
@@ -17,7 +17,9 @@ Public Class ImportDrivers
             MsgBox(msg, vbOKOnly + vbInformation, Label1.Text)
             Exit Sub
         Else
-            If DIList(ListView1.FocusedItem.Index).Name = Path.GetPathRoot(Environment.GetFolderPath(Environment.SpecialFolder.Windows)) Then ImportSourceInt = 1
+            If ListView1.SelectedItems.Count = 1 Then
+                If DIList(ListView1.FocusedItem.Index).Name = Path.GetPathRoot(Environment.GetFolderPath(Environment.SpecialFolder.Windows)) Then ImportSourceInt = 1
+            End If
             Select Case ImportSourceInt
                 Case 0
                     If TextBox1.Text <> "" Then