Microsoft
Software
Hardware
Network
Question : Help with recordsets
I have a tab control with several pages and each page contains a subform. I would like to display the recordcount of the subform in the tabcontrol page caption, but I can't seem to figure out how to do it correctly.
I am using this code:
Dim db As DAO.Database
Dim rst As DAO.Recordset
Set db = currentdb()
Set rst = db.OpenRecordset("T_ITEM_N
BR_LINKS",
dbOpenDynaset)
rst.FindFirst "ITEM_NBR = " & Me.id
If rst.NoMatch Then
Me.TabCtl48.Pages(6).Visib
le = True
Me.TabCtl48.Pages(6).Capti
on = "links (0)"
Else
Me.TabCtl48.Pages(6).Visib
le = True
Me.TabCtl48.Pages(6).Capti
on = "links (" & rst.RecordCount & ")"
End If
rst.Close
But I get a links (965) caption, which is all of the records in the table.
How can I drill down to only those links pertaining to the ITEM_NBR that is on the form field 'me.id' ?
Thanks...
Answer : Help with recordsets
change this
Me.TabCtl48.Pages(6).Capti
on = "links (" & rst.RecordCount & ")"
to
Me.TabCtl48.Pages(6).Capti
on = "links (" & me.[nameofsubform].form.re
cordsetclo
ne.RecordC
ount & ")"
Random Solutions
How to run DBCC CHECKDB
Outlook 2007 is "Always on Top"
odbc--insert on linked table
Excel Question
IRR function - project with all negative periods
Formula, Function or Macro that will eliminate the last 6 characters from a cell value
how to run SSIS package until it succeeds
Printing mutipul pages VB.NET 2005
problem sending email from asp pae
LINQ to SQL insertonsubmit, multiple instances before submitchanges