C / C++ / MFC

char    buf [MAX_PATH];

// First of all, is this an NT system?
{
    OSVERSIONINFO       osVer;
    osVer.dwOSVersionInfoSize = sizeof (osVer);
    GetVersionEx (&osVer);
    bIsNT = 1 && (osVer.dwPlatformId & VER_PLATFORM_WIN32_NT);
}

// If it is NT, are we admin enough to install Bus Files / Drivers?
bIsAdministrator = FALSE;
if (bIsNT)
{
    TRUSTEE Trustee;
    ACCESS_MASK AccessMask;
    ::BuildTrusteeWithName (&Trustee, "CURRENT_USER");

    // Can we edit registry device entries?
    PSECURITY_DESCRIPTOR    pSecDesc= NULL;
    PACL                    pAcl    = NULL;
    if (::GetNamedSecurityInfo (
        "MACHINE\\SYSTEM\\CurrentControlSet\\Services",
        SE_REGISTRY_KEY,
        DACL_SECURITY_INFORMATION,
        NULL,
        NULL,
        &pAcl,
        NULL,
        &pSecDesc) == ERROR_SUCCESS)
    {
        if (::GetEffectiveRightsFromAcl (pAcl, &Trustee, &AccessMask) == ERROR_SUCCESS)
        {
            if (AccessMask & STANDARD_RIGHTS_REQUIRED)
                bIsAdministrator = TRUE;
        }
        ::LocalFree (pSecDesc);
    }

    // Can we install to Winnt/System32/devices?
    if (!GetSystemDirectory (buf, MAX_PATH))
        bIsAdministrator = FALSE;
    else
    {
        ::lstrcat (buf, "\\drivers");
        sPathSystem = buf;
    }

    if (bIsAdministrator && ::GetNamedSecurityInfo (
        buf,
        SE_FILE_OBJECT,
        DACL_SECURITY_INFORMATION,
        NULL,
        NULL,
        &pAcl,
        NULL,
        &pSecDesc) == ERROR_SUCCESS)
    {
        if (::GetEffectiveRightsFromAcl (pAcl, &Trustee, &AccessMask) == ERROR_SUCCESS)
        {
            if (AccessMask & STANDARD_RIGHTS_REQUIRED)
                bIsAdministrator = TRUE;
        }
        ::LocalFree (pSecDesc);
    } else
        bIsAdministrator = FALSE;
}

<br />
BOOL isCurrentUserAdministrator()<br />
{<br />
<br />
	DWORD dwLevel = 1;<br />
	LPUSER_INFO_1 pBuf = NULL;<br />
	NET_API_STATUS nStatus;<br />
	DWORD nSize = 20;<br />
<br />
	LPWSTR lpUsername = new unsigned short[nSize];<br />
	<br />
	if(!::GetUserName( lpUsername, &nSize)) // Gets the username of currently logged user<br />
		return false;<br />
<br />
<br />
	nStatus = NetUserGetInfo(NULL, lpUsername, dwLevel, (LPBYTE *)&pBuf); // Gets the previlage information of user lpUsername<br />
<br />
	if(nStatus == NERR_Success) // if NetUserGetInfo is successfull<br />
	{<br />
		if( pBuf->usri1_priv == USER_PRIV_ADMIN)<br />
		{<br />
			NetApiBufferFree(pBuf);<br />
			return true;<br />
		}<br />
		else<br />
		{<br />
			NetApiBufferFree(pBuf);<br />
			return false;<br />
		}<br />
	}<br />
<br />
	return false;<br />
}<br />
<br />

CString         strFileName,
                strText;
_Application    app;
Documents       docs;
_Document       doc;
Sections        secs;
Section         sec;
HeadersFooters  headers,
                footers;
HeaderFooter    header,
                footer;
Range           rng;
COleVariant     vtOptional((long) DISP_E_PARAMNOTFOUND, VT_ERROR),
                vtFalse((short) FALSE),
                vtTrue((short) TRUE),
                vtDoc((short) 0),
                vtText((short) 2),
                vtRtf((short) 6),
                vtHtml((short) 8);


if (app.CreateDispatch("Word.Application") == TRUE)
{
    strFileName = "MyFile.doc";

    docs = app.GetDocuments();

    doc = docs.Open(COleVariant(strFileName), vtOptional, vtOptional, vtOptional, vtOptional, vtOptional, vtOptional, vtOptional, vtOptional, vtOptional, vtOptional, vtOptional);


    secs = doc.GetSections();

    if (secs.GetCount() > 0)
    {
        for (long lSection = 1; lSection <= secs.GetCount(); lSection++)
        {
            TRACE("Section %ld\n", lSection);

            sec = secs.Item(lSection);

            headers = sec.GetHeaders();

            if (headers.GetCount() > 0)
            {
                for (long lHeader = 1; lHeader <= headers.GetCount(); lHeader++)
                {
                    header = headers.Item(lHeader);

                    rng = header.GetRange();

                    strText = rng.GetText();

                    TRACE("  Header %ld Text = ]%s[\n", lHeader, strText);
                }
            }

            footers = sec.GetFooters();

            if (footers.GetCount() > 0)
            {
                for (long lFooter = 1; lFooter <= footers.GetCount(); lFooter++)
                {
                    footer = footers.Item(lFooter);

                    rng = footer.GetRange();

                    strText = rng.GetText();

                    TRACE("  Footer %ld Text = ]%s[\n", lFooter, strText);
                }
            }
        }
    }

    docs.Close(vtFalse, vtOptional, vtOptional);

    app.Quit(vtOptional, vtOptional, vtOptional);
}

CDialog Dialog1(IDD_DIALOG1);<br />
CDialog Dialog2(IDD_DIALOG2);<br />
CDialog Dialog3(IDD_DIALOG3);<br />
...<br />
<br />
Dialog1.DoModal();<br />
Dialog2.DoModal();<br />
Dialog3.DoModal);<br />
...