Hi Walter,
Can you get the data from the MSP_Tasks.Task_RTF_Notes field found in
the MSP Tasks table? The PJDB.HTM file has some sample code under the
topic "Reading and writing RTF notes" (copied below)
Sub getRtf()
'This macro extracts RTF data from MSP_TASKS.TASK_RTF_NOTES. This
data can then be written
'to a file that can be opened with Microsoft Word or displayed in a
richedit control.
Dim cn As New ADODB.Connection
Dim rs As New ADODB.Recordset
Dim sql As String, rtf As String, cnString
'Open the MSP_TASKS table to look for TASK_RTF_NOTES
cnString = "Provider=Microsoft.Jet.OLEDB.4.0;Data
Source=c:\temp\MyProject.mpd"
sql = "select PROJ_ID, TASK_UID, TASK_RTF_NOTES " & _
"from MSP_TASKS " & _
"where TASK_RTF_NOTES is not null" 'can specify a specific
PROJ_ID and TASK_UID instead
cn.Open cnString
rs.Open sql, cn
'Enumerate across the recordset looking for notes
With rs
Do While Not .EOF
rtf = StrConv(.Fields("TASK_RTF_NOTES"), vbUnicode) ' Put
binary column data into text string
Debug.Print rtf
.MoveNext
Loop
.Close
End With
End Sub
I hope this helps. Let us know how you get along.
Julie
Project MVP
Visit
http://project.mvps.org/ for the FAQs and additional information
about Microsoft Project
