Recent content by peterbowles

I am designing a DB for a go-Karting company One request is that every 5 times a customer pays for a go they get a free go. they do not want to free go to be counted. So to alert them of this I want a txt box on the form that counts the records, (done this) every 5 records a msg box pops up...

I cant remember which ones need to be checked

I have a txt box on a form with the following code =Date(), This use to work, But I have recently re-built my PC and now I get the following error #Name? is this to do with references? Cheers

could you explain a bit more, does any one have any examples

Say you have a register system and you want to link a photo of the student to there record, what is the best way to link the photo to the record? Cheers

in a qry how do you say, only show records if a certain text field has got some text in it, i.e it is not blank

can you do the following I have strmessage = " Student Number is " & me.StudentNo Can I make the text in the quote marks " Student Number " BOLD

I am using the following code to send emails Dim strEmail As String Dim rst As Recordset Dim x As Integer Set rst = Me.RecordsetClone rst.MoveFirst Do 'Place all the email address into the TO: field strEmail = Trim(strEmail & rst!Email & ";") rst.MoveNext Loop Until rst.EOF 'Remove final...

ok cheers, I can send an email to a single user . I have created a qry that pulls all the email address out of the records. so can I do the following in the BCC field on the docmd.sendobject can I type the name of my qry and it will use all those address?

I want to click a button on a form and it opens my email program and inserts all the email address (email address field ) into the TO: field, or if it is possiabe to insert them into the BCC so the recipent can not see the other email address. Stuck on this one so any help would be great thanks

it still goes to the next line when there is an error on error goto errno MsgBox "Bill Ref No (" & Me.BillRefNumber & ") has been added/amended" errno: msgbox "duplicate values"

I use the following code in the on_Click event of a button Private Sub cmdsave_Click() If IsNull(Me.BillRefNumber) = True Then MsgBox "Please Enter a customer number" Me.BillRefNumber.SetFocus Else If IsNull(Me.AccomID) = True Then MsgBox "Please select customer accommodation type"...

ho do you do that?

Hi, Is there a simple command like the one below you can use for reports if there are no records found if me.recordsetclone.recordcount = 0 then msgbox "no records Found

I want to open a form based on two dates. I have a dlg box where I enter 1) start date 2) end date When I press enter I want a report to come up that shows records between the dates I enter How do I do this? Thanks