Specified argument was out of the range of valid values

[rhepsi]

Hi All...

I Came across this error while populating a combobox from
a datatable (I'm working in VB.NET):

Specified argument was out of the range of valid values.
Parameter name: '-1' is not a valid value
for 'index'


code[VB]

Private Sub PopulatePrManag erCombo()
' This procedure populates the combo box on the
' form with a list of Project Manager from the
' Dms database.

Dim cnSQL As MySqlConnection
Dim cmSQL As MySqlCommand
Dim drSQL As MySqlDataReader
Dim strSQL As String
Dim objListItem As ListItem



Try
' Build Select statement to query Project Manager Name from the Staff
' table.

strSQL = "SELECT tbl_staffs.stf_ first_name, " _
& " tbl_staff_assig nments.sta_staf f_id_fk " _
& " FROM tbl_staffs ,tbl_staff_assi gnments " _
& " WHERE tbl_staffs.stf_ staff_id_pk = tbl_staff_assig nments.sta_staf f_id_fk " _
& " AND tbl_staff_assig nments.sta_cate gory_id_fk = 1 order by tbl_staffs.stf_ first_name"

cnSQL = New MySqlConnection
cnSQL.Connectio nString = connect.Connect ionString
cnSQL.Open()

cmSQL = New MySqlCommand(st rSQL, cnSQL)
drSQL = cmSQL.ExecuteRe ader()

cboPrMgr.Items. Clear()

' Loop through the result set and add the category
' names to the combo box.
Do While drSQL.Read()

objListItem = New ListItem(drSQL. Item("stf_first _name").ToStrin g(), _
Convert.ToInt32 (drSQL.Item("st a_staff_id_fk") ))
cboPrMgr.Items. Add(objListItem )


Loop

' Close and Clean up objects
drSQL.Close()
cnSQL.Close()
cmSQL.Dispose()
cnSQL.Dispose()

Catch e As MySqlException

MsgBox("To run this sample you must have MySql Access" & _
" For instructions on " & _
"installing contact Admin.", MsgBoxStyle.Cri tical, _
"MySql not found")
' Quit program if connection method was not successful.
'End


Catch e As Exception
MsgBox(e.Messag e, MsgBoxStyle.Cri tical, "General Error")
End Try


End Sub


plz help me out...


thnx n regards
hepsi..

[kenobewan]

Did you get a line number for that error?

[rhepsi]

Did you get a line number for that error?

Hii,

The error must be at :
[ERROR]
cmSQL.Parameter s.Add("?Pr_Mana gerID", CType(cboPrMgr. Items(cboPrMgr. SelectedIndex), ListItem).ID).. ......[ERROR]

And moreover when im tryign to clear the form:
[vb code]

Private Sub ClearForm()

' Clear the data entry form.


txtPrCode.Text = ""
txtPrLocation.T ext = ""
---------- cboPrMgr.Select edIndex = -1 ---------------------
txtPrStreet.Tex t = ""
cboState.Select edIndex = -1

[/vb code]


cboPrMgr.Select edIndex= -1 ..... i have a doubt here whther this is correct or not???

plz help..

thnx in advance

[kenobewan]

Why is there a question mark in front of ?Pr_ManagerID? I generally associate -1 with JS have you tried null?

[rhepsi]

Why is there a question mark in front of ?Pr_ManagerID? I generally associate -1 with JS have you tried null?

Thnx for ur reply...

Yes ive tried null but of no use...

1 thing i observed is: few records are being displayed from the combo bx without this error whereas other records are displaying error message.

[kenobewan]

Only thing I can think of is that they are not all in the right format. This is the same error "Parameter name: '-1' is not a valid value". Then try and debug, leave out this parameter and see if the page works. After that write out the value to see what you get. HTH.

[rhepsi]

Only thing I can think of is that they are not all in the right format. This is the same error "Parameter name: '-1' is not a valid value". Then try and debug, leave out this parameter and see if the page works. After that write out the value to see what you get. HTH.

hii,

hey ive done tht tooo...
nw im thinking abt this line...

...objListItem = New ListItem(drSQL. Item("stf_first _name").ToStrin g(), _
Convert.ToInt32 (drSQL.Item("st a_staff_id_fk") ))....

is there any problem here: Convert.ToInt32