Replies

That is exactly what I needed! Thanks to all who replied, as I can now continue to develop this database.

So much to learn……

That is my problem. I need to know how to update each record that is selected in a list. I appreciate any light you could shed on this.

I want a user to select items in a listbox on a form, then update a field for each record with one value from a text box on the same form.

Thanks for any ideas!

I agree Leif. I removed WinFax 9.0 and replaced it with the basic version offered on Norton System Works. The basic version is much less demanding and has all the features I need.

I wonder, though, about the ability of software to run on Win2k, even though it is not listed by the manufacturers. I feel this could cause some problems.

Seems I solved my own problem. It had to do with Adaptec’s software. If I remove it, everything is fine. Guess I’ll have to live with this..

Yes, some do. I had installed WinFax Pro 9.0 and it worked, although Symantec had it listed as not compatible. However, I haven’t used it enough to discover any problems.
A great site for answers to Windows 2000 questions is http://www.freeanswers.com

If it is the Microsft Web Publishing Wizard, remove it in Control Panel (Add/Remove Programs)

I installed Win2K last week. I decided not to upgrade my Win98 SE, so I formatted the hard drive and did a clean install. I read that an upgrade over Win98 may cause problems if the present software is not compatible with Win2K and you are not able to uninstall incompatible software.

Most of the drivers I needed had to be obtained from the vendor sites. One item was my NVIDIA graphics card. Win2K had the driver, but it caused problems. The vendor driver works fine.

If I can be of help, just drop me an e-mail.

Your code has too many lines – Try this:
Private Sub CmdSort_Click()
Me.OrderBy = “Reference”
Me.OrderByOn = True
End Sub

You may want to Me.Refresh after the OrderByOn property. Don’t know if you need it, though…..

Also, try referencing the form as

Forms(“frmname”).OrderBy=”Reference”

Would a simple OnFormat event for your Footer Section work?

If IsNull(ControlName) Then Me.PageFooterSection.Visible = False

Howard,

Where are you creating the concatenated field? Is it in a report? I used the concatenation in a query and it worked fine.

Try http://support.microsoft.com/support/kb/ar…FR=0&qry=filter records on form&rnk=25&src=DHCS_MSPSS_tech_SRCH&SPR=ACC2000

The code is listed below. Please check it first, as I am on my way out and have not tested it as written. If it gives your problems, let me know..

Private Sub Form_BeforeUpdate(Cancel As Integer)

On Error GoTo On Error GoTo HandleErr

Dim strMsg As String

strMsg = “Data has changed.”
strMsg = strMsg & “Do you wish to save the changes?”
strMsg = strMsg & “Click Yes to Save or No to Discard changes.”
If MsgBox(strMsg, vbQuestion + vbYesNo, “Save Record?”) = vbYes Then

Else
DoCmd.RunCommand acCmdUndo

End If

ExitHere:
Exit Sub

HandleErr:
Select Case Err.Number
Case 2501
Resume Next
Case 3022
If MsgBox(“Record already exists” & vbCrLf & _
vbTab & “Cancel Entry?”, vbYesNo + vbCritical, “Wait”) = vbYes Then
MsgBox “The entry has been cancelled”, , “Cancelled”
DoCmd.RunCommand acCmdUndo
End If
Case Else
MsgBox Err.Description & ” ” & Err.Number
Resume Exit_cmdSave_Click
End Select

Howard,

I followed this post. If you want to trap the error that occurs when you have duplicate data entered, it is error number 3022. If you want, I’ll send you a code snippet that explains how to do this. You can have a much more friendly message for your user.

Using the Format menu, you’ll have the Line Spacing and Character Spacing choices. You will have to try them to see if they meet your needs.

Publisher is designed this way. It does not allow in-line graphics, so you have to deselect a text box before you can insert the graphic.