Top-Themen

AppleEntwicklungHardwareInternetLinuxMicrosoftMultimediaNetzwerkeOff TopicSicherheitSonstige SystemeVirtualisierungWeiterbildungZusammenarbeit

Aktuelle Themen

Administrator.de FeedbackApache ServerAppleAssemblerAudioAusbildungAuslandBackupBasicBatch & ShellBenchmarksBibliotheken & ToolkitsBlogsCloud-DiensteClusterCMSCPU, RAM, MainboardsCSSC und C++DatenbankenDatenschutzDebianDigitiales FernsehenDNSDrucker und ScannerDSL, VDSLE-BooksE-BusinessE-MailEntwicklungErkennung und -AbwehrExchange ServerFestplatten, SSD, RaidFirewallFlatratesGoogle AndroidGrafikGrafikkarten & MonitoreGroupwareHardwareHosting & HousingHTMLHumor (lol)Hyper-VIconsIDE & EditorenInformationsdiensteInstallationInstant MessagingInternetInternet DomäneniOSISDN & AnaloganschlüsseiTunesJavaJavaScriptKiXtartKVMLAN, WAN, WirelessLinuxLinux DesktopLinux NetzwerkLinux ToolsLinux UserverwaltungLizenzierungMac OS XMicrosoftMicrosoft OfficeMikroTik RouterOSMonitoringMultimediaMultimedia & ZubehörNetzwerkeNetzwerkgrundlagenNetzwerkmanagementNetzwerkprotokolleNotebook & ZubehörNovell NetwareOff TopicOpenOffice, LibreOfficeOutlook & MailPapierkorbPascal und DelphiPeripheriegerätePerlPHPPythonRechtliche FragenRedHat, CentOS, FedoraRouter & RoutingSambaSAN, NAS, DASSchriftartenSchulung & TrainingSEOServerServer-HardwareSicherheitSicherheits-ToolsSicherheitsgrundlagenSolarisSonstige SystemeSoziale NetzwerkeSpeicherkartenStudentenjobs & PraktikumSuche ProjektpartnerSuseSwitche und HubsTipps & TricksTK-Netze & GeräteUbuntuUMTS, EDGE & GPRSUtilitiesVB for ApplicationsVerschlüsselung & ZertifikateVideo & StreamingViren und TrojanerVirtualisierungVisual StudioVmwareVoice over IPWebbrowserWebentwicklungWeiterbildungWindows 7Windows 8Windows 10Windows InstallationWindows MobileWindows NetzwerkWindows ServerWindows SystemdateienWindows ToolsWindows UpdateWindows UserverwaltungWindows VistaWindows XPXenserverXMLZusammenarbeit
GELÖST

Intranetseite anpingen

Frage Internet

Mitglied: BadFsaadKl

BadFsaadKl (Level 1) - Jetzt verbinden

09.05.2011 um 10:11 Uhr, 2836 Aufrufe, 3 Kommentare

Prüfung ob Link im Firmenintranet erreichbar ist.

Guten morgen liebe Admin's,


Wir haben in unserem Intranet einen Link, welcher wenn möglich auf Erreichbarkeit überwacht werden soll.

Link:

http://server:9081/wps/portal

Sobald ich auf den Link klicke, erscheint eine Anmeldemaske.
Gibt es eine Möglichkeit (per Script oder so) zu überprüfen, ob dieser Link erreichbar ist ?

Leider schreibt die Appliaction in keinem Logfile, ob alles in Ordnung ist.

VBS Script wäre am besten.

Hat jemand eine Idee oder Vorschlag ?

Danke
Mitglied: manuel-r
09.05.2011 um 10:29 Uhr
Du könntest die Loginseite mit einem kleinen Script regelmäßig abrufen
01.
strURL = "http://server:9081/wps/portal" 
02.
Set ObjHTTP = CreateObject("Microsoft.XmlHttp") 
03.
ObjHTTP.open "GET", strURL, FALSE 
04.
objHTTP.send "" 
05.
'wscript.echo objHTTP.responseText 
06.
set ObjHTTP = nothing 
07.
set ObjFile = nothing
Wenn eine Antwort kommt "gut", wenn keine kommt "schlecht". Noch besser jagst du die Serverantwort (in objHTTP.ResponseText) durch einen entsprechenden Filter, der auf Korrektheit der Antwort prüft. Vielleicht gibt es ein Datum oder ein Uhrzeit die man prüfen kann?!

Manuel
Bitte warten ..
Mitglied: ackerdiesel
09.05.2011 um 10:34 Uhr
Host = "http://server:9081/wps/portal"
Dim myReq As HttpWebRequest = WebRequest.Create(Host)
myReq.UserAgent = "Mozilla/5.0 (Windows; U; Windows NT 6.1; de; rv:1.9.2.13) Gecko/20101203 Firefox/3.6.13"
myReq.CookieContainer = myReq.CookieContainer
myReq.Timeout = 50000
Dim myReqHttpWebResponse As HttpWebResponse = CType(myReq.GetResponse(), HttpWebResponse)
Dim Request As String
nfstatus = myReqHttpWebResponse.StatusDescription
myReqHttpWebResponse.Close()


If nfstatus <> "OK" Then
...

gruß
ackerdiesel
Bitte warten ..
Mitglied: BadFsaadKl
09.05.2011 um 11:18 Uhr
Moin,

Supi.
Hat funktioniert.

Recht herzlichen Dank
Bitte warten ..
Neue Wissensbeiträge
Sicherheits-Tools

Sicherheitstest von Passwörtern für ganze DB-Tabellen

(1)

Tipp von gdconsult zum Thema Sicherheits-Tools ...

Peripheriegeräte

Was beachten bei der Wahl einer USV Anlage im Serverschrank

(9)

Tipp von zetboxit zum Thema Peripheriegeräte ...

Windows 10

Das Windows 10 Creators Update ist auf dem Weg

(6)

Anleitung von BassFishFox zum Thema Windows 10 ...

Heiß diskutierte Inhalte
Exchange Server
Exchange 2016 Standard Server 2012 R2 Hetzner Mail (36)

Frage von Datsspeed zum Thema Exchange Server ...

Verschlüsselung & Zertifikate
Mit Veracrypt eine zweite interne (non-system) Festplatte verschlüsseln (10)

Frage von Bernulf zum Thema Verschlüsselung & Zertifikate ...

Internet Domänen
Nameserver ein Geist? (7)

Frage von zelamedia zum Thema Internet Domänen ...

Microsoft Office
Übertrag in eine andere Tabelle (6)

Frage von charmeur zum Thema Microsoft Office ...