Recent content by neilhoop

When you double click on the attachment control and choose Add from the box that pops up in my case my default file location is shown as Libraries > Documents with a list of files in that folder. I don't want this to be the default path I want something else. ---------- Neil

The title says it all. ---------- Neil

I didn't find the answer there so I changed tact. I've decided to add some separate buttons to do all the things that I wanted to do with one button. I've now got a strange error message when I try to enter data in the new record on the subform. As soon as I start to type anything in the...

Just the job, for some reason needed to use forms!message.caption = " " forms!message.Repaint works fine. Thanks everyone for your help, again. --------- Neil

I guess I want my cake and eat it. Thin keeps the title and none obviously removes the border but just makes it, in my opinion, a plain and somewhat ugly box. I'm just wondering whether the title can be temporarily removed and restored in code.

Hi, I have a form called Certificates with a subform on it called subClient. The subform is located on a tab control on the first tab. I have added a button below the subform to add a new record to it I'm using: Dim stDocName As String stDocName = "Forms![certificates]![subClient]"...

I've already done both of those, the only thing I'm left wondering is how to stop the title showing in the pop up form. ---------- Neil

Can anybody suugest a way of displaying an on screen message while something is being done in the background. ---------- Neil

I know it's not quite what you suggested but I came up with this. Option Compare Database Dim retz As Integer Sub subChecktxt(fieldname) Dim mmsg As String retz = 0 mmsg = Chr(13) & "Is invalid." mmsg = mmsg & Chr(13) & "It can not contain ' and " mmsg = mmsg & Chr(34) mmsg = mmsg & " in...

I'm going to have a go, wish me luck !!!! ---------- Neil

I just had a thought. I'd like to use this over and over again on different fields. Would I be right in saying that it could be written as a Public Function or Public Sub that can be called by passing the field name to it. If so can you guide me to where I can find out how to do it...

Got it, done it, works just fine. Thanks for your help. ---------- Neil

So I delete; If stpos <> 0 And stpos1 <> 0 Then xx = MsgBox(Me.FName & mmsg, vbCritical) Me.FName.SetFocus End If and replace those lines with Cancel = True ? ---------- Neil

I don't understand this bit. ---------- Neil

Hi, I have this code to validate input into a field. the problem is that the focus is not reset back to the field if there is a problem, it goes to the next field. Private Sub FName_LostFocus() mmsg = " is invalid. It can not contain ' and " mmsg = mmsg & Chr(34) mmsg = mmsg & " in the...