C / C++ / MFC

static int CALLBACK 
MyCompareProc(LPARAM lParam1, LPARAM lParam2, LPARAM lParamSort)
{
    CMyObject *p1 = (CMyObject *) lParam1;
    CMyObject *p2 = (CMyObject *) lParam2;
    CString str1 = p1->SomeString;
    CString str2 = p2->SomeString;
 
    return strcmp(str1, str2);
}

CWnd *pBtn = GetDlgItem (IDC_BTNMNU);<br />
CRect btnrect, wndrect;<br />
<br />
pBtn->GetWindowRect (&btnrect);<br />
GetWindowRect (&wndrect);<br />
CPoint mnupoint (btnrect.left, btnrect.bottom);<br />
BOOL bRet = menu.CreatePopupMenu ();<br />
// add the items or use CMenu::LoadMenu.<br />
bRet = menu.TrackPopupMenu (TPM_LEFTALIGN | TPM_LEFTBUTTON, <br />
		mnupoint.x, <br />
		mnupoint.y, <br />
		this);<br />
<br />
<br />

void CMytestDlg::OnOK() 
{
	CString strConnection("Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\\temp\\MyDB.mdb");

	CADODatabase db;
	if(db.Open(strConnection))
	{
		// open recordset
		//
		CADORecordset rs;

		if(rs.Open(db.GetActiveConnection(), "Categories", CADORecordset::openTable))
		{
			rs.MoveFirst();

			while(!rs.IsEOF())
			{
				CString strKeyword;
				if(rs.GetFieldValue("Keyword", strKeyword))
				{
					Log(strKeyword);
				}
				else
				{
					Log("--EMPTY--");
				}
				rs.MoveNext();
			}

			Log("");
			Log("==== AND NOW THE REVERSE =====");

			// and now the opposite direction
			//
			rs.MoveLast();

			while(!rs.IsBOF())
			{
				CString strKeyword;
				if(rs.GetFieldValue("Keyword", strKeyword))
				{
					Log(strKeyword);
				}
				else
				{
					Log("--EMPTY--");
				}
				rs.MovePrevious();
			}


			rs.Close();
		}
		db.Close();
	}
}

You have a JET database with the following dataset:

<small>
Sys_Cd  Sys_Nm      Sys_ParRcd    Sys_Rcd
-------+-----------+------------+---------
25     | record15  | 3          | 8
30     | Parent 2  | 0          | 9
31     | Child 1   | 9          | 10
32     | Child 2   | 9          | 11
33     | Child 3   | 9          | 12
10     | Parent 0  | 0          | 1
11     | record01  | 1          | 2
20     | Parent 1  | 0          | 3
21     | record11  | 3          | 4
22     | record12  | 3          | 5
23     | record13  | 3          | 6
24     | record14  | 3          | 7
</small>

I suspect that you wanted your tree to be ordered by the Sys_Rcd field, with the Sys_ParRcd
field determining whether the item is a parent or a child, so whould look a bit like this:

<small>
+---Parent 0
|   \---record01    
+---Parent 1
|   +---record11
|   +---record12
|   +---record13   
|   +---record14   
|   \---record15   
+---Parent 2 
    +---Child 1 
    +---Child 2 
    \---Child 3    
</small>

Secondly, the problem you seem to be having is not a database
connectivity issue, but a tree population one. The ADO class acts just as it should,
you just need to know what its doing so that you can populate your tree accordingly.
The population code seems a bit messy and at times confusing. Separate this out into a separate
function and work through what you want to achieve logically. Possibly write down first on a
sheet of paper in psuedo-programming exactly what you want to be done before creating your function.

Thirdly. There one or two potentially serious coding errors that
may trouble you later on. For Example:

if(val1 == '0'), should be changed to
if(strcmp(val1,_T("0")) == 0) or if(val1.Compare("0")==0)

Infact, since the field is already a number, you can retrieve this to an integer variable.


Also, your CMyDialog is being allocated on the heap via the View class without being
deleted, so you will see memory leaks when the application exits.

Anyway, I hope these comments helps in your quest for programming peace and fulfilment