9x下透過執行檔名獲得程式ID的方法 (轉)

9x下透過執行檔名獲得程式ID的方法 (轉)[@more@]

注：pe.szExeFile有時候是全路經名，有時候只是檔名，原因有待考究，或者請哪位高手指教

D GetProcessIdFromName(LPCTSTR name)
{
 PROCESSENTRY32 pe;
 DWORD id = 0;

 HANDLE hSnapshot = CreateToolhelp32Snapshot(TH32CS_SNAPPROCESS,0);
 pe.dwSize = sizeof(PROCESSENTRY32);
 if( !Process32First(hSnapshot,&pe) )
 return 0;

 do
 {
 pe.dwSize = sizeof(PROCESSENTRY32);
 if( Process32Next(hSnapshot,&pe)==FALSE )
 break;
 if(strcmp(pe.szExeFile,name) == 0)
 {
 id = pe.th32ProcessID;
 break;
 }

 } while(1);

 CloseHandle(hSnapshot);

 return id;
}