Search results

After reading a little more, I decided to change from a simple password on the database to user level security (albeit with only one user). Now the compact/backup is working fine. To backup the user is prompted for a login/pw twice, though. Is there any way to supply this automatically through code?

I used the backup/compact sample from Roger's Access Library as the base of a backup system for my database. The problem is, the database I'm working with is passworded. The following code works perfectly when the password is removed: Public Function cmdCompact() On Error GoTo Err_cmdCompact...

Thanks Bat, you've been a huge help. Here's what I ended up implementing: If Len(strWhere) > 0 Then If Nz(DCount("*", "qrySearchCriteria", Left(strWhere, Len(strWhere) - 5)), 0) > 0 Then strWhere = "WHERE " & Left(strWhere, Len(strWhere) - 5) strFind = "SELECT Distinct...

I got it opening up to the correct record now :) If Len(strWhere) > 0 Then strWhere = Left(strWhere, Len(strWhere) - 5) Dim stdocname As String stdocname = "frmEntry" DoCmd.OpenForm stdocname, , , strWhere Else MsgBox "No entries found." End...

Much thanks again. The string seems to be accepted now. So I'm on to figuring out what I need to do to get this form to open to the selected records.

Oops, completely looked over that and forgot to change it when I added in more fields. Thanks for pointing that out. I am still getting the syntax error, though the string looks correct. Syntax error. in query expression 'SELECT tblEntry.entryid, tblentry.divisionid, tblentry.constituencyid...

I'm trying to implement multi-field search of a single table. Here is what I have now: Private Sub cmdSearch_Click() Dim strFind As String, strWhere As String If Len(Me.entryidsearch & vbNullString) > 0 Then strWhere = strWhere & "tblEntry.entryid=" & Me.entryidsearch End If...

Works perfectly, Pat. Thanks for all the help, Pat and Wayne.

Thanks very much. I had forgotten that setting the bound column in the list properties doesn't take care of it in this case. I am now getting the FacultyID put in, but it is not using the highlighted values. Instead, it uses whatever the select box is on. So, if I select the first 4 names, 4...

I have a multi-select list box for selecting which faculty members apply to a project. The faculty table and project table are linked in a many-to-many relationship. I have the following code which should create entries in the link table: Private Sub Command5_Click() Dim varItm As Variant...

I'm sorry, I didn't explain that very well. Each record can have up to 100 comments, each corresponding to a different question....there will only be comments corresponding to questions whose value is 1 ("incorrect" responses). However, most records only have a dozen comments or so. I am only...

Do you want actual lines so that you can write in additional cards by hand when not at the computer?

Just had a thought.....would it be possible to create a make table query which created a record for each problem? That way I could print out a report of each record (one problem) linked to a particular inspection and not have to worry about spacing at all....just filter the records to a...

I have an inspection checklist with drop down selection boxes, each of which has an incorrect response. If the response is incorrect, the field is highlighted and the user inputs an explanation in a memo field. I need to be able to either print out a list of all the problems and their...