Internet por duas placas de rede

Question

Galera tenho duas placas de rede no micro e preciso saber se existe uma forma de saber por cada uma se ela est� na internet.Obrigado...

Paullsoftware · Answer

para saber qual das duas est� conectada na internet, configure os IP�s manualmente ou ent�o use essa fun��o:

function GetIP:string; 
//--> Declare a Winsock na clausula uses da unit 
var 
WSAData: TWSAData; 
HostEnt: PHostEnt; 
Name:string; 
begin 
WSAStartup(2, WSAData); 
SetLength(Name, 255); 
Gethostname(PChar(Name), 255); 
SetLength(Name, StrLen(PChar(Name))); 
HostEnt := gethostbyname(PChar(Name)); 
with HostEnt^ do 
begin 
Result := Format(��d.�d.�d.�d�, 
[Byte(h_addr^[0]),Byte(h_addr^[1]), 
Byte(h_addr^[2]),Byte(h_addr^[3])]); 
end; 
WSACleanup; 
end;

para saber qual das duas placas est�o usando o IP de conex�o se a sua m�quina estiver conectada a uma rede � melhor ainda de descobrir, pois, usando atrav�s do CMD (Iniciar >> Exectutar >> CMD OK) digitando [b:28694e9465]IpConfig/All[/b:28694e9465] ele vai te listar todas as configura��es das duas placas..

Dcerutti · Answer

Obrigado pela fun��o, mas o meu problema n�o � em saber qual delas est� na internet. O meu problema � saber se as duas est�o na internet, se qdo cair uma a outra j� se assumir� a conexao.

Bom, para maior clareza, vou explicar o aplicativo que estou fazendo:

Estou fazendo um discador que fica verificando se uma conexao de rede est� pingando um servidor na internet, caso n esteja, efetuar� uma conexao discada, por�m tenho q encerrar a discada assim q a rede voltar.

Ou seja, o papel do discador ser� nunca deixar a m�quina sem internet, por�m ele n poder� usar a discada mais que o suficiente.

Obrigado