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
change a sourceobject for a subform
VBA Excel Target & Intersect
DevExpress export from QuantumGrid specific for WINDOW1, WINDOW2
autovalue t-sql sql server 2008
VSNDSYS.386
Programming Help - vb.net/C# app to click in another application window using Win API or sendmessage
Date conversion
Microsoft SSIS Service failed to start. Error: Class not registered (Exception from HRESULT: 0x80040154 (REGDB_E_CLASSNOTREG))
MS Project 2007, How to add a Column 'Percent'
vb.net selected item from listview