1. Read the registration Form
Reading the registration form
CString readregistetable (CString root,cstring path, CString key)
{
HKEY Happkey;
LPCTSTR Winds_service_registry_key=path;
LPCTSTR Data_file_sub_key=key;
Char szdatafile[80];
if (root== "HKEY_LOCAL_MACHINE")
{
if (error_success = = RegOpenKeyEx (
HKEY_LOCAL_MACHINE,
Winds_service_registry_key,
0,
Key_read,
&happkey))
{
ULONG cbsize = max_path*sizeof (TCHAR);
DWORD Dwflag = RegQueryValueEx (
Happkey,
Data_file_sub_key,
Null
Null
(LPBYTE) szdatafile,&cbsize);
RegCloseKey (Happkey);
if (error_success = = Dwflag)
{
CString Strdate=szdatafile; MessageBox (strdate);
if (Strdate.getlength () >0) return strdate;
else return "";
}
Return "";
}
}
if (root== "HKEY_CURRENT_USER")
{
if (error_success = = RegOpenKeyEx (
HKEY_CURRENT_USER,
Winds_service_registry_key,
0,
Key_read,
&happkey))
{
ULONG cbsize = max_path*sizeof (TCHAR);
DWORD Dwflag = RegQueryValueEx (
Happkey,
Data_file_sub_key,
Null
Null
(LPBYTE) szdatafile,&cbsize);
RegCloseKey (Happkey);
if (error_success = = Dwflag)
{
CString Strdate=szdatafile; MessageBox (strdate);
if (Strdate.getlength () >0) return strdate;
else return "";
}
Return "";
}
}
Return "";
}[nextqage]
2. Write the Registration form
Modify the Registration Form
BOOL modifyregistetable (CString root,cstring path, CString key, CString value)
{
HKEY Happkey;
DWORD dwdisposition = max_path*sizeof (TCHAR);
LPCTSTR Winds_service_registry_key=path;
LPCTSTR Data_file_sub_key=key;
Char szdatafile[80]; strcpy (Szdatafile,value);
if (root== "HKEY_LOCAL_MACHINE")
{
if (Error_success!= RegCreateKeyEx (
HKEY_LOCAL_MACHINE,
Winds_service_registry_key,
0,
Null
Reg_option_non_volatile,
Key_write,
Null
&happkey,
&dwdisposition))
{
return false;
}
Else
{
if (error_success!= RegSetValueEx (Happkey,
Data_file_sub_key,
0,
REG_SZ,
(LPBYTE) Szdatafile,
(Lstrlen (szdatafile) +1) *sizeof (TCHAR)))
{
return false;
}
RegCloseKey (Happkey);
}
}
if (root== "HKEY_CURRENT_USER")
{
if (Error_success!= RegCreateKeyEx (
HKEY_CURRENT_USER,
Winds_service_registry_key,
0,
Null
Reg_option_non_volatile,
Key_write,
Null
&happkey,
&dwdisposition))
{
return false;
}
Else
{
if (error_success!= RegSetValueEx (Happkey,
Data_file_sub_key,
0,
REG_SZ,
(LPBYTE) Szdatafile,
(Lstrlen (szdatafile) +1) *sizeof (TCHAR)))
{
return false;
}
RegCloseKey (Happkey);
}
}
return true;
}