轉自http://www.7880.com/Info/Article-5a91bae0.html
4.安裝服務程序
每個已安裝服務程序在 HKEY_LOCAL_MACHINE\SYSTE\CurrentControlSet\Services 下都有一個服務名的關鍵字,程序員可以調用系統函數 CreateService 安裝服務程序,并指定服務類型,服務名等。這個函數創建一個服務對象,并將其增加到相關的服務控制管理器數據庫中。
下面是函數原型:
SC_HANDLE CreateService(
SC_HANDLE hSCManager, //服務控制管理程序維護的登記數據庫的句柄,由系統函數OpenSCManager 返回
LPCTSTR lpServiceName, //以NULL 結尾的服務名,用于創建登記數據庫中的關鍵字
LPCTSTR lpDisplayName, //以NULL 結尾的服務名,用于用戶界面標識服務
DWORD dwDesiredAccess, //指定服務返回類型
DWORD dwServiceType, //指定服務類型
DWORD dwStartType, //指定何時啟動服務
DWORD dwErrorControl, //指定服務啟動失敗的嚴重程度
LPCTSTR lpBinaryPathName, //指定服務程序二進制文件的路徑
LPCTSTR lpLoadOrderGroup, //指定順序裝入的服務組名
LPDWORD lpdwTagId, //忽略,NULL
LPCTSTR lpDependencies, //指定啟動該服務前必須先啟動的服務或服務組
LPCTSTR lpServiceStartName, //以NULL 結尾的字符串,指定服務帳號。如是NULL,則表示使用LocalSystem 帳號
LPCTSTR lpPassword //以NULL 結尾的字符串,指定對應的口令。為NULL表示無口令。但使用LocalSystem時填NULL
);
對于一個已安裝的服務程序,可以調用系統函數 OpenService 來獲取服務程序的句柄
下面是其函數原型:
SC_HANDLE OpenService(
SC_HANDLE hSCManager,
LPCTSTR lpServiceName,
DWORD dwDesiredAccess
);
hSCManager :服務控制管理程序微服的登記數據庫的句柄。由函數 OpenSCManager function 返回 這個句柄。
lpServiceName :將要打開的以NULL 結尾的服務程序的名字,和 CreateService 中的 lpServiceName 相對應。
dwDesiredAccess :指定服務的訪問類型。服務響應請求時,首先檢查訪問類型。
用CreateService 或OpenService 打開的服務程序句柄使用完畢后必須用CloseServiceHandle 關閉。
OpenSCManager打開的服務管理數據庫句柄也必須用它來關閉。
//安裝服務程序
void installService()
{
SC_HANDLE schService;
SC_HANDLE schSCManager;
TCHAR szPath[512];
//得到程序磁盤文件的路徑
if(GetModuleFileName(NULL,szPath,512)==0)
{
_tprintf(TEXT("Unable to install %s - %s \n"),
TEXT(SZAPPNAME),
GetLastError());//@1獲取調用函數返回的最后錯誤碼
return;
}
//打開服務管理數據庫
schSCManager=OpenSCManager(
NULL, //本地計算機
NULL, //默認的數據庫
SC_MANAGER_ALL_ACCESS //要求所有的訪問權
);
if(schSCManager)
{
//登記服務程序
schService=CreateService(
schSCManager, //服務管理數據庫句柄
TEXT(SZSERVICENAME), //服務名
TEXT(SZAPPNAME), //用于顯示服務的標識
SERVICE_ALL_ACCESS, //響應所有的訪問請求
SERVICE_WIN32_OWN_PROCESS, //服務類型
SERVICE_DEMAND_START, //啟動類型
SERVICE_ERROR_NORMAL, //錯誤控制類型
szPath, //服務程序磁盤文件的路徑
NULL, //服務不屬于任何組
NULL, //沒有tag標識符
NULL, //啟動服務所依賴的服務或服務組,這里僅僅是一個空字符串
NULL, //LocalSystem 帳號
NULL);
if(schService)
{
_tprintf(TEXT("%s installed. \n"),TEXT(SZAPPNAME));
CloseServiceHandle(schService);
}
else
{
_tprintf(TEXT("CreateService failed - %s \n"),GetLastError());
}
CloseServiceHandle(schSCManager);
}
else
_tprintf(TEXT("OpenSCManager failed - %s \n"),GetLastError());
} |