Extract stored executables and files in resource

BOOL WriteFileFromResource(int resourceid, LPCTSTR resourcetype, char* filename, bool createdirectory, char* directory)
{
		if (createdirectory)
		{
			HRESULT result;
			result = CreateDirectory(directory, NULL);
			if (result == 0)
			{
				return FALSE;
			}
			
			result = SetCurrentDirectory(directory);
			
			if (result == 0)
			{
				return FALSE;
			}
		}
		
		HRSRC hRsrc;
		hRsrc = FindResource(NULL, MAKEINTRESOURCE(resourceid), resourcetype);
		if (hRsrc == NULL)
		{
			return FALSE;
		}
		
		HGLOBAL filedata;
		filedata = LoadResource(NULL, hRsrc);
		
		if (filedata == NULL)
		{
			return FALSE;
		}
		DWORD size;
		size = SizeofResource(NULL, hRsrc);
		if (size < 0)
		{
			return FALSE;
		}
		FILE* file;
		file = fopen(filename, "wb");
		
		if (file == NULL)
		{
			return FALSE;
		}
		fwrite(filedata, size, 1, file);
		fclose(file);
		return TRUE;
}