Recent content by SimonB1978

I visited Boston this summer. Not THAT expensive beside hotel rooms. I think the main reason is that lots of hotels were "No Vacancy". Likely a demand/offer thing. What I suggest is getting an hotel a bit outside of town but close to a subway line (what we did). We then got a 7-day unlimited...

Your variables name don't match. See in RED. You should add Option Explicit at the beginning of your code, it would catch those things.

2 things: - remove the ' after VALUES( - you declared lntLogNumber but you use intlognumber in your function

You could use a DLookup with the selected date in the criteria. If it returns Null, the date was not found in the table. HTH, Simon B.

You could use something like this in a code module: Public Sub AddLog(lngLogNumber, strlocation, stremployee, strlogtext) Dim strSQL As String strSQL = "INSERT INTO tblLog(LogNumber, Location, Employee, LogText) " & _ "VALUES('" & intlognumber & ",'" & strlocation...

Hi, This should work: SELECT Left(name_field, (Iif(InStr(1, name_field, ',') > 0, InStr(1, name_field, ',')-1, 0))) as last_name, Mid(name_field, InStr(1,name_field, ',') + 1) as first_name from table_name BTW, the Iif is there to take care of the case where there would be no comma in the...

Hi, This should give you an idea.... Sub AddID() Dim rst As DAO.Recordset Dim lngID As Long Set rst = CurrentDb.OpenRecordset("Table1") lngID = 1 While Not rst.EOF rst.Edit rst.Fields("ID") = CStr(lngID) rst.Update...

Here is how I do it: Dim objWordApp as Word.Application .... Set objWordApp = CreateObject("Word.Application") Set objWord = objWordApp.Documents.Open(stDocName) ... That way nothing is prompted and the mailmerge is done

There you go: http://mathcentral.uregina.ca/QQ/database/QQ.09.04/bob1.html I thought it would be more complicated than that... Simon B.

Hi, Format(your_number, "00") should do it.

Hi, We just added a macro to one of our Word documents. We have a problem with 1 user. When that user opens the document, a VBA reference is added to a template that resides on his personal network space. When another user then opens that document an error is raised since that person cannot...

Honestly, English as a second language is really not that hard, if you put aside the freaking "th". That thing is unpronounceable. Way fewer grammar rules than French (my first language). If you think there is a big difference between American and British English, you should see (or actually...

Hi, In the DSum statement, you're missing a parameter for the table name (between the field name and criteria). Simon B.

Probably need some parentheses (bold red): If (Me.Ctl2nd_Payment_Payable = "Paid" Or Me.Ctl2nd_Payment_Payable = "Pagado") And IsNull(Me.Ctl2nd_Payment_Date_Paid) Then MsgBox ("Error - Check the 2nd Payment details as it says PAID / PAGADO yet the date paid has not been added")...

Perhaps you could import in your FE in a temp table and use DoCmd.CopyObject to copy the table into the BE. Not the best but it should work....