D gethostNam PR * extproc('gethostbyname') D
host_name * value options(*string)
D p_hostent S
* D hostent DS
Based(p_hostent) D h_name *
D h_aliases *
D h_addrtype 10I 0
D h_length 10I 0 D
h_addr_list * D p_h_addr
S * Based(h_addr_list) D h_addr S
10U 0 Based(p_h_addr) *
*constante
*constante D wkDotted
S 16A D wkHostName S 257A
D INADDR_NON C CONST(4294967295)
D wkIP S 10U 0 D wkParmNo S
10I 0 D wkDataType S 10I 0
D wkCurrLen S 10I 0 D
wkMaxLen S 10I 0
/free
// Asigna Direccion IP
wkHostName = 'COMSVR '; wkHostName = %trim(wkHostName) +
x'00' ; p_hostent = gethostnam(wkHostName);
/end-free
From: [EMAIL PROTECTED]: [EMAIL PROTECTED]: Fri, 13 Jun 2008 10:19:38
-0500Subject: Recuperar el hostname del dominio
Quería ver si alguien conoce de algún API, proceso, etc.…. que me permita
recuperar la variable HOSTNAME de la configuración del TCP.
Con el comando CFGTCP hay el parámetro HOSTNAME, esa variable necesito
recuperar.
Saludos
Mauro Peñaherrera
TECNOLOGIA-SISTEMAS
_________________________________________________________________
Explore the seven wonders of the world
http://search.msn.com/results.aspx?q=7+wonders+world&mkt=en-US&form=QBRE
__________________________________________________
Forum.HELP400 es un servicio más de NEWS/400.
© Publicaciones Help400, S.L. - Todos los derechos reservados
http://www.help400.es
_____________________________________________________
Para darte de baja visita la siguente URL:
http://listas.combios.es/mailman/listinfo/forum.help400
