run time error:item cannot be found in teh collection corresponding to the requested

[indhu]

Hi

its not working, i want only distinct record. here its repeated records coming.

accdb = "SELECT DISTINCT sequence FROM scene WHERE sceneid = '" & myquery & "' "

and when i select the first record in combo it says run time error:
item cannot be found in teh collection corresponding to the requested name or ordinal. but not for second records


help me. wht problem am facing

[Killer42]

Hi
its not working, i want only distinct record. here its repeated records coming.
accdb = "SELECT DISTINCT sequence FROM scene WHERE sceneid = '" & myquery & "' "
and when i select the first record in combo it says run time error:
item cannot be found in teh collection corresponding to the requested name or ordinal. but not for second records

To have much hope of sorting out wha is happening, I think we will need to see more of the code. Especially the line which produces the error.

Also, what version of VB are you using?

[indhu]

To have much hope of sorting out wha is happening, I think we will need to see more of the code. Especially the line which produces the error.

Also, what version of VB are you using?

VB 6.0 enterprise edition

Private Sub scenecombo_Click()
 
myconnection
 
myquery = scenecombo.Text
 
Call sceneLOAD
 
 Do While storyboard!sceneid <> myquery  error comes at this place
 storyboard.MoveNext
 If storyboard!sceneid = myquery Then
 
Call rLOAD
 
 panel_txt.Text = storyboard!panel
 sequcombo.Text = storyboard!sequence
 action_txt.Text = storyboard!Action
 dialogue_txt.Text = storyboard!dialogue
 Image1.Picture = LoadPicture(storyboard!Filename)
 
 End If
 Loop
 
 
accdb = "SELECT sceneid FROM scene WHERE sceneid = '" & myquery & "' "
'Load SQL query into a variable
 
Set storyboard = CON.Execute(accdb, adOpenStatic)
 
End Sub