111222
пятница, 20 марта 2009
Здравствуйте! Я студентка факультета психологии и сейчас пишу дипломную работу. Хочу попросить студентов от 17 до 22 лет заполнить несколько опросник в рамках исследования. (некоторые из вас уже их прошли, но мне нужны еще испытуемые и поэтому я снова обращаюсь в это сообщество). Для того, чтобы принять участие, пришлите мне Ваш e-mail личным сообщением.
С уважением, Анна
С уважением, Анна
среда, 18 марта 2009
Тотальная неудачница и убийца жёстких дисков.
#music~Touch & Go\Ecoutez Repetez
#music~Ursula 1000\Kinda Kinky
#music~Mortal Combat\Control
#music~D12\American Psycho II (feat B-Real)
#music~Dj Tiesto\Sparkler
#music~Dmx feat. Busta Rhymes\Come thru (Move-ras)
#music~Eminem ft. Boo Yaa Tribe\Real 911
#music~Touch & Go\Ecoutez Repetez
#music~Ursula 1000\Kinda Kinky
#music~Mortal Combat\Control
#music~D12\American Psycho II (feat B-Real)
#music~Dj Tiesto\Sparkler
#music~Dmx feat. Busta Rhymes\Come thru (Move-ras)
#music~Eminem ft. Boo Yaa Tribe\Real 911
#music~Ursula 1000\Kinda Kinky
#music~Mortal Combat\Control
#music~D12\American Psycho II (feat B-Real)
#music~Dj Tiesto\Sparkler
#music~Dmx feat. Busta Rhymes\Come thru (Move-ras)
#music~Eminem ft. Boo Yaa Tribe\Real 911
#music~Touch & Go\Ecoutez Repetez
#music~Ursula 1000\Kinda Kinky
#music~Mortal Combat\Control
#music~D12\American Psycho II (feat B-Real)
#music~Dj Tiesto\Sparkler
#music~Dmx feat. Busta Rhymes\Come thru (Move-ras)
#music~Eminem ft. Boo Yaa Tribe\Real 911
воскресенье, 01 марта 2009
Здравствуйте! Я студентка факультета психологии и сейчас пишу дипломную работу. Хочу попросить студентов от 17 до 22 лет заполнить несколько опросник в рамках исследования. (некоторые из вас уже их прошли, но мне нужны еще испытуемые и поэтому я снова обращаюсь в это сообщество). Для того, чтобы принять участие, пришлите мне Ваш e-mail личным сообщением. С уважением, Анна
Be individual, a personage... Isn't it a herd instinct now?
Просто текст
<p style="font-size:50%">Просто текст</p>
<p style="font-size:75%">Просто текст</p>
<p style="font-size:100%">Просто текст</p>
<p style="font-size:108%">Просто текст</p>
<p style="font-size:150%">Просто текст</p>
<p style="font-size:50%">Просто текст</p>
Просто текст
<p style="font-size:75%">Просто текст</p>
Просто текст
<p style="font-size:100%">Просто текст</p>
Просто текст
<p style="font-size:108%">Просто текст</p>
Просто текст
<p style="font-size:150%">Просто текст</p>
Просто текст
Be individual, a personage... Isn't it a herd instinct now?
Просто текст
<p style="font-size:0.5em"></p>
<p style="font-size:1em"></p>
<p style="font-size:1.2em"></p>
<p style="font-size:1.55em"></p>
<p style="font-size:2em"></p>
<p style="font-size:0.5em"></p>
Просто текст
<p style="font-size:1em"></p>
Просто текст
<p style="font-size:1.2em"></p>
Просто текст
<p style="font-size:1.55em"></p>
Просто текст
<p style="font-size:2em"></p>
Просто текст
Be individual, a personage... Isn't it a herd instinct now?
пятница, 27 февраля 2009
Be individual, a personage... Isn't it a herd instinct now?
я пишу тег <hr>
я <hr> очень люблю
я <hr> очень люблю
Тотальная неудачница и убийца жёстких дисков.
//===================================================================
// ВНИМАНИЕ!!!!
//
// В функции вроде SysReAllocString() передавать BSTR нужно
// внимательно, поскольку функции принимают OLECHAR, а не BSTR,
// тоесть ДО ПЕРВОГО НУЛЯ. Поэтому следует использовать
// SysReAllocLen()!!!
//
// Также можно использовать мои
// SysReAllocStringBSTR() и SysAllocStringBSTR().
//===================================================================
#include
#include
#include
//#pragma INSERT IGNORE_AJP_ID
// Эти макросы возврщают булево значение...
#define RETURN_FALSE {*RetVal = VBFalse; return S_FALSE;}
#define RETURN_TRUE {*RetVal = VBTrue; return S_OK;}
// Этот макрос возвращает пустую строку...
#define RETURN_EMPTY_STRING { SysReAllocString(RetVal, L"\0"); \
return S_OK; }
// Мой вариант структуры...
typedef struct AS_MEMORY_STATUS {
DWORD MemoryLoadPercent;
DWORD Padding;
double TotalPhysical;
double AvailPhysical;
double TotalPageFile;
double AvailPageFile;
double TotalVirtual;
double AvailVirtual;
double AvailExtendedVirtual;
} AS_MEMORY_STATUS;
// Официальная структура...
typedef struct _MEMORYSTATUSEX {
DWORD dwLength;
DWORD dwMemoryLoad;
DWORDLONG ullTotalPhys;
DWORDLONG ullAvailPhys;
DWORDLONG ullTotalPageFile;
DWORDLONG ullAvailPageFile;
DWORDLONG ullTotalVirtual;
DWORDLONG ullAvailVirtual;
DWORDLONG ullAvailExtendedVirtual;
} MEMORYSTATUSEX, *LPMEMORYSTATUSEX;
typedef BOOL (WINAPI *GLOBALMEMORYSTATUSEX)(LPMEMORYSTATUSEX lpBuffer);
inline double DwordLongToDouble(DWORDLONG Value);
HRESULT GlobalMemoryStatusBase(AS_MEMORY_STATUS *MemStat);
//===================================================================
// Эта функция пытается прочитать сведения о памяти как со старой
// функцией так и с новой, если она доступна. Очень полезно на
// машинах, где много памяти...
//===================================================================
EXP_AJPAPI(HRESULT) asGlobalMemoryStatus(AS_MEMORY_STATUS *MemStat)
{
if (MemStat == NULL) return E_INVALIDARG;
// Obtain the module handle of the kernel.
HMODULE hKernel = GetModuleHandle("KERNEL32");
if (!hKernel) return GlobalMemoryStatusBase(MemStat);
// Теперь вытаскиваем функцию. Терпеть не могу это >_<
GLOBALMEMORYSTATUSEX GlobalMemoryStatusEx = (GLOBALMEMORYSTATUSEX)GetProcAddress(hKernel, "GlobalMemoryStatusEx");
if (GlobalMemoryStatusEx == NULL) return GlobalMemoryStatusBase(MemStat);
// Теперь пробуем вызвать улучшенную функцию...
MEMORYSTATUSEX MSEX;
MSEX.dwLength = sizeof(MSEX);
if (GlobalMemoryStatusEx(&MSEX) == FALSE) return GlobalMemoryStatusBase(MemStat);
MemStat->MemoryLoadPercent = (DWORD)MSEX.dwMemoryLoad;
MemStat->TotalPhysical = DwordLongToDouble(MSEX.ullTotalPhys);
MemStat->AvailPhysical = DwordLongToDouble(MSEX.ullAvailPhys);
MemStat->TotalPageFile = DwordLongToDouble(MSEX.ullTotalPageFile);
MemStat->AvailPageFile = DwordLongToDouble(MSEX.ullAvailPageFile);
MemStat->TotalVirtual = DwordLongToDouble(MSEX.ullTotalVirtual);
MemStat->AvailVirtual = DwordLongToDouble(MSEX.ullAvailVirtual);
MemStat->AvailExtendedVirtual = DwordLongToDouble(MSEX.ullAvailExtendedVirtual);
return S_OK;
}
inline double DwordLongToDouble(DWORDLONG Value)
{
return (double)(signed __int64)Value;
}
// Здесь мы пробуем базовую функцию, если новая не доступна...
HRESULT GlobalMemoryStatusBase(AS_MEMORY_STATUS *MemStat)
{
MEMORYSTATUS MS;
MS.dwLength = sizeof(MS);
GlobalMemoryStatus(&MS);
MemStat->MemoryLoadPercent = (DWORD)MS.dwMemoryLoad;
MemStat->TotalPhysical = (double)MS.dwTotalPhys;
MemStat->AvailPhysical = (double)MS.dwAvailPhys;
MemStat->TotalPageFile = (double)MS.dwTotalPageFile;
MemStat->AvailPageFile = (double)MS.dwAvailPageFile;
MemStat->TotalVirtual = (double)MS.dwTotalVirtual;
MemStat->AvailVirtual = (double)MS.dwAvailVirtual;
MemStat->AvailExtendedVirtual = 0;
return S_OK;
}
//===================================================================
typedef BOOL (WINAPI *ISWOW64PROCESS) (HANDLE hProcess, BOOL *lpWOW64);
//===================================================================
EXP_AJPAPI(HRESULT) asIsHostWin64(VARIANT_BOOL *RetVal)
{
// Если компилируется как Win64 библиотека, то и искать нечего...
#ifdef _WIN64
CHECK_RETVAL;
RETURN_TRUE;
// А в обратном случае будет хитрость...
#else
CHECK_RETVAL;
HMODULE hKernel = GetModuleHandle("KERNEL32");
if (!hKernel) RETURN_FALSE;
ISWOW64PROCESS IsWow64Process = (ISWOW64PROCESS)GetProcAddress(hKernel, "IsWow64Process");
if (IsWow64Process == NULL) RETURN_FALSE;
BOOL bIsWow64 = FALSE;
BOOL RC = IsWow64Process(GetCurrentProcess(), &bIsWow64);
if (!RC) RETURN_FALSE;
if (!bIsWow64) RETURN_FALSE;
RETURN_TRUE;
#endif
}