用GetProcessName(aProcessName)这个函数时如何同时得到aProcessName的PID ?

用GetProcessName(aProcessName)这个函数时如何同时得到aProcessName的PID ?

GetProcessName(aProcessName)这个函数非常常见

BOOL GetProcessName( PCHAR theName )
    {
        PEPROCESS       curproc;
        char            *nameptr;
        ULONG           i;
        KIRQL           oldirql;

        if( gProcessNameOffset )
        {
            curproc = PsGetCurrentProcess();
            nameptr   = (PCHAR) curproc + gProcessNameOffset;
            strncpy( theName, nameptr, NT_PROCNAMELEN );
            theName[NT_PROCNAMELEN] = 0;                                                        return TRUE;
        }
        return FALSE;
    }

请哪位大侠给点帮助.

谢谢.

HANDLE
  PsGetProcessId(
    IN PEPROCESS  Process
    );

http://msdn.microsoft.com/en-us/library/aa906762.aspx