ListBox SelectionChange

Alexis_Colon_Lugo · September 11, 2014, 1:29am

I have this code but no works i select one row and the index return -1
way

If ListBox1.Index=-1 Then Return
If Session.ConnMainServer(ListBox1.Cell(ListBox1.ListIndex,0),ListBox1.Cell(ListBox1.ListIndex,1),ListBox1.Cell(ListBox1.ListIndex,2),ListBox1.Cell(ListBox1.ListIndex,3))=False Then
MsgBox “Error No DataBase Found”
Session.DbConnMain.Close
WebCuadres.CompanyLogin1.Close
Exit Sub
End If
Session.StoreName=ListBox1.Cell(ListBox1.ListIndex,0)
WebCuadres.CompanyLogin1.Close
WebCuadres.Show

Greg_O_Lone · September 11, 2014, 1:36am

Try ListBox1.ListIndex instead of Index.

Alexis_Colon_Lugo · September 11, 2014, 3:27am

Thanks
Greg

Emile_Schwarz · September 11, 2014, 11:42am

I got sometimes an error: I use LastIndex instead of ListIndex.

After all, that is an error of one character against 8 that are correct ! ;-

Fortunately, finding this error is easy.