Þetta má vera í Delphi, Visual Basic, C++ eða Java.
Það sem er fyrst í röðinni er “optimal” forritunarmálið sem ég myndi helst vilja sjá þetta í.

Það sem ég er helst að fiska eftir er hvort einhvern vegin sé hægt að “sniffa” þessar upplýsingar frá Windows, ekkert “hardware” kjaftæði. Þá er ég að ganga útfrá því að IP talan sé föst. Sem er ágætur byrjunarpunktur.

Lausar IP tölur eru mun erfiðari, ég geri mér vel grein fyrir því. Þar er þörf á “hardware” lausnum sem gæti orðið töluverð vinna.

Ég þekki ekki til RAS eða WMI (hef að vísu heyrt um það). Eru til library sem hægt er að nota eða þarf maður að tala beint við .dll inn til að fá aðgang.

Takk fyrir þetta:

Ég hefði átt að leita aðeins betur því þá hefði ég líka fundið þennan fína Delphi kóða sem leysir vandamálið a.m.k. varðandi lausar ip tölur, á eftir að prófa á fastri en það ætti að skila sömu niðurstöðu:




unit Unit1;

interface

uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, StdCtrls, WinSock;

type
TForm1 = class(TForm)
ListBox1: TListBox;
Button1: TButton;
procedure Button1Click(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;

var
Form1: TForm1;

implementation

{$R *.dfm}

procedure GetIP(IPList : TStrings);
Type
TaPInAddr = Array[0..10] of PInAddr;
PaPInAddr = ^TaPInAddr;
var
phe : PHostEnt;
pptr : PaPInAddr;
Buffer : Array[0..63] of Char;
I : Integer;
GInitData : TWSAData;
begin
WSAStartup($101, GInitData);
IPList.Clear;
Try
GetHostName(Buffer, SizeOf(Buffer));
phe := GetHostByName(buffer);
If phe = Nil then
Exit;
pPtr := PaPInAddr(phe^.h_addr_list);
I := 0;
while pPtr^ nil do
begin
IPList.Add(inet_ntoa(pptr^^));
Inc(I);
end;
Finally
WSACleanup;
end;
end;

procedure TForm1.Button1Click(Sender: TObject);
begin
GetIP(ListBox1.Items);
end;

end.

Hmmm…. ég hef nú bara reynslu af vs 6.0 en man aftur á móti að þú þurftir að includa winsock.h á undan windows.h af einhverjum skemmtilegum ástæðum. (Gæti reyndar verið á eftir líka en ég man amk að röðin skipti máli)

og varstu búinn að setja ws2_32.lib í project settings? Þess þarf líka.
<br><br><a href=“mailto:mail@bessi.org”>Bessi</a> | <a href="http://bessi.org">bessi.org</a>

<i>Pi goes on and on and on
And e is just as cursed.
I wonder which is larger when
Their digits are reversed.
&nbsp;&nbsp;&nbsp;<b>-Martin Gardner</b></i