WNetOpenEnum "Falscher Parameter"

[SirThornberry]

hab mal bischen probiert und die Funktion "MultinetGetConnectionPerformance" kann man für diesen zweck missbrauchen.

So hab ich das umgesetzt:

Delphi-Quellcode:

function IsNetworkResAvailable(ARes: String): Boolean;
var LRes: TNetResource;
    LInfo: TNetConnectInfoStruct;
begin
  ZeroMemory(@LRes, SizeOf(LRes));
  LRes.lpLocalName := nil;
  LRes.lpRemoteName := PChar(ARes);
  LInfo.cbStructure := SizeOf(LInfo);
  result := MultinetGetConnectionPerformance(@LRes, @LInfo) = NOERROR;
end;