Search results

Hi Talismanic, Apologies about the dodgy code - you were right to put a 'then' on the end of the statement. Also get rid of the 'set' in the line that is causing you problems. However, chrismcbride's answer looks very succinct.

Hi Talismanic, Try restucturing you code like this ... Private Sub cmdNewRecord_Click() dim bProcOK as boolean set bProcOK = true If IsNull(Me.Conversation) Then Beep MsgBox "You can not leave the conversation box blank" DoCmd.GoToControl "Conversation" bProcOK = False Else If...

What I think you need is the ... DoCmd.SendObject [objecttype][, objectname][, outputformat][, to][, cc][, bcc][, subject][, messagetext][, editmessage][, templatefile] On the press of the button gather all the information into a string and send it using thsi command. It will automatically...

Could you not set the table fields that you are saving to 'required'. You can do this in design view of the table. The form will then not be able to move on until something is put in each field. [This message has been edited by Former (edited 10-16-2000).]

I hope that my reply to your second posting will help

Sorry that rs.close should be with the code, to close the recordset

You'll could write some code for the form.... Dim db As Database Dim rs As Recordset Set db = CurrentDb Set rs = db.OpenRecordset("Orders") With rs .AddNew .Fields("Date") = Me.UnboundTextBoxName.Value .Update End With Place this code on a event, e.g. a click of...