ADO ODBC field size

[Steven M. Britton]

I am trying to access a lotus notes database through ADO and when I do a few
of the fields are having their information truncated. So next I "Linked" the
table in access using ODBC and see that the fields are set to text instead of
memo, so I am only getting the first 254 characters. How through VBA or the
Linked table manager can I select those fields and get ALL the data in them?
Here is the test code I am playing with...

Function ReadLotusECNExport()

Dim oConn As ADODB.Connection
Dim rs2 As ADODB.Recordset

myServerName = "ARLNotes1/USMARINE"
myDbName = "BBGCorAct.nsf"

'Connect to a Database
Set oConn = CreateObject("ADODB.Connection")
oConn.ConnectionString = "DRIVER={Lotus NotesSQL Driver (*.nsf)};SERVER=" &
myServerName & ";DATABASE=" & myDbName
oConn.Open

'Create a recordset object
Set rs2 = CreateObject("ADODB.RecordSet")
rs2.ActiveConnection = oConn
rs2.CursorLocation = adUseClient
rs2.CursorType = adOpenDynamic
rs2.LockType = adLockPessimistic

strSQL = "SELECT Main.Description FROM Main WHERE
((Main.Status)<>'Closed');"

rs2.Open strSQL

Do

Debug.Print rs2!Description

rs2.MoveNext

Loop Until rs2.EOF
rs.Close
db.Close
End Function