Recent content by mgmslate

Have you considered creating a recordset using your criteria and have storageItemsCount = RecordCount. Mike

If you are using a bound form try rs.edit instead of rs.addnew. Mike

You could add another column where deposits are positive numbers and withdrawls are negative and use that column for your running balance. Mike

If you want to make the first form visible try using Forms(0).Visible = True in the onload event in your second form. Mike

Use a list box to show your events instead of a textbox. Create a SQL string to capture your events and loop through each listbox to set the rowsource to your SQL string. Mike

Try this in your command button on click event using your report name and your id fields. Dim stDocName As String Dim strCriteria As String stDocName = "myreport" strCriteria = "myid = " & [myID] DoCmd.OpenReport stDocName, acPreview, , strCriteria Mike

Save a copy of your form as a report, then put a command button on your form to print the report. Mike

I created a calendar based on gol4's faq(thankyou) and put a listbox under each textbox. The listbox recordsouce is a sql string which pulls the companyname by date from my appointments table. I set an on click event on the listbox to open a form to show all details regarding the appointments by...

In my access handbook (Access 2000 VBA )there is some code to send info from the text boxes on your form to OutLook. I created a form called frmemail and 3 text boxes, txtemail to hold the email address and 2 to hold test info so I could test it. Create command button On Click Event Dim...

Create an unbound combo box on the form you want the data filled in and in the After Update event put in the following ' Find the record that matches the control. If CboClient <> &quot;&quot; Then Me.RecordsetClone.FindFirst &quot; [Clientid] = &quot; & Me![CboClient] ' Me.Bookmark...

Set enabled to no on your text box and use a check box to enable them. If the text box is not enabled then all records will return. Use a msgbox to warn user if the check box is yes and the text box is null. Mike

I have a form where I choose the parameters and pass them to another form in the form open where condition. Dim strcriteria As String If chklengthID Then strcriteria = strcriteria & &quot; AND lengthID = &quot; &_ cbolengthID End If If chksupplierID Then strcriteria = strcriteria &...

I am trying to export customer info from a form to bookmarks in a word doc. The first time it works fine, the next time I get run-time error 462 the remote server machine does not exist or is unavailable and the template opens with no info in the bookmarks. After I close the document and end out...

Application.FollowHyperlink &quot;mailto:&quot; & textbox Mike

Not sure if this it what you are looking for but I have a form with several checkboxes and comboboxes. If the checkbox = true then I pass the value in the combobox to the report using the where condition. Dim sWHERE As String If chklengthID Then sWHERE = sWHERE & &quot; AND lengthvalue =...