From main form:
Code:
NumberOfRecords = MySubform.Form.Recordset.Recordcount
Code:
NumberOfRecords = Me.Recordset.RecordCount
LBryant
Last Activity: Feb 4 '09, 10:38 PM
Joined: Mar 31 '08
Location: San Antonio, Texas (USA)
-
If you are getting the recordcount of your subform from the main form or the subform itself, you can use the RecordCount property. In this example, MySubform is the "name" of the Subform control on your main form.
From main form:
In the subform's code, you can use:
-
This is in the "when all else fails" category". Did you try deleting the text box control and creating a new one from your memo field? Also, what happens if you write the field to the immediate window? Do you see all of the text?Leave a comment:
-
I've used a DOS batch file as a shortcut to open Access and run a specific Macro. It's what ADezii is referring to, I believe. In a notepad file type:
For example:Code:@echo off "[full path to local Access application]" "[full path to database]"/x "[Name of Macro]" cls
...Code:@echo off "C:\Program Files\Microsoft Office\OFFICE11\MSACCESS.EXE" "\\Pclfile2\ccwork\Communication
Leave a comment:
-
OMG!
Well, I sensed the solution would be something much simpler. Talk about making life complicated. I'm now balancing feelings of chagrin and relief. Well, that's how we learn, yes?
Thanks mshmyobLeave a comment:
-
Reverting a form's recodset fields if user cancels
First of all, I want to say how thrilled was to find this forum and how much I value the expertise here. Now, here's my quandry.
I have a form bound to a query that pulls a single record from a table (tblCommunicati onProjects). The form's controls are bound to it's recordset. If the user makes changes and then cancels, I want to revert all values in the record to their original values. I have this working, but it's cludgy and requires... -
If it's a bound control, use AfterUpdate rather than LostFocus
Would that work? It doesn't need to be inside the form_current event does it?Code:Private Sub PHIconsultantcombo_AfterUpdate() If PHIconsultantcombo.Text <> "" then = PHIconsultantcombo.Locked = True End SubLeave a comment:
-
You can use a List Box control for displaying information in columns, yes?Leave a comment:
-
Well, my IT support got back to me with an explanation. It is indeed a result of a MS security patch. Here's what he sent me:
---------------------------------------------------------------------------------------
Issue: Access - Customer is trying to repair and compact his/her database and it creates a compacted db1.mdb file instead
Cause: This is likely due to an upgrade to Office 2003 11.0_3 and all...Leave a comment:
-
Problems with "Compact and Repair"
This is a more general question, although I rely mostly on VBA for my Access design.
This issue only started recently and has me worried. I have a dabase named Media calendar.mdb. When I use the "Compact and Repair" utility, MS Access creates a new copy named "db1.mdb" and leaves the original file untouched.
This has never happened before. Can anyone tell me why this is happening? I do this manually... -
Thanks for the resource Nic;o)
I sent him a message asking if the installer has to modify the end-users' computer registry. In my corporate development environment, I can't do that easily. :o(Leave a comment:
-
Rich text box in Access forms?
Is there any way, in Access 2003, to offer rich text input without modifying the registry. I'm in a corporate environment where that is not possible.
When a RichText control is added to a form, I see this:
'Microsoft Access Dosen't Support this Active X control.'
I've tried using the WordPad ActiveX contol which works, but its messy and confusing for the users.
Anyone have a solution for... -
Stuff an array with your recipients, then iterate through the array to add your recipients to a message.
...Code:For i = 0 To UBound(gRecipientList) 'add recipients from array If gRecipientList(i) = "" Then Exit For Set objOutlookRecip = .Recipients.Add(gRecipientList(i)) 'add to requestor list objOutlookRecip.Type = olTo Next i For i = 0 To UBound(gAttachmentList)Leave a comment:
-
Why not use:
I don't believe this creates an .ldb lock file. You then can manipulate tables in MyOtherDatabase .Code:Dim MyOtherDatabase as Database Set MyOtherDatabase = OpenDatabase("Path to your external DB")Leave a comment:
-
Thanks FishVal. Here's what I discovered. In Access there were references pointing to 2 different versions of the Microsoft Common Controls -- version 5 and 6. Once I removed the reference to version 5, the Function() control worked without error.
You were correct that the Format function is supported in the VBA library. What I don't understand is why the errant reference caused that particular error.
I also can't understand...Leave a comment:
-
I think you are right. The Object Browser shows it's part of the VBA library.
Here's what I'm using:
This displays Feb 10, 2008 in the text field. If that's the case, and everything else works, why would the Format function cause an error on only one machine?Code:txtStartDate = Format(strStartdate, "mmm dd" & ", " & "yyyy")
Leave a comment:
-
Problems with MSCOMCT2.OCX ActiveX control
Our team is using a project tracking application built in Access 2000 and upgraded to 2003. We have MS Office 2003 installed on all computers.
On several forms, we're using the Format() function to display dates as "mmm dd, yyyy". The Format function is supported by MSCOMCT@.OCX according to the object browser.
This function causes an error on one of the workstations. Originally, the references dialog showed... -
Does this need to be done on all en-user machines?Leave a comment:
No activity results to display
Leave a comment: