Power Builder - Como saber si estoy conectado a una red local

 
Vista:

Como saber si estoy conectado a una red local

Publicado por Ivan (8 intervenciones) el 27/02/2002 06:24:11
Me gustaría saber si en Power Builder hay alguna función que me permita hacer un ping a una maquina de una red local.
O si hay alguna forma de saber si estoy conectado a la red.
Gracias...
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

RE:Como saber si estoy conectado a una red local

Publicado por fponte (26 intervenciones) el 27/02/2002 16:26:01
Una posible manera seria detectando los diferentes tipos de unidades instaladas en el equipo. Declara la función externa:

FUNCTION uint GetDriveTypeA (string drive) library "KERNEL32.DLL"

[Powerscript]
//Valores retornados por la función del API GetDriveTypeA
//1 La unidad no existe
//2 Unidad removible (diskett)
//3 Unidad de disco duro
//4 Unidad de red <-- (este seria tu caso)
//5 Unidad de CD
//6 Unidad de RAM (ramdrive)
integer lui_Ret
string cunidad
cunidad="C:"
lui_Ret=GetDriveTypeA(Char((Asc (lower(cunidad)) - 97) + Asc ('A')) + ":\")
CHOOSE CASE lui_Ret
CASE 1
messagebox(cunidad,"La unidad no existe")
CASE 2
messagebox(cunidad,"Unidad removible (diskett)")
CASE 3
messagebox(cunidad,"Unidad de disco duro")
CASE 4
messagebox(cunidad,"Unidad de red")
CASE 5
messagebox(cunidad,"Unidad de CD-ROM")
CASE 6
messagebox(cunidad,"Unidad de RAM")
END CHOOSE

Un saludo.
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar