GetNext
GetNext é usado para recuperar a próxima cadeia de caracteres correspondente ao OID especificado.
Sintaxe
GetNext (oid)
Retorno
Cadeia de caracteres.
Exemplo
Cliente SNMPSigla de Simple Network Management Protocol, tecnologia usada para monitorar dispositivos de rede como roteadores, hubs e switches. muito simples que recupera todas as cadeias de caracteres de um objeto do sistema de um computador que tenha um servidor SNMP instalado. Informações brutas, por exemplo, tempo de atividade OID 1.3.5.1.2.1.1.3.0
, são exibidas como centenas de segundos:
Function Main
Dim snmp1 As Object
'Carrega retorno e alimentação da linha
cr = Chr(13) + Chr(10)
Set snmp1 = SNMP.Connect("127.0.0.1", "public")
'OID do sysName
Val1 = "1.3.6.1.2.1.1.1.0"
'OID do Objeto dos sistemas
root = "1.3.6.1.2.1.1."
'snmp1.Get Val1
While Val1 <> ""'
echo "Oid: '"+Val1 + "'"+cr
echo “Valor: '"+snmp1.Get(Val1)+"'"+cr
Val1 = snmp1.GetNext(Val1)
If InStr(Val1, root) <> 1 Then Val1 =""
Wend
snmp1.Close
End Function