UNION of Memo (2nd time, sorry)

[an]

Thanks to G Mandeno for your replay, but...

To concatenate the Memo1 with Memo1, of the two differents
records, I tryed insert the next code with Event Procedure
in OnOpen of the FORM:

Dim db as DAO.Database
Dim rs as DAO.Recordset
Dim sText as String
Set db = CurrentDb
Set rs = db.openRecordset("Select [Memo1] from [T_General]
Order by [Date]")"
Do Until rs.EOF
sText = sText & rs![Memo1] & " "
rs.MoveNext
Loop
rs.Close
Me.[Name] = sText

Returned next errors in lines:

Error1:
Set rs = db.openRecordset ... ... ")"
With red color. Because second " ?
If abolish that " after ) change to black color. Acepted
but didn't work, because

Error2:
Message with "Used define type not defined" in first line
of code.

Please, why?
So long...

I have Access is 2000. The DAO is problematic in this
version?
Thanks in advance.
an

 

[John Vinson]

Message with "Used define type not defined" in first line
of code.

Please, why?
So long...

I have Access is 2000. The DAO is problematic in this
version?

Bang on. 2000 defaults to using the newer ADO object model.

Select Tools... References in the VBA editor; if you don't need ADO
uncheck Microsoft ActiveX Data Objects. Browse down and find Microsoft
DAO Object Library x.xx (highest version) and check it instead.