Êàê ïîëó÷èòü?

[Ñâåòëàíà]

Êàê ïîëó÷èòü â Harbour íîìåð äàííîé ðàáî÷åé ñòàíöèè è ïàðîëü (èëè èìÿ) îïåðàòîðà, ñ êîòîðûì îí âîøåë â äàííûé ïóíêò ïðîãðàììû?

[Ìàðèíà]

netname()
_user_code

[Ñâåòëàíà]

Ñïàñèáî, ñ _user_code ïîíÿëà- ýòî èìÿ ïîëüçîâàòåëÿ, à âîò ïðî netname() îòëàä÷èê ãîâîðèò, ÷òî «Íåèçâåñòíàÿ ôóíêöèÿ». À ìîæíî åùå êàê-íèáóäü óçíàòü ñ êàêèì ïàðîëåì áóõãàëòåð çàøåë â ïîäñèñòåìó?

[nordk]

Çà÷åì Âàì ñ êàêèì ïàðîëåì âîøåë ?
Çàäàéòå â íàñòðîéêå ïàðîëü íóæíûé à òóò íàîáîðîò íå äîëæíî áûòü òàêî

[Ìàðèíà]

netname() ýòî êëèïïåðîâñêàÿ ôóíêöèÿ. Ïðàâäà, îíà è òàì-òî íå âñåãäà ðàáîòàëà

to nordk
Åñëè Âû õîòèòå îãðàíè÷èòü ïðàâà ïîëüçîâàòåëÿ, â ïðèíöèïå êîíå÷íî äîñòàòî÷íî _user_code. Íî ê ñîæàëåíèþ, äëÿ ðàçíûõ âåðñèé ÁÝÑÒ â íåì ñèäèò òî íîìåð ïîëüçîâàòåëÿ èç ñïðàâî÷íèêà ïîëüçîâàòåëåé, òî çíà÷åíèå èç terminal (åñëè íå ïóòàþ ñ ñåòåâûì èìåíåì êîìïüþòåðà). À òàêæå â óäàëåííûõ ìîäóëÿõ èëè ïðè îòñóòñòâèè àâòîðèçàöèè â íåì åùå ìîæåò ñèäåòü ïóñòàÿ ñòðîêà.

[shura_k]

Äîáàâüòå â ïðîâåðêó åù¸ MAÑ àäðåñ. Ïðàâäà íàäî åù¸ ïðèäóìàòü êàê åãî ïîëó÷èòü â õàðáîðå

[Îëåã Ñìèðíîâ]

[nordk]

Ïîïðîáóéòå
HWINFONETADAPTERS()

[VBE]

MAC àäðåñ ñåòåâîé êàðòû ìîæíî ïîëó÷èòü òàê
GetMACAddress()

#pragma BEGINDUMP
#include <windows.h>
#include <rpc.h>
#include <rpcdce.h>
#include "hbapi.h"
#include "hbapiitm.h"


#include <iphlpapi.h>
#include <winioctl.h>


static void GetMACaddress(void)
{
IP_ADAPTER_INFO AdapterInfo[16];
PIP_ADAPTER_INFO pAdapterInfo;
DWORD dwBufLen = sizeof(AdapterInfo);
DWORD dwStatus = GetAdaptersInfo(AdapterInfo,&dwBufLen);
// assert(dwStatus == ERROR_SUCCESS);

pAdapterInfo = AdapterInfo;
do {
// PrintMACaddress(pAdapterInfo->-Address);
pAdapterInfo = pAdapterInfo->Next;
}
while(pAdapterInfo);
}

HB_FUNC ( GETMACADDRES )
{
unsigned char MACData[6];
UUID uuid;
char szMac[17];
int i;
UuidCreateSequential( &uuid ); // Ask OS to create UUID
hb_xmemset( szMac, '\0', 17 );
for (i=2; i<8; i++) // Bytes 2 through 7 inclusive are MAC address
MACData[i - 2] = uuid.Data4[i];
sprintf( szMac,"%02X-%02X-%02X-%02X-%02X-%02X",
MACData[0], MACData[1], MACData[2], MACData[3], MACData[4],MACData[5]);
hb_retclen(szMac,17);
}

#pragma ENDDUMP

íî,ê ñîæàëåíèþ ,ýòà ôóíêöèÿ íåäîñòóïíà â Á4+

[shura_k]

Ÿ íàäî ñíà÷àëî çàãðóçèòü

LoadLibrary('IPHLPAPI.DLL');
GetProcAddress(hDLL,'GetAdaptersInfo');

[shura_k]

[VBE]

Ïàðàìåòðû íå íóæíû äëÿ HWINFONETADAPTERS()
Âîçâðàùàåòñÿ ìàññèâ ,â êîòîðîì íàõîäÿòñÿ
ïàðàìåòðû ñåòåâûõ àäàïòåðîâ

HB_FUNC( HWINFONETADAPTERS )
{
typedef DWORD (WINAPI * GetAdaptersInfo_Func)(PIP_ADAPTER_INFO, PULONG);

HINSTANCE hLib;
PHB_ITEM pitmRet, pitmAdapter, pitmTmp;
IP_ADAPTER_INFO *pAI, *pAdapter;
ULONG nLen;
GetAdaptersInfo_Func pGetAdaptersInfo;



if ( (DWORD)(hLib = LoadLibrary("iphlpapi.dll")) <= 32 ||
(pGetAdaptersInfo = (GetAdaptersInfo_Func)GetProcAddress(hLib, "GetAdaptersInfo")) == NULL ) {
if ( (DWORD)hLib > 32 ) FreeLibrary(hLib);
hb_ret();
return;
}

pAI = (IP_ADAPTER_INFO*) hb_xgrab( nLen = sizeof(IP_ADAPTER_INFO) );
if ( pGetAdaptersInfo(pAI, &nLen) == ERROR_BUFFER_OVERFLOW ) {
hb_xfree(pAI);
pAI = (IP_ADAPTER_INFO *) hb_xgrab( nLen );
}

if ( pGetAdaptersInfo(pAI, &nLen) != ERROR_SUCCESS ) {
FreeLibrary(hLib);
hb_ret();
return;
}
FreeLibrary(hLib);

nLen = 0;
pAdapter = pAI;
while ( pAdapter ) {
nLen++;
pAdapter = pAdapter->Next;
}

pitmRet = hb_itemArrayNew(nLen);
nLen = 0;
pAdapter = pAI;
while ( pAdapter ) {
pitmAdapter = hb_itemArrayNew(4);

pitmTmp = hb_itemPutC(NULL, pAdapter->AdapterName);
hb_arraySetForward(pitmAdapter, 1, pitmTmp);
hb_itemRelease( pitmTmp );

pitmTmp = hb_itemPutC(NULL, pAdapter->Description);
hb_arraySetForward(pitmAdapter, 2, pitmTmp);
hb_itemRelease( pitmTmp );

pitmTmp = hb_itemPutCL(NULL, pAdapter->Address, pAdapter->AddressLength);
hb_arraySetForward(pitmAdapter, 3, pitmTmp);
hb_itemRelease( pitmTmp );

pitmTmp = hb_itemPutNI(NULL, pAdapter->Type);
hb_arraySetForward(pitmAdapter, 4, pitmTmp);
hb_itemRelease( pitmTmp );

hb_arraySetForward(pitmRet, ++nLen, pitmAdapter);
hb_itemRelease( pitmAdapter );
pAdapter = pAdapter->Next;
}

if ( pAI )
hb_xfree( pAI );
hb_itemRelease( hb_itemReturn( pitmRet ) );
}

[shura_k]

÷òî-òî ïóñòîé ìàññèâ íà âûõîäå ïîëó÷àåì

[VBE]

õìì
ðàáîòàåò
a := HWINFONETADAPTERS()
? a[1][1]
? a[1][2]
? a[1][4]


{86363904-BF32-43C1-9ECA-53CE950DD29A}
3Com EtherLink XL 10/100 PCI For Complete PC Management NIC (3C905C-TX)
6

[Ìàðèíà]

è òî, ÷òî âîçâðàùàåòñÿ, íå èçìåíÿåòñÿ ïðè ñìåíå ïîëüçîâàòå