大家那个用过ararat那个用snmp管理mib的demo???(200分)

  • 主题发起人 主题发起人 ronaldowyl
  • 开始时间 开始时间
R

ronaldowyl

Unregistered / Unconfirmed
GUEST, unregistred user!
我在作一个管理cable modem的网管系统,在http://www.ararat.cz/synapse/index.htm
里面下在了一个用snmp管理mib的demo:http://www.ararat.cz/synapse/files/synademo.zip,
相信做过snmp的朋友看过这个东西的一定不少吧??
我用这个demo管理我的cable modem,如果用demo自带的那个
mib oid number:1.3.6.1.2.1.1.1.0,可以读出我的cable modem的型号等相关参数,
但是我换成其他的mib oid number,例如什么1.3.6.1.2.1.10.127.1.1.1.1.2(求cable modem的上行参数),程序出错:access violation at address 0045da7c in module 'snmptest.exe',read of address ffffffff,
那位兄弟调试过这个程序,可以解决这个,200分送上,不够我再送。
 
提示:和cable modem的连接时连通的,如果不连通,程序也是正常的,不过会提示cable modem连接不通。
 
procedure TForm1.Button1Click(Sender: TObject);
var
response,s:string;
n:integer;
begin
if SNMPget(Edit3.Text,Edit2.Text,Edit1.Text,response)
then
begin
label2.Caption:='Success...';
memo1.Lines.Clear;
memo2.Lines.Clear;
memo1.Lines.Text:=response;
s:='';
for n:=0 to Length(response) do
begin
s:=s+'$'+IntToHex(Ord(response[n]),2)+' ';
end;
memo2.Lines.Text:=s;
end
else
begin
label2.Caption:='Not contacted... (Check SNMP host, community or MIB OID!)';
memo1.Lines.Clear;
memo2.Lines.Clear;
end;
end;
我检查了一下,是因为response没有返回值,请问对cm进行snmpget的时候怎么才能正确获取返回值,就是response的值。
 
附:SNMPget(Edit3.Text,Edit2.Text,Edit1.Text,response)当中各项值:
edit1.text为address of snmp server;
edit2.text为coummunity(一般为public),
edit3.text为mib old number;
 
网上朋友说好像如果要用这个demo的话,如果要对snmpv2c编程的话必须另外写代码,那位兄弟对snmp_v2c编程比较有经验,我给现金好不好?
联系我;
qq:390533309
e-mail:ronaldowyl@163.com
 
请到我的BLOG下载一个工具,也是基于snapse开发的

http://qianghua.greatweb.cn/blog/
 
兄弟给了我巨大提示,无论怎么说,我先跪谢。
 
那么对mib当中那个值set一下可以使cm不能上线??
 

Similar threads

D
回复
0
查看
744
DelphiTeacher的专栏
D
D
回复
0
查看
749
DelphiTeacher的专栏
D
D
回复
0
查看
764
DelphiTeacher的专栏
D
S
回复
0
查看
3K
SUNSTONE的Delphi笔记
S
S
回复
0
查看
2K
SUNSTONE的Delphi笔记
S
后退
顶部