Avatar billede thomasmyg Nybegynder
25. juni 2007 - 23:36 Der er 28 kommentarer og
1 løsning

kontrollere om service køre med ASP

Den gode og tålmodige mand thesurfer mener at det ikke kan lade sig gøre og kontrollere om en service køre på en server.

Her kommer min case.

Jeg har lige nu, med STOR hjælpe fra thesurfer, lavet et script der kigger på en www adresse om en given fil findes for at på den måde kunne poste på en hjemmeside om en server er oppe.

Jeg vil helst gerne have at der bliver kigget om en given service køre fx. den service der trækker IIS, for køre den service ikke ja så er status at webserveren ikke er tilgængelig.

Det må da også være en mere brugbar metode jeg vil bruge, fx. hvis et webhotel skal bruge den metode med at kigge efter en fil på en adresse så skal de jo have et site de har kontrol over på alle deres servere, frem for at skulle nøjes med at lave et script der kontrollere om en given service køre.

Håber det er til at forstå hvad jeg mener og at der er nogen der vil hjælpe mig med at bevise at det kan lade sig gøre.

Det skal lige siges at jeg hoster mine egne webservere så scriptet skal ikke "bore" i en webserver man ikke har lov til at lege med og kan gøre skade på som har indvirkning på andre.

Mine servere står lokalt hos mig og jeg har fuld kontrol over dem.
Avatar billede mikkelk Nybegynder
25. juni 2007 - 23:52 #1
Du kan næppe blot gøre det med ASP, men med f.eks. .NET er det enkelt nok:
http://www.codeproject.com/csharp/Service_Controller.asp

Du kan så evt. lave en webservice der returnerer status af din server som xml - og så kan du tjekke det med ASP gennem denne webservice...
Avatar billede mikkelk Nybegynder
25. juni 2007 - 23:52 #2
Eller du skal ud i at lave et komponent til ASP der kan tjekke det for dig.
Avatar billede mikkelk Nybegynder
25. juni 2007 - 23:54 #3
Avatar billede cpufan Juniormester
26. juni 2007 - 09:45 #4
function fnIsServiceRunningVB()
    dim objShell
    dim bReturn

    set objShell = CreateObject("Shell.Application")
        bReturn = objShell.IsServiceRunning("Themes")
    set objShell = nothing
end function
Avatar billede cpufan Juniormester
26. juni 2007 - 09:55 #5
og for at teste iis:

function fnIsServiceRunningVB()
    dim objShell
    dim bReturn

    set objShell = CreateObject("Shell.Application")
        bReturn = objShell.IsServiceRunning("IISADMIN")
    set objShell = nothing
end function
Avatar billede mikkelk Nybegynder
26. juni 2007 - 11:35 #6
Der kan man bare se :-) Så kan det vidst alligevel lade sig gøre rimeligt enkelt...
Avatar billede cpufan Juniormester
26. juni 2007 - 13:22 #7
ja det er jo så bare lige det at du naturligvis ikke kan teste for om iis kører, hvis iis ikke kører, da det jo kræver at man kan afvikle en asp-side.

men jeg har fundet funktionen hos microsoft, og den fungerer under asp,
så svaret på spørgsmålet: kan man tjekke om en SERVICE kører, JA
Avatar billede keysersoze Ekspert
26. juni 2007 - 16:51 #8
Af erfaring kan jeg så sige at det ikke nødvendigvis altid er nok at se om servicen kører - forestil jer at databasen er nede så ens hjemmeside ikke funker, men IIS'en kører højst sandsynligt stadigvæk? Så kan man selvfølgelig også tjekke på om databasen kører - men hvad så hvis en anden del af applikationen fejler?

... bare lige et input om at flaskehalsen kan ligge flere steder :)
Avatar billede thomasmyg Nybegynder
26. juni 2007 - 17:40 #9
cpufan, den funktion du postede 26/06-2007 09:55:29 ligger jeg i en fil og inkludere den på min side, men hvordan klader jeg så resultatet?
Avatar billede thomasmyg Nybegynder
26. juni 2007 - 17:41 #10
og kan funktionen brugers mod en anden server for at se om den er online?
Avatar billede mikkelk Nybegynder
26. juni 2007 - 17:49 #11
if fnIsServiceRunningVB() then
  response.write "jaaaa...service kører...!"
else
  response.write "Øv! kører ikke, men så kan du jo heller ikke se denne side, så denne linie er ligegyldig..."
end if
Avatar billede thomasmyg Nybegynder
26. juni 2007 - 17:57 #12
og hvad er din kommentar til den sidste del af mit sidste spørgsmål?
Avatar billede thomasmyg Nybegynder
26. juni 2007 - 18:26 #13
enten virker funktionen ikke eller også er der noget jeg ikke har gjort rigtigt for det er i hvert fald denne her linje der bliver postet "Øv! kører ikke, men så kan du jo heller ikke se denne side, så denne linie er ligegyldig..."
Avatar billede mikkelk Nybegynder
26. juni 2007 - 18:26 #14
Min umiddelbare tanker er at det kan man ikke...
Jeg vil anbefale at du sætter en webservice op, eller somænd blot et website, på de servere der skal kontrolleres og tjekker om det er tilgængelige.
Avatar billede mikkelk Nybegynder
26. juni 2007 - 18:26 #15
Ret funktionen til:
function fnIsServiceRunningVB()
    dim objShell
    dim bReturn

    set objShell = CreateObject("Shell.Application")
        bReturn = objShell.IsServiceRunning("IISADMIN")
    set objShell = nothing
fnIsServiceRunningVB = bReturn
end function
Avatar billede thomasmyg Nybegynder
26. juni 2007 - 18:32 #16
ja så virker det, men kan med samme, dog nok lavet lidt om, kontrollere på en anden web-server på samme netværk om dens IIS køre?
Avatar billede thomasmyg Nybegynder
26. juni 2007 - 22:24 #17
Er I der?
Avatar billede mikkelk Nybegynder
26. juni 2007 - 22:26 #18
Ja. Mit bud er at du ikke kan tjekke om en anden servers IIS kører. Den eneste måde at gøre det på er ved at lave et script på den server hvor IIS skal tjekkes. F.eks. et website/webservice et eller andet du kan tjekke op imod.
Avatar billede cpufan Juniormester
26. juni 2007 - 22:30 #19
du kan vel bruge komponenten aspping, som kan pinge dine servere, hvis der ikke kommer pingsvar kører den ikke korrekt -
Avatar billede thomasmyg Nybegynder
26. juni 2007 - 22:31 #20
hvordan laver med et aspping?
Avatar billede cpufan Juniormester
26. juni 2007 - 22:32 #21
Avatar billede thomasmyg Nybegynder
26. juni 2007 - 22:33 #22
det er et broken link
Avatar billede cpufan Juniormester
26. juni 2007 - 22:34 #23
hov det link er død, men jeg kan sende dig komponenten, den er gratis
Avatar billede thomasmyg Nybegynder
26. juni 2007 - 22:34 #24
det må du gerne. torh@mail.dk
Avatar billede cpufan Juniormester
26. juni 2007 - 22:35 #25
Avatar billede thomasmyg Nybegynder
26. juni 2007 - 22:37 #26
det ser meget godt, men hvordan kombinere jeg det med det andet du lavede og får det til at stå automatisk hele tiden på min side?
Avatar billede cpufan Juniormester
26. juni 2007 - 22:40 #27
jeg har sendt dig et link
Avatar billede cpufan Juniormester
26. juni 2007 - 22:42 #28
det kommer da helt an på hvordan din side skal fungere.....

der er mange muligheder,
jeg kan godt sætte det op for dig, men så koster det.....
du kan jo prøve dig frem med de eksempler der er vist efterhånden.
Avatar billede thomasmyg Nybegynder
04. juli 2007 - 22:47 #29
Jeg har fået svar på mit spørgsmål, tak for hjælpen cpufan.
Avatar billede Ny bruger Nybegynder

Din løsning...

Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.

Loading billede Opret Preview
Kategori
Kurser inden for grundlæggende programmering

Log ind eller opret profil

Hov!

For at kunne deltage på Computerworld Eksperten skal du være logget ind.

Det er heldigvis nemt at oprette en bruger: Det tager to minutter og du kan vælge at bruge enten e-mail, Facebook eller Google som login.

Du kan også logge ind via nedenstående tjenester

Seneste spørgsmål Seneste aktivitet
I dag 16:10 Tomt felt i Start Af ErikHg i Windows
I går 23:00 Hyperlink til tekst Af Nanarsi i Excel
18/0121:03 Forlænge ringetid Af 1Dorte i Apps til Android
17/0117:38 Video ikoner Af Malm i Windows
17/0117:27 Video ikoner Af logbuilders i Windows