Registriert seit: 22. Jan 2008
Ort: Erfurt
958 Beiträge
Delphi 7 Enterprise
|
AW: jwadhcpsapi jemand Erfahrung damit?
23. Mär 2011, 07:19
Hallo,
habe externen DHCP-Server(MS-Windows2003) und moechte gerne den DHCP-Server abfragen nach Name, IP-Adresse, MAC-Adresse.
Dafuer fand ich diese Unit. Leider gibt es nur Returncodes 5 bzw 1722. eine RPC Verbindung wurde vorher aufgebaut.
Bei jeder einzelnen Funktion? Oder eine bestimmte? Die Meldungstexte zu 5 und 1722 kennst du? Weil eine RPC Verbindung kannst du nicht selbst aufbauen; das macht die Funktion x selbst.
Könnte aber auch die Firewall sein.
so,alles getestet.
- Firewall ist frei (RPC Port 139)
- resultwert =5 (rpc??)
hier mal bissl Quelltext..vielleicht liegts ja dadran?
Delphi-Quellcode:
procedure TForm1.Button1Click(Sender: TObject);
var res1:DWORD;
prefm:DWord;
dwread,dwtotal:DWORD;
hResumeHandle: DHCP_RESUME_HANDLE;
IPArray:LPDHCP_IP_ARRAY ;
maV,miV:LPDWORD;
begin
res1:=DhcpGetVersion('192.xxx.xxx.xxx', @maV,@miV); //result=5
prefm:=255;
res1:=DhcpEnumSubnets('192.xxx.xxx.xxx',hresumehandle,prefm,@IPArray,dwread,dwtotal);//result=5
end;
Gruss Kaki
Repeat Until true=false;
|
|
Zitat
|