blackdevile Geschrieben 4. November 2008 Geschrieben 4. November 2008 Hallo zusammen, Zu meinem Problem, ich soll für meine Firma eine Netzwerkverwaltungssoftware finden, entwickeln oder dergleichen, wie ich ran komme ist egal (Ob selbst programmiert oder gekauft ist also egal) Die Software soll mehrere Informationen über verschiedene Netzwerkgeräte Speichern, unter anderem auch ihren Standort, und damit stoße ich an die grenzen von dem was ich bisher gefunden habe. Die Software soll eine Verwaltung für (Computer, Bildschirme, Drucker, Scanner, Multifunktionsgeräte, Switche, Telefone) besitzen, sowie zumindest eine Ping Funktion um zumindest die Rechner und Switche anpingen zu können. Dafür habe ich bereits kostenlose sowie kostenpflichtige Software gefunden, z.B.: I-Doit Hat eine Super Verwaltung für die verschiedenen Geräte, hat aber weder eine möglichkeit für Ping (zumindest habe ich keine gesehen) noch ist eine Standortanzeige für die Geräte möglich. Nagios Hätte mit einem Plugin die fähigkeit das man die Geräte auf einer Karte eintragen lassen könnte, Ping ist soweit ich gesehen habe auch möglich ABER ist hier die Konfiguration zu aufwendig und Kompliziert um das ganze im alltagsgeschäft nutzen zu können. Spiceworks An und für sich auch eine nette Software, allerdings hat auch diese keine Standortanzeige für die Geräte. Ping bin ich mir nicht sicher ob möglich ist. VISIO Wäre von der Standortanzeige Ideal, hier ist im Prinzip alles vorhanden was ich möchte ABER ich kann hier keinen Ping an die Geräte schicken was aus der Software heraus möglich sein soll. (Gab es früher angeblich mal in Visio ist aber laut MS Telefonberater seit VISIO 2000 [erste MS VISIO Version] nicht mehr mit Ping fähigkeiten ausgestattet) Ich suche mir hier schon seit Tagen im Netz die Finger wund, einzig und allein mein Spezi rausch lässt mich noch Motiviert weitersuchen Allerdings kann ich mir nicht vorstellen das ich/meine Firma die einzige ist die eine solche verwaltung wünscht, irgendwo muss es sowas doch geben? Was verwendet ihr in der Firma, gibt es dafür ein Tool? Bin für jede Hilfe dankbar. Würde mich auf ein paar Informationen freuen, ein paar Hinweise wonach ich suchen könnte. Anregungen etc. Hoffe das ihr mir da ein wenig weiterhelfen könnt. Und schonmal danke das ihr euch das alles durchgelesen habt. Gruß Christian
Freak One Geschrieben 4. November 2008 Geschrieben 4. November 2008 Was hältst du hier von? Hab ich in einer früheren Firma genutzt. Network Management Software ? WhatsUp Gold
dgr243 Geschrieben 4. November 2008 Geschrieben 4. November 2008 wenn du visio perfekt findest.. exportiere den kram auf ne html seite und stelle diese über nen webserver, dann kannst du auch pingen (und telnetten und sshen und und und ). jedenfalls wenn du vorher entsprechende links eingebunden hast. hab ich grad mit visio 2003 und visio 2007 getestet ob das sinnvoll ist, ist ne andere frage
blackdevile Geschrieben 4. November 2008 Autor Geschrieben 4. November 2008 @Freak One, das sieht gar nicht schlecht aus, habs mir mal runtergeladen, sieht aber schonmal nicht schlecht aus @dgr243 wie meinst du das ich des dann über nen webserver stellen soll? Kenn mich mit Viso net so aus, sry. gruß chris
dgr243 Geschrieben 4. November 2008 Geschrieben 4. November 2008 Datei --> Als Webseite Speichern (Visio 2007) Entstehende Datei auf nen Webserver schieben Fertig Ansehen tust dir das ganze dann halt via Browser ..
blackdevile Geschrieben 5. November 2008 Autor Geschrieben 5. November 2008 Also das WhatsupGold ist an und für sich ganz nett, erfüllt aber meine Anforderungen nicht. Ich kann kein Hintergrundbild einbinden (vsd wäre Ideal, aber jpg oder png wären auch noch aktzeptabel) ich kann keine eigenen Attribute Hinzufügen und kann diese dementsprechend auch nicht auflisten lassen. Das mit Visio Zeichnung als Website exportieren habe ihc gemacht, bekomme das linken aber nicht so wirklich hin (hatte ich erwähnt das ich ein Visio Noob bin? xD ) Bin gerade am schaun, Visio hatte bis zur 2000´er Version PING Eigenschaften, irgendwie muss man das doch über Plug-In Add-On oder dergleichen wieder machen können. *weitersuch* Freu mich auch weiterhin über Tipps/Tricks/Hilfe/Hinweise. gruß chris
dgr243 Geschrieben 5. November 2008 Geschrieben 5. November 2008 Du erstellst deine Visio Skizze.. Dann markierst du nen Router/Switch/Whatever das du anklicken können möchtest. Einfügen --> Hyperlink und dann je nachdem was das für ne Schnittstelle ist angeben - telnet://<IP / DNS Name> - ssh://<IP / DNS Name) - etc. Dazu müssen natürlich die entsprechenden Links auf dem aufrufenden Client funktionieren. So muss mit einem ssh Link eben nen SSH Client verknüpft sein. Machen die meissten Clients die ich kenne aber automatisch bei Installation
Debbeche Geschrieben 8. November 2008 Geschrieben 8. November 2008 das beste Produkt für Netzwrküberwachung ist ASTARO. Muss man aber kaufen.
netzwerker Geschrieben 10. November 2008 Geschrieben 10. November 2008 das beste Produkt für Netzwrküberwachung ist ASTARO. Kenne ich nur als Hersteller. Welches Produkt meinst Du?
blackdevile Geschrieben 12. November 2008 Autor Geschrieben 12. November 2008 Danke für alle Antworten hier, waren einige Interessante sachen dabei, wenn auch leider keine Software die mir zu 100% das gebracht hat was ich wollte. Habe jetzt in Visio verschiedene Shapes für alle Netzwerkkomponenten zusammgebastelt und mir über VBA ein Makro geschrieben welches den Rechnernamen/die IP (abhängig davon welche Komponente verwendet wird, wird bei uns die IP statisch oder fest vergeben, daher müssen beide Befehle funktionieren) aus den Benutzerdefinierten Werten ausliest. (Liegt an 5 Stelle in den Eigenschaften, da ab 0 gezählt wird muss eine 4 angegeben werden). Danach soll das ganze einen Ping abgeben (mit zwei Paketen) diese werden ausgewertet und er gibt mir verschiedene Meldungen aus ob die Device Online ist oder nicht. Ist zwar vielleicht nicht unbedingt der sauberste Code, aber dafür das ich erst letzte Woche Montag das erste mal VBA genutzt habe bin ich schon ein wenig Stolz auf mich. Für den Fall das andere auf das selbe oder ein ähnliches Problem stoßen sollten kommt gleich der Code unten an den Post ran. Könnt ihr logischerweise nutzen umbauen wie auch immer ihr lustig seid. Sub Ping() '''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''' '''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''' ''' Ping Tool für Visio ''' '''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''' '''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''' ''' Dieses "Tool" liest aus einem Shape die Benutzerdefinierten Eigenschaften aus ''' ''' Bzw. die zweite Zeile der Benutzerdefinierten Eigenschaften. ''' ''' Hier wird die Seriennummer der Netzgeräte eingetragen welche über DNS Auflösung gepingt ''' ''' werden kann. Als Ausgabe kommt eine MessageBox die uns verrät ob der Rechner ''' ''' On- / oder Offline ist. ''' '''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''' '''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''' ''' Written bye Christian Zenker am 10.11.08 ''' '''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''' '''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''' Dim auslesen As String 'Definieren der Variable auslesen Dim erreichbar As Integer 'Definieren der Variable erreichbar Dim ausgabe As String 'Definieren der Variable ausgabe Dim ShapeId As Visio.Shape 'Definieren der Variable ShapeID Set ShapeId = ActiveWindow.Selection.PrimaryItem 'Wertzuweisung für die Variable ID Dim Adresse As String 'Definieren der Variable Adresse Dim vsoShape1 As Visio.Shape 'Definieren der Variable vsoShape1 Dim intPropRow2 As Integer 'Definieren der Variable intPropRow2 Set vsoShape1 = Application.ActiveWindow.Page.Shapes.ItemFromID(ShapeId.ID) 'Wertzuweisung der Variable vsoShape1 'Damit weis das Script Welche ID das 'Sendende Shape hat. intPropRow2 = 4 Adresse = vsoShape1.CellsSRC(visSectionProp, intPropRow2, visCustPropsValue).FormulaU 'Hier wird der Variable Adresse der Wert 'der Benutzerdefinierten Eigenschaft 'Seriennummer übergeben welche die zu 'Pingende DNS Adresse ist. Shell ("command.com /C ping " & Adresse & " -n 2 -w 50 >C:\ping.txt") 'Hier wird der Ping ausgeführt und das Ergebniss in 'Die Textdatei ping.txt gespeichert. Dim i As Double 'Definieren der Variable i i = Timer 'Weißt der Variable i den SekundenWert für die Aktuelle 'Uhrzeit zu. Do While Timer < i + 2 'Diese Schleife hält das Script für 2 Sekunden an, DoEvents 'dies wird benötigt damit der Ping genug Zeit zum Loop 'erzeugen der txt Datei hat. Open "C:\PING.TXT" For Input As #1 'Öffnet die Ping.txt um Sie auszulesen Do Until EOF(1) 'Liest die Datei so lange Zeilenweise aus bis das Ende der Datei 'erreicht ist. Input #1, auslesen 'Weißt den aktuellen Zeilenwert der Variable auslesen zu If InStr(auslesen, "Verloren") Then 'Überprüft wann angegeben wird wie viele Pakete verloren gegangen sind. auslesen = Left(auslesen, Len(auslesen) - 13) 'Beschneidet den String damit nur noch die Anzahl der Verlorenen auslesen = Right(auslesen, Len(auslesen) - 11) 'Pakete angegeben ist. ausgabe = auslesen 'Übergibt die Anzahl der Verlorenen Pakete an die Variable ausgabe End If 'da der Wert sonst nicht öffentlich zugänglich ist. Loop 'Beendet das Auslesen der Datei Close #1 If ausgabe = "0" Then 'Wenn keine Datei verloren gegangen ist, DANN MsgBox ("Device ist Online") 'Sag das der Rechner Online ist erreichbar = 1 End If If ausgabe = "1" Then 'Wenn Pakete verlorgen gegangen sind, gib aus wie viele. MsgBox ("Device ist Offline" & vbCrLf & "Es sind " & Left(ausgabe, Len(ausgabe) - 2) & " von 2 Paketen verloren gegangen") erreichbar = 1 End If If ausgabe = "2" Then 'Wenn Pakete verlorgen gegangen sind, gib aus wie viele. MsgBox ("Device ist Offline" & vbCrLf & "Es sind " & Left(ausgabe, Len(ausgabe) - 2) & " von 2 Paketen verloren gegangen") erreichbar = 1 End If If erreichbar = 1 Then erreichbar = 1 Else MsgBox ("Devicename im Netz nicht bekannt.") End If Kill ("C:\PING.TXT") 'Löscht die TXT Datei wieder End Sub Danke nochmal allen für ihre Hilfe, und seid nicht zu kritisch mit meinem Code Gruß chris
Crash2001 Geschrieben 12. November 2008 Geschrieben 12. November 2008 Also ich kenne mich zwar mit VBA nicht aus, aber der Codefetzen sticht mir dennoch irgendwie ins Auge. If erreichbar = 1 Then erreichbar = 1 Else MsgBox ("Devicename im Netz nicht bekannt.") End If Kill ("C:\PING.TXT") 'Löscht die TXT Datei wieder End Sub Was soll das If erreichbar = 1 Then erreichbar = 1 Du prüfst eine Variable und belegst sie mit genau dem selben Wert wieder, nach dem du sie geprüft hast. Was hat das für einen Sinn? :confused: Ich kenne wie gesagt die Syntax von VBA nicht, aber ein "Ungleich"-Zeichen wie != oder <> o.ä. sollte es doch auch da geben. Also einfach prüfen, obs ungleich 1 ist und direkt die Messagebox auswerfen.
rXx Geschrieben 12. November 2008 Geschrieben 12. November 2008 NetSupport DNA ist ne super Lösung ;-)
blackdevile Geschrieben 12. November 2008 Autor Geschrieben 12. November 2008 Jo, ist wirklich nicht super gemacht an der Stelle :old Aber ich hatte da Problem wenn ich gar keine Anweisung drinne stehen hatte liefert er mir ne Fehlermeldung und auf die Idee auch noch nach sowas wie ungleich zu suchen bin ich net gekommen, bin froh wenn ich den Sch.. :floet: nimmer sehen muss. Gruß chris
HaasC Geschrieben 17. August 2010 Geschrieben 17. August 2010 (bearbeitet) Hey Fachinformatiker Wow, also hab mich nicht alles ganz genau durchgelesen; aber das was ich bisher gesehen hab; ist super!:uli Klasse Tipps! Dann werde ich wohl nicht mehr wirklich helfen können. Kann als Nachtrag auch die snwp-software empfehlen. Allgemeine Infos darüber hab ich unter url.invalid gefunden. Aber zum runterladen, würde ich auch die Seite von "Freak One" empfehlen. Klasse software! Grüße, Haas Bearbeitet 25. August 2010 von hades
Thanks-and-Goodbye Geschrieben 17. August 2010 Geschrieben 17. August 2010 (bearbeitet) Kann als Nachtrag auch die snwp-software empfehlen. Allgemeine Infos darüber hab ich unter url.invalid gefunden. Ja klar, wieder so eine Google Adlinks und Affiliate-verseuchte SEO-Seite einer bereits negativ aufgefallenen Full Service Marketing Agentur. Bearbeitet 25. August 2010 von hades
HaasC Geschrieben 17. August 2010 Geschrieben 17. August 2010 Hey sorry! Wenn dir die Seite nicht passt, kannst du den link gerne löschen! Dachte es hilft vielleicht. Grüße haas
Fraggla Geschrieben 17. August 2010 Geschrieben 17. August 2010 Hey sorry! Wenn dir die Seite nicht passt, kannst du den link gerne löschen! Dachte es hilft vielleicht. Grüße haas Vor 2 Jahren hätte es vielleicht jemand interessiert. :old
Empfohlene Beiträge