|
Question : Item cannot be found in the collection corresponding to the requested name or ordinal (MS ACCESS)
|
|
Hi, I don't understand what is wrong in there,
If Not IsNull(txtID.Value) Then Const conNumButtons = 8 Dim con As Object Dim rs As Object Dim stSql As String Dim strID As Integer strID = Me.txtID.Value ' Open the table of Switchboard Items, and find ' the first item for this Switchboard Page. Set con = Application.CurrentProject.Connection stSql = "SELECT no_facture FROM tblFacture" stSql = stSql & " WHERE tblFacture.no_dossier1 like " & strID & "" stSql = stSql & " OR tblFacture.no_dossier2 like " & strID & "" stSql = stSql & " OR tblFacture.no_dossier3 like " & strID & "" stSql = stSql & " OR tblFacture.no_dossier4 like " & strID & "" stSql = stSql & " OR tblFacture.no_dossier5 like " & strID & "" stSql = stSql & " OR tblFacture.no_dossier6 like " & strID & "" stSql = stSql & " OR tblFacture.no_dossier7 like " & strID & "" stSql = stSql & " OR tblFacture.no_dossier8 like " & strID & "" stSql = stSql & " OR tblFacture.no_dossier9 like " & strID & "" stSql = stSql & " OR tblFacture.no_dossier10 like " & strID & ";" Set rs = CreateObject("ADODB.Recordset") rs.Open stSql, con, 1 ' 1 = adOpenKeyset ' If there are no options for this Switchboard Page, ' display a message. Otherwise, fill the page with the items. If IsNull(rs![ItemText]) Then Me.txtFacture.Visible = False Me.lblFacture.Visible = False Else Me.txtFacture.Value = rs![ItemText] Me.txtFacture.Visible = True Me.lblFacture.Visible = True End If
' Close the recordset and the database. rs.Close Set rs = Nothing Set con = Nothing End If
I'm trying to get the value in the recordset and display it in the txtFacture textbox. I getting the error message : Item cannot be found in the collection corresponding to the requested name or ordinal.
Plz help. Its urgent.
Regards
|
|
Answer : Item cannot be found in the collection corresponding to the requested name or ordinal (MS ACCESS)
|
|
Your select statement that is used as the resord source for the recordset rs starts stSql = "SELECT no_facture FROM tblFacture"
the Field no_facture is the only field in the recordset
but in your code you have rs![ItemText]. You have not selected ItemText. You need to have rs![no_facture] or rs(0), or add ItemText as part of the select
i.e. stSql = "SELECT no_facture, ItemText FROM tblFacture"
|
|
|
|