GetNetCardID() - se comporta raro ??

[jcaro]

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,

[cnavarro]

Juan, no encuentro ningún problema

[jcaro]

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

[cnavarro]

Juan
Estas son las que utilizo en FivEdit, creo que son las mismas de los .bat ( build ) de la carpeta samples

Code: Select all

// 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"   }

 

[hebert_j_vargas]

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

[jcaro]

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

Es algo tan obvio, pero yo no lo veia.

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

Saludos ,

[karinha]

http://forums.fivetechsupport.com/viewt ... =3&t=21651