Recent content by Hypernoodle

Change the textbox control source to: =(LastName + ", " + FirstName)

Select FIELD from TABLE where format([datefield], "mm/yyyy") = "06/2002"

If it is a text field and you can't convert it, try this... cdate(TAInvDate) Between #1/1/2002# And #12/31/2002#

Update TABLE set Year = "P1" where InvoceDate BETWEEN #1/1/2002# AND #12/31/2002#

The problem sounds like it's caused by your date format. In your regional settings, what date format is specified for your "Short Date"?

How about this... Update TABLE set Year = "P1" where format(InvoceDate, "YYYY") = "2002"

I've had the bast luck using the Oracle ODBC driver as installed by the Net8 Client. Try using this driver with the following connect string: "DRIVER={Oracle ODBC Driver};DBQ=DBNAME;UID=UID;PWD=PWD;DBA=W;LOB=T;RST=T;FRL=T" Make sure the DBNAME is properly set up in your tnsnames and you can...

Do you have an example of the query?

Here's some code you might have some fun with... Option Explicit Public Function test() Dim nCount As Integer, nItem, arrItems() As String, arrOut() As String Dim colIndex As New Collection Dim sTest As String 'sTest = "Axis:90; Base Curve:8.6; Color:Aqua; Cylinder:-0.75; Diameter:14.5...

An option is to create a UNION subquery. For this example, let's name it "qBook"... SELECT VoucherNo, Suppcode, "AS" AS Type FROM tblBookings WHERE SuppFaxReq=-1 AND SuppFaxSent=0 UNION SELECT VoucherNo, Suppcode, "WHS" AS Type FROM tblBookingsWHS WHERE SuppFaxReq=-1 AND SuppFaxSent=0 UNION...

select DeptGroup, sum(truckCount) from table group by DeptGroup;

Here's another take on the code that seems to work as well... Dim GrpArrayPage As New Collection, GrpArrayPages As New Collection Dim GrpNameCurrent As String, GrpNamePrevious As String Dim GrpPages As Integer Private Sub PageFooterSection_Format(Cancel As Integer, FormatCount As Integer)...