Search results

Howzit It has probably got something to do with the "=31*" where excel would expect a LIKE 31. I don't know the syntax, but you can easily record a macro to find the correct syntax by filtering on Begin With 31 based on your requirement.

Howzit Perhaps this will work. I think the date format is around the wrong way and the checking for an empty recordset. Set rst = CurrentDb.OpenRecordset("SELECT RectNo, RectDept, RectSSaction, " & _ "RectWrkOrdLoc, RectRptdDate FROM T_Rect " & _ "WHERE RectRptdDate >= " & "#" &...

Howzit The control box is definitely set to No? THis hides all 3 buttons at the top regardless of individual settings

Howzit That is a new one to me. I haven't come across this one before. Mine definitely disappear when I do that. Sorry - not sure what to suggest.

Howzit I set the Control Box and the Close Button property to No - see Format Property tab

Howzit Does this work DIm strSQL as string strSQL = "SELECT Name, Dept FROM tblElevateEmployee where Name like '" & strtext & "*' ORDER BY Name;" With me.yourcombobox .rowsource = strsql .requery End With

Howzit You may want to look at this post re adding a signature http://www.access-programmers.co.uk/forums/showthread.php?t=145301

Howzit Nice one. I think it is a personal preference and what you want to do with the email address. I alternate myself - but don't have any real reason why I do so. I just like trying new ways of doing the same thing. This would also work based on your example. Email =...

Howzit How about. Sorry not sure about the correct syntax so I amy have too many ")" - so please play around. Part of the criteria looks for Contact Id's that do not appear in calls prior to the 30 days and uses the NOT IN SELECT Contacts.ContactID, Calls.CallDate FROM Contacts INNER JOIN...

Howzit Sorry I don't know a lot about the outlook library (so I can't help with the signature part), but to extract the email address you can try something like 'Get everything after first # Email = mid(Me!Email,InStr(1, Me!Email, "#")+1) 'Remove the last # Email = left(Email,InStr(1, Email...

Howzit The dcount on a query is the same as a dcoount on a table - you just specify the query instead of the table. If you add the DateCalled you may find Contacts appearing multiple times if they call on different dates within that timeframe. If you only want the unique number of contacts...

Howzit Try Private Sub Form_BeforeUpdate(Cancel As Integer) If Me.Speciality = "A&E" And Len(Me.AdmittingPhysician & vbNullString) = 0 Then Cancel = True MsgBox "You need to fill in a name of the on-call Physician if you have selected 'A&E'", vbExclamation, "Entry Error" Elseif 'Put your...

Howzit I would have a query linking the two tables (on Contactid) and do a Dcount on the query. Your query will look something like SELECT Contacts.ContactID FROM Contacts INNER JOIN Calls ON Contacts.ContactID = Calls.ContactID WHERE Calls.CallDate >=Date()-30 GROUP BY Contacts.ContactID...

Howzit This will count the number of calls for the current contact in the last 30 days. You will need to correct the [Call Date} section to what worked previously as i do not know what correction you made. Me.txtTotalIssue30 = DCount("callid", "calls", "[Call Date]>=(Date()-30) AND...

Howzit Is [Call Date] the corrct fieldname in the table Calls? I would recommend removing any spaces from field and table names should you have them, as they more often than not add complications to coding where none should exist.

Howzit It looks to be working fine for me. No delays, icons populating etc. Whatever you did seems to have done the trick... from my point of view anyway. Thanks for that.

Howzit I ceratinly am. Time lags over a minute when trying to go to advanced \ clicking the Quote button etc and jumping to another section. Site does not load fully in regards to the icons etc. I have tried on my laptop which is really new, and my wife's which I have used historically and...

Howzit Try somehting like Me.txttotalcustomers = DCount("ContactID", "Contacts","yourdate>=Date()-30")

Howzit Try something like... [Code] Dims sFPath as string sFPath = "D\M\R_RptByRevdDate & format(me.TxtFrom,"ddmmyy") sFPath = sFPath & "-" & format(me.txtTo,"ddmmyy") & ".pdf" DoCmd.OutputTo acOutputReport, "R_RptByRevdDate", acFormatPDF, _ sFPath,False

Howzit Nice one.