From 6799d84591288874ca5ae484b2a4015151e8339f Mon Sep 17 00:00:00 2001 From: CodingWonders <101426328+CodingWonders@users.noreply.github.com> Date: Sun, 24 Mar 2024 09:08:48 +0100 Subject: [PATCH] Fixed exception --- Panels/Img_Ops/Drivers/ImportDrivers.vb | 4 +++- 1 file changed, 3 insertions(+), 1 deletion(-) diff --git a/Panels/Img_Ops/Drivers/ImportDrivers.vb b/Panels/Img_Ops/Drivers/ImportDrivers.vb index cfb79e8c..e24fa03a 100644 --- 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