FiveTech Support Forums

FiveWin / Harbour / xBase community
Board index FiveWin para Harbour/xHarbour GetNetCardID() - se comporta raro ??
Posts: 270
Joined: Fri Nov 11, 2005 07:39 PM
GetNetCardID() - se comporta raro ??
Posted: Tue May 31, 2016 01:08 AM
Hola a todos,

Necesito saber porque sucede esto , hay algo malo o debo hacer algun cambio, pues requiero con
urgencia conocer la MAC , IP u otro dato existente en el PC.

1) De esta forma xbrowse( GetNetCardInfo() ) muestra 12 columnas con datos de la tarjeta de RED.

2) De esta forma
aNIC := GetNetCardInfo()
xbrowse( aNIC ) muestra solo una columna con la MAC de la tarjeta de RED.

Porque son diferentes los datos :-) :-)

Adjunto un programa listo para probar.

//--------------------------------------------------------------------------
FUNCTION Main()
//--------------------------------------------------------------------------
Local aNIC := {}

// 1) De esta forma muestra 12 columnas con datos de la tarjeta de RED

xbrowse( GetNetCardInfo() )

//2) Si lo asigno a un array - solo me retorna una columna , con la MAC

aNIC := GetNetCardID()

xbrowse( aNIC )

RETURN( NIL )

Saludos,
Juan
==> Pasando a FWH16.04 + Harbour32 + BCC70 + PellesC
=> Abandonando FWH 13.7 + xHarbour + BCC582
http://www.mitaller.cl
Posts: 6755
Joined: Wed Feb 15, 2012 08:25 PM
Re: GetNetCardID() - se comporta raro ??
Posted: Tue May 31, 2016 05:50 AM
Juan, no encuentro ningún problema

Cristobal Navarro

Hay dos tipos de personas: las que te hacen perder el tiempo y las que te hacen perder la noción del tiempo

El secreto de la felicidad no está en hacer lo que te gusta, sino en que te guste lo que haces
Posts: 270
Joined: Fri Nov 11, 2005 07:39 PM
Re: GetNetCardID() - se comporta raro ??
Posted: Tue May 31, 2016 01:37 PM

Hola Cristobal , gracias por responder, a mi no me sale lo mismo.

Puede ser alguna libreria que no este agragando, pues a mi en el segundo browse , solo me muestra las MAC,
ningun dato mas. Cuales tienes tu ?.

Saludos,

Juan

Juan
==> Pasando a FWH16.04 + Harbour32 + BCC70 + PellesC
=> Abandonando FWH 13.7 + xHarbour + BCC582
http://www.mitaller.cl
Posts: 6755
Joined: Wed Feb 15, 2012 08:25 PM
Re: GetNetCardID() - se comporta raro ??
Posted: Fri Jun 03, 2016 08:21 AM
Juan
Estas son las que utilizo en FivEdit, creo que son las mismas de los .bat ( build ) de la carpeta samples

Code (fw): Select all Collapse
// Borland
      aBLibs := { "cw32.lib ", "uuid.lib ", "import32.lib ", ;
                  "psdk\odbc32.lib ", "psdk\nddeapi.lib ", "psdk\Iphlpapi.lib", ;
                  "psdk\msimg32.lib ", "psdk\psapi.lib ", ;
                  "psdk\rasapi32.lib ", "psdk\gdiplus.lib ", ;
                  "psdk\shell32.lib " }

//Harbour
         aHLibs := { ;
            "hbwin.lib "   , "gtgui.lib "  , "hbrtl.lib "  , "hbvm.lib "    ,;
            "hblang.lib "  , "hbmacro.lib ", "hbrdd.lib "  , "rddntx.lib "  ,;
            "rddcdx.lib "  , "rddfpt.lib " , "hbsix.lib "  , "hbdebug.lib " ,;
            "hbcommon.lib ", "hbpp.lib "   , "hbcpage.lib ", "hbcplr.lib "  ,;
            "hbct.lib "    , "hbpcre.lib " , "xhb.lib "    , "hbziparc.lib ",;
            "hbmzip.lib "  , "hbzlib.lib " , "minizip.lib ", "png.lib "     ,;
            "hbcurl.lib "  , "hbusrrdd.lib ", "hbtip.lib ", "hbmxml.lib "   ,;
            "hbmisc.lib"   }
Cristobal Navarro

Hay dos tipos de personas: las que te hacen perder el tiempo y las que te hacen perder la noción del tiempo

El secreto de la felicidad no está en hacer lo que te gusta, sino en que te guste lo que haces
Posts: 99
Joined: Thu Aug 02, 2012 03:21 PM
Re: GetNetCardID() - se comporta raro ??
Posted: Sat Jun 04, 2016 04:28 PM
jcaro wrote:Hola a todos,

Necesito saber porque sucede esto , hay algo malo o debo hacer algun cambio, pues requiero con
urgencia conocer la MAC , IP u otro dato existente en el PC.

1) De esta forma xbrowse( GetNetCardInfo() ) muestra 12 columnas con datos de la tarjeta de RED.

2) De esta forma
aNIC := GetNetCardInfo()
xbrowse( aNIC ) muestra solo una columna con la MAC de la tarjeta de RED.

Porque son diferentes los datos :-) :-)

Adjunto un programa listo para probar.

//--------------------------------------------------------------------------
FUNCTION Main()
//--------------------------------------------------------------------------
Local aNIC := {}

// 1) De esta forma muestra 12 columnas con datos de la tarjeta de RED

xbrowse( GetNetCardInfo() )

//2) Si lo asigno a un array - solo me retorna una columna , con la MAC

aNIC := GetNetCardID()

xbrowse( aNIC )

RETURN( NIL )

Saludos,


Amigo Carlos, la falla la veo en la función que estas aplicando al arreglo
aNIC := GetNetCardID() //Solo el "ID" de la Tarjeta de Red

Deberia Ser:
aNIC := GetNetCardInfo() //Toda la info de la Tarjeta de Red
Compiler version: xHarbour 1.2.3 Intl. (SimpLex) (Build 20141106)

FiveWin Version: FWHX 15.01

BCC 5.8.2
Posts: 270
Joined: Fri Nov 11, 2005 07:39 PM
Re: GetNetCardID() - se comporta raro ??
Posted: Mon Jun 06, 2016 12:31 AM

Gracias Hebert , creo que ahi esta el problema , lo voy a probar y les cuento.

Es algo tan obvio, pero yo no lo veia. :oops:

Gracias Cristobal por las librerias , tambien las voy a probar.

Saludos ,

Juan
==> Pasando a FWH16.04 + Harbour32 + BCC70 + PellesC
=> Abandonando FWH 13.7 + xHarbour + BCC582
http://www.mitaller.cl
Posts: 8515
Joined: Tue Dec 20, 2005 07:36 PM
Re: GetNetCardID() - se comporta raro ??
Posted: Mon Jun 06, 2016 02:16 PM
João Santos - São Paulo - Brasil - Phone: +55(11)95150-7341

Continue the discussion