Bonjour,
J'ai crée un client afin qu'il scanne le reseau et remonte les imprimantes presentent (dans un premier temps juste le modele)
Voici le code :
Ça fonctionne par contre c'est très long, il faut une bonne seconde par IP scannée soit presque 5 minutes pour tout le réseau...
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20 ipclient est une chaîne = NetAdresseIP() Idsnmp est un entier rang1 est une chaîne = ExtraitChaîne(ipclient,1,".") rang2 est une chaîne = ExtraitChaîne(ipclient,2,".") rang3 est une chaîne = ExtraitChaîne(ipclient,3,".") Trace("") i est un entier = 0 Sablier(Vrai) POUR i=0 A 255 SI Ping(rang1+"."+rang2+"."+rang3+"."+i,1) = Vrai ALORS Idsnmp=SNMPOuvreSession(rang1+"."+rang2+"."+rang3+"."+i,"public") modele est une chaîne = SNMPLit(Idsnmp,"1.3.6.1.2.1.1.1.0") //mib nom systeme de l'imprimante Trace(rang1+"."+rang2+"."+rang3+"."+i+": "+modele) SNMPFermeSession(Idsnmp) FIN FIN Sablier(Faux)
Connaissez vous un moyen d’accélérer ce genre de traitement ?
Merci
Partager