我不明白,相同的代码在 Comtech 调制解调器上工作正常。
oidOut:常量字符串数组 vout:字符串数组
procedure TDamocles1208.SNMPset;
var
mySNMP: TidSNMP;
I: integer;
begin
mySNMP:=TidSNMP.Create(nil);
mySNMP.Query.Host:=Trim(IpEdt.Text);
mySNMP.Query.Community:=Trim(ComStrEdt.Text);
mySNMP.ReceiveTimeout:=1000;
try
mySNMP.Query.Clear;
mySNMP.Query.PDUType:= PDUSetRequest;
for I := 1 to 8 do
begin
mySNMP.Query.MIBAdd(oidOut[I],vOut[I],ASN1_INT);
if mySNMP.SendQuery then
ShowMessage('Updated!')
else
ShowMessage('Update Failed!');
end;
finally
mySNMP.Free;
end;
end;
这里的错误信息:
第一次机会例外,价格为 $7588D3CF。带有消息“系统错误”的异常类 EOSError。代码:123 文件名、目录名或卷标语法不正确。处理 Project1.exe (1060)