Search results

Decent idea, but I don't recall anything in the original post about needing to know when a record was deleted or by whom. Seemed to only be concerned with limiting the view of certain records and maintaining older records somewhere else, hence the yes/no recommendation.

Why not add a field to the table in question called "Deleted". Make it a Yes/No field. Change the record source of the form to ONLY include those that are NOT Deleted. Make a button that changes the value of the Deleted field for a record from False to True. Make another form that shows ONLY...

change the control source of the point_total text box to: =IIf(IsNull([Combo15]),"",Nz(DSum("Points","tbl_points","ChildID = " & [Combo15] & " AND Active = 0"))+[text19])

Moe, Not sure I can help. You may have to change the field name. For future reference, use the following as a guideline for creating fields and other objects in your databases... Access Naming Conventions Note: No spaces (use underscore to separate words) AND Avoid !@#$%^&*() characters.

Download WinZip

All I'm saying is, you come on here as a juinior member and have the nerve to pick a fight with one of the most productive people on the forum. That's not a great way to get help around here. Hence, you are not the sharpest knife in the drawer. Some advice: don't do a data dump on the forum...

All I'm saying is, you come on here as a juinior member and have the nerve to pick a fight with one of the most productive people on the forum. That's not a great way to get help around here. Hence, you are not the sharpest knife in the drawer. Some advice: don't do a data dump on the forum...

You're not the sharpest knife in the drawer, huh Choksy.

Jack, I completely agree.

Try this...

This works for me... Dim db As DAO.Database Dim rs As DAO.Recordset Dim strMsg As String strMsg = "The item you entered is not in the available list." If MsgBox(strMsg, vbQuestion + vbYesNo, "Add New?") = vbNo Then Response = acDataErrContinue Screen.ActiveControl...

Remove the double quotes after the closing # on TodaysDate and between the AND and MonthForward. Should work if it looks like this... =DLookUp("[Price]","tblPrice","[LocationID] = " & [Location] & " And [Date]=#" & [TodaysDate] & "# And [MonthForward] = #01/01/2004#")

Quick answer would be to import everything, then run a delete query to remove the records that don't match your criteria.

To split a database... Go to Explorer, and find your database. Copy and Paste it in the same folder. Change the name of one of the identical files to identify it as the back end or data file... So you would have: Employees.mdb and Employees_Back.mdb Open Employees.mdb and delete all tables...

Not sure I understand the question...

By the way, this is what I did for Mr. Moe.

If you are trying to pull anything other than the bound column data, you need to refer to the Columns. Columns are zero based, so the first column would be 0. If the name appears in the second column of the combo box, then: [Forms]![caseinput]![Infonum]![investigator] =...

Try this... You can thank Rich for the running sum code.

Do you have a reference set to a Microsoft Word Object library? Go to any code module. Then Tools>>References menu and see if there's a check next to MS Word. If there isn't, check one. Your code should work if the reference is set.

Archie, Are you storing the value that you entered for CategoryID in a variable? What you are trying to do is add a new record. In the table, "tblIssue", a new record cannot be added because you are not providing a value for the required CategoryID field. If you capture CategoryID in a...