Avatar billede elvis17 Nybegynder
11. juni 2003 - 01:06 Der er 50 kommentarer

Pingning af domæner i mappe!

Hej folkens

jeg er en indehaver af ca. 130 webhoteller på min windows 2003 server (både mine egne og venners sider), jeg er nu kommet til et punkt hvor jeg skal have slettet de sider som ikke findes på serveren. Jeg har en mappe der hedder C:\Webhoteller\ og i denne mappe ligger ALLE webhoteller på hele serveren, det jeg så ønsker er et script som kan liste navnene på disse mapper som alle er domaene1.dk domaene2.dk osv. når så disse domæner er blevet listet skal de pinges og ip'en på den server hvor domænet ligger skal vises. det kunne fx. se sådan ud:

domaene1.dk        xxx.xxx.xxx.xxx
domaene2.dk        xxx.xxx.xxx.xxx
domaene3.dk        xxx.xxx.xxx.xxx
domaene4.dk        timeout
domaene5.dk        xxx.xxx.xxx.xxx

Jeg kan nu se at domaene4.dk skal slettes på serveren, mange folk syntes måske dette er en tåbelig ide men jeg gider bare ikke sidde og tjekke alle domænerne selv og jeg regner senere med at få flere venners sider på serveren og så bliver det jo bare endnu lettere og smartere, håber der er en der kan fixe et sådant script eller evt. ved hvor man kan finde et

Mange hilsner

Elvis
Avatar billede nanonissen Nybegynder
11. juni 2003 - 01:15 #1
Hvad med at lave et bat program
ping domæne1.dk
ping d2
osv.
og skrive det til en fil eller bare se det i vinduet
Avatar billede elvis17 Nybegynder
11. juni 2003 - 01:17 #2
det må da være muligt at lave noget der selv kan hente navnene på domænerne fra mappen C:\webhoteller\ ?? det er jo træls og skal indtaste det hele, det ville være irriterende!
Avatar billede bertelbrander Novice
11. juni 2003 - 02:11 #3
Følgende kunne være en start. Put det i en batch-fil og læg den i C:\Webhoteller. Hvis du får det til at virke kan vi prøve at parse outputtet fra ping.
<code>
echo off
setlocal
for /F %%i in ('dir /AD /B') do call :do_it %%i
endlocal
goto :eof

:do_it
ping %1
</code>
Avatar billede swaxi Nybegynder
11. juni 2003 - 10:41 #4
du kan vel pipe' output fra en dir-kommando til en textfil ... det er da en start
Avatar billede bertelbrander Novice
11. juni 2003 - 11:36 #5
Jeg har lavet en forbedret version:
<code>
@echo off
setlocal
for /F %%i in ('dir /AD /B') do call :do_it %%i
del ping.out.tmp
endlocal
goto :eof

:do_it
ping -n 1 %1 >ping.out.tmp
if errorlevel 1 echo %1 timeout& goto :eof
for /F "tokens=2 delims=[]" %%i in ('findstr /B Pinging ping.out.tmp') do @echo %1 %%i
</code>

Et dump af en prøvekørsel:

D:\Program\NG\webhotel>dir
Volume in drive D has no label.
Volume Serial Number is 8CAD-539A

Directory of D:\Program\NG\webhotel

11-06-2003  11:34      <DIR>          .
11-06-2003  11:34      <DIR>          ..
11-06-2003  02:51      <DIR>          ggg.iiii.hhh
11-06-2003  11:34                  283 pingall.cmd
11-06-2003  02:51      <DIR>          www.google.com
              1 File(s)            283 bytes
              4 Dir(s)  1.521.664.000 bytes free

D:\Program\NG\webhotel>pingall
ggg.iiii.hhh timeout
www.google.com 216.239.51.99

D:\Program\NG\webhotel>
Avatar billede elvis17 Nybegynder
11. juni 2003 - 11:52 #6
Det lader jo til at se rigtig godt ud, tester det lige !
Avatar billede Slettet bruger
11. juni 2003 - 11:57 #7
Undskyld jeg blander mig, Men det hjælper ikke at pinge dem, for det er jo bare om serveren er oppe, derfor skal du lave noget med DNS opslag.
Avatar billede Slettet bruger
11. juni 2003 - 12:03 #8
eller vil du bare kiggge på dem som ikke ligger på din servers ip ??
Avatar billede Slettet bruger
11. juni 2003 - 12:03 #9
elvis: VIl du heller have et i php, for så vil jeg godt prøve
Avatar billede elvis17 Nybegynder
11. juni 2003 - 12:30 #10
ja jeg vil meget gerne have et i PHP så den kan køres fra nettet
Avatar billede elvis17 Nybegynder
11. juni 2003 - 12:30 #11
desuden er det lidt mystisk det .bat script.. det vil kun virke en gang imellem og jeg tror det er alt for sløvt når det handler om over 50 domæner ??..
Avatar billede elvis17 Nybegynder
11. juni 2003 - 12:32 #12
nu har jeg lige prøvet at køre det igen og det vil ikke virke.. første gang virkede det fint men så anden og tredje gang ville det ikke virke men så fjerde gang så virkede det igen.. men jeg vil meget gerne have det i PHP :) måske man kunne bruge denne kode til noget:

<?php

header("Cache-Control: no-cache");
header("Pragma: no-cache");

// Vis output fra udført kommando!

echo "<pre>Output fra Command Promth<br>";

$command = "ping domaene.dk, domaene2.dk osv.. .:)";

echo "Der afvikles på følgende måde: $command<br>";
$ud = shell_exec($command);
//echo(nl2br($ud));

echo "$ud</pre>";

?>

hehe ved ikke om det overhovedet er en kode du kan bruge.. men måske :)
Avatar billede Slettet bruger
11. juni 2003 - 12:33 #13
Men er det bare for at se om de har fået flyttet deres domain, for du pinger den samme ip flere gange, da de server nok kun har en ip.
Avatar billede elvis17 Nybegynder
11. juni 2003 - 12:35 #14
ja det er bare for at se om domænerne er flyttet :) måske der er en nemmere løsning ?
Avatar billede Slettet bruger
11. juni 2003 - 13:27 #15
Har din server kun en ip ???

Så den skal skrive "ligger serveren"
eller "ligger på en anden server"
Avatar billede Slettet bruger
11. juni 2003 - 13:34 #16
Virker ikke, på en win maskine. DU kan kun bruge shell_exec på en linux
Avatar billede Slettet bruger
11. juni 2003 - 14:12 #17
Er næsten færdig med et php script
Avatar billede bertelbrander Novice
11. juni 2003 - 15:33 #18
>elvis17, hvad mener du med at det ikke virker, hvad sker der når det ikke virker?
Avatar billede Slettet bruger
11. juni 2003 - 16:31 #19
elvis17: Scriptet er færdig, skal bare bruge noget output fra en dospromt

Du skal lige skrive alt outputtet som du får ved at kører disse kommandoer:

ping www.google.com -n 1

ping www.dggfgdfgdfg.com -n 1
Avatar billede Slettet bruger
11. juni 2003 - 16:43 #20
Du kan se det i auktion på: http://www.mediaglobe.dk/servertjek.php
Avatar billede elvis17 Nybegynder
11. juni 2003 - 18:33 #21
det er lige det script jeg har brug for!!

Sender du det til min mail eller smider du det online så vi alle kan hente det.. det ville være dejligt

venlig hilsen Elvis
Avatar billede Slettet bruger
11. juni 2003 - 19:02 #22
Du skal lige kører dette i en dospromt og skriver her hvad du får som resultat:

ping www.google.com -n 1

ping www.dggfgdfgdfg.com -n 1
Avatar billede elvis17 Nybegynder
11. juni 2003 - 19:03 #23
Det er cyberfinn's script som jeg mener.. syntes også de andre var fine men de virkede ikke korrekt og var rimelig langsomme.. men det cyberfinn har er kanon da det også kan køres fra nettet og det lader til det er ret hurtigt ;-)
Avatar billede Slettet bruger
11. juni 2003 - 19:05 #24
Kører du ikke lige om udskriver alt hvad den skriver, for jeg kan sætte det helt rigtig op, er nemlig forskellig fra Win 2000 til Nt så måske også til 2003
Avatar billede elvis17 Nybegynder
11. juni 2003 - 19:27 #25
jo men jeg skal jo bruge scriptet før jeg selv kan køre det ?.. hvor kan jeg hente koden ?
Avatar billede Slettet bruger
11. juni 2003 - 20:08 #26
Tryk på start

Skriver "cmd"

skriv "ping www.google.com -n 1"

skriver outputtet her.

skriv "ping www.dggfgdfgdfg.com -n 1"

skriver outputtet her.

ping www.dggfgdfgdfg.com -n 1
Avatar billede elvis17 Nybegynder
11. juni 2003 - 22:02 #27
har lige prøvet det.. det virker helt som det skal.. :)
Avatar billede Slettet bruger
11. juni 2003 - 23:23 #28
ved jeg godt...

Men skriv lige hvad den skriver, så får du scriptet
Kan det være så svært
Avatar billede Slettet bruger
11. juni 2003 - 23:24 #29
Jeg får dette svar:
C:\>ping www.google.com -n 1

Pinger www.google.com [216.239.37.99] med 32 byte data:

Svar fra 216.239.37.99: byte=32 tid=150ms TTL=50

Ping-statistikker for 216.239.37.99:
    Pakker: Sendt = 1, modtaget = 1, tabt = 0 (0% tab),
Gennemsnitlig tid for rundtur i millisekunder:
    Mindst = 150ms, størst =  150ms, gennemsnitlig =  150ms

C:\>
Hvad får du ???
Avatar billede elvis17 Nybegynder
12. juni 2003 - 09:13 #30
jeg får følgende:

Microsoft Windows [Version 5.2.3790]
(C) Copyright 1985-2003 Microsoft Corp.

C:\>ping www.google.com -n 1

Pinging www.google.com [216.239.51.99] with 32 bytes of data:

Reply from 216.239.51.99: bytes=32 time=116ms TTL=50

Ping statistics for 216.239.51.99:
    Packets: Sent = 1, Received = 1, Lost = 0 (0% loss),
Approximate round trip times in milli-seconds:
    Minimum = 116ms, Maximum = 116ms, Average = 116ms

C:\>
Avatar billede elvis17 Nybegynder
12. juni 2003 - 14:16 #31
er det ikke bare det du skal bruge cyberfinn ??

MVH ELVIS!
Avatar billede Slettet bruger
12. juni 2003 - 14:56 #32
Nej, skal også vide hvad den skriver hvis domainet ikke har nogle DNSen a-rocord.

Står der noget med Bad så ??
Avatar billede elvis17 Nybegynder
12. juni 2003 - 16:02 #33
så skriver den:

Microsoft Windows [Version 5.2.3790]
(C) Copyright 1985-2003 Microsoft Corp.

C:\>ping www.dggfgdfgdfg.com -n 1
Ping request could not find host www.dggfgdfgdfg.com. Please check the name and
try again.

C:\>
Avatar billede elvis17 Nybegynder
12. juni 2003 - 16:03 #34
men jeg skal både bruge den på en 2003 og 2000 server :) ved ikke om det er det samme,

Venlig Hilsen
Elvis
Avatar billede Slettet bruger
12. juni 2003 - 16:28 #35
Det er slet ikke det samme, men du får scripet til Windows 2003 server nu
Avatar billede Slettet bruger
12. juni 2003 - 16:28 #36
HER:
<?PHP
//Dette script er udviklet af Cyberfinn (webfun@webfun.dk)
//Må benyttes frit til privat brug, hvis bare disse linjer forbliver i scripet.
//Du skal opsætte dissse tre opsætninger.

//Her skal man opsætte ipadressen på serveren.
$serverip = "217.157.182.100";

//Den mappe hvor de forskellige domains ligger. (Da det er en win maskine skal det være sådan: c:\\Websites\\)
$dir = "c:\\Website\\kunder";

//------------------------------------------VIGTIG---------------------------------------------
//----------------------------Alt herunder skal der ikke ændres på.-----------------------------
echo "<div align=\"left\"><font size=\"3\" face=\"Verdana, Arial, Helvetica, sans-serif\"><strong>Server tjeksystem af Cyberfinn</strong><br>Arbejder i mappen: " . $dir . "<br>Serverens ip: " . $serverip . "</font></div>";
echo "<br><table border=\"1\" align=\"left\" cellpadding=\"3\" cellspacing=\"0\" bordercolor=\"#000000\">";
if ($handle = opendir($dir)) {
while (false !== ($file = readdir($handle))) {
if ($file != "." && $file != "..") {
echo "<tr>\n";
$ip_dns = "www." . $file;
echo "<td>" . $ip_dns . "</td>\n";
exec("ping ".$ip_dns." -n 1", $ping_results);
$rows = count($ping_results);
$tjek = $ping_results[$rows-1];
if(strstr($tjek,"not")) {
    echo "<td><font color=\"#FF0000\" >Domainet kører ikke.</font></td>\n";
} else {
$ping = $ping_results[$rows-8];
preg_match("/\d{1,}\.\d{1,}\.\d{1,}\.\d{1,}/",$ping,$regs);
if ($regs[0] == $serverip) { echo "<td><font color=\"#00CC33\">Kører på serveren</font></td>\n"; }
else { echo "<td><font color=\"#FF0000\">Kører på en anden server (" . $regs[0] . ")</font></td>\n"; }
}
echo "</tr>\n";
}
}
closedir($handle);
}
?>
</table>
Avatar billede elvis17 Nybegynder
12. juni 2003 - 17:42 #37
hvad siger du til jeg også får det til windows 2000 ?. det ville være meget rart :-)
Avatar billede Slettet bruger
12. juni 2003 - 18:20 #38
Virker den da til WIn 2003
Avatar billede Slettet bruger
12. juni 2003 - 18:20 #39
Lav de to ping på din win 2000 så retter jeg det til
Avatar billede elvis17 Nybegynder
12. juni 2003 - 18:35 #40
jeg takker.. det ser sådan ud

C:\>ping www.google.com -n 1

Pinging www.google.com [216.239.37.99] with 32 bytes of data:

Reply from 216.239.37.99: bytes=32 time=157ms TTL=49

Ping statistics for 216.239.37.99:
    Packets: Sent = 1, Received = 1, Lost = 0 (0% loss),
Approximate round trip times in milli-seconds:
    Minimum = 157ms, Maximum =  157ms, Average =  157ms

C:\>ping www.dggfgdfgdfg.com -n 1
Unknown host www.dggfgdfgdfg.com.

C:\>
Avatar billede Slettet bruger
12. juni 2003 - 18:43 #41
<?PHP
//Dette script er udviklet af Cyberfinn (webfun@webfun.dk)
//Må benyttes frit til privat brug, hvis bare disse linjer forbliver i scripet.
//Du skal opsætte dissse tre opsætninger.

//Her skal man opsætte ipadressen på serveren.
$serverip = "217.157.182.100";

//Den mappe hvor de forskellige domains ligger. (Da det er en win maskine skal det være sådan: c:\\Websites\\)
$dir = "c:\\Website\\kunder";

//------------------------------------------VIGTIG---------------------------------------------
//----------------------------Alt herunder skal der ikke ændres på.-----------------------------
echo "<div align=\"left\"><font size=\"3\" face=\"Verdana, Arial, Helvetica, sans-serif\"><strong>Server tjeksystem af Cyberfinn</strong><br>Arbejder i mappen: " . $dir . "<br>Serverens ip: " . $serverip . "</font></div>";
echo "<br><table border=\"1\" align=\"left\" cellpadding=\"3\" cellspacing=\"0\" bordercolor=\"#000000\">";
if ($handle = opendir($dir)) {
while (false !== ($file = readdir($handle))) {
if ($file != "." && $file != "..") {
echo "<tr>\n";
$ip_dns = "www." . $file;
echo "<td>" . $ip_dns . "</td>\n";
exec("ping ".$ip_dns." -n 1", $ping_results);
$rows = count($ping_results);
$tjek = $ping_results[$rows-1];
if(strstr($tjek,"Unknown")) {
    echo "<td><font color=\"#FF0000\" >Domainet kører ikke.</font></td>\n";
} else {
$ping = $ping_results[$rows-8];
preg_match("/\d{1,}\.\d{1,}\.\d{1,}\.\d{1,}/",$ping,$regs);
if ($regs[0] == $serverip) { echo "<td><font color=\"#00CC33\">Kører på serveren</font></td>\n"; }
else { echo "<td><font color=\"#FF0000\">Kører på en anden server (" . $regs[0] . ")</font></td>\n"; }
}
echo "</tr>\n";
}
}
closedir($handle);
}
?>
</table>
Avatar billede elvis17 Nybegynder
13. juni 2003 - 08:02 #42
sådan nu begynder det jo at spille.. lige en sidste ting.. kan du ikke lave sådan i det script til windows 2000 at den skriver hvor mange af siderne der er oppe (altså tæller alle de grønne sider) det ville være rigtig lækkert ;--)

Venlig hilsen

Ølfis
Avatar billede elvis17 Nybegynder
13. juni 2003 - 08:03 #43
og husk så og smid som et svar, så der er point at hente.
Avatar billede elvis17 Nybegynder
13. juni 2003 - 08:17 #44
desuden så hvis domainet ikke findes så skriver den ikke "Domainet kører ikke" men istedet Kører på en anden server ()..

hilsen elvis
Avatar billede Slettet bruger
13. juni 2003 - 10:41 #45
elvis17: Når den skriver "Domainet kører ikke" så er det fordi den ikke peger på nogen server, enten er domainet ikke oprettet eller så han man ikke a-record på dnsen til den.

Det med at tælle laver jeg lige :)
Avatar billede elvis17 Nybegynder
13. juni 2003 - 10:48 #46
hehe okay :).. kunne du lave så den tæller hvor mange domæner der er på serveren altså dem der er grønne og hvor mange der ikke er på serveren, altså de røde :)? og smid så et svar hehe
Avatar billede Slettet bruger
13. juni 2003 - 13:26 #47
ja
Avatar billede Slettet bruger
13. juni 2003 - 13:32 #48
Til Win 2003:
<?PHP
//Dette script er udviklet af Cyberfinn (webfun@webfun.dk)
//Må benyttes frit til privat brug, hvis bare disse linjer forbliver i scripet.
//Du skal opsætte dissse tre opsætninger.

//Her skal man opsætte ipadressen på serveren.
$serverip = "217.157.182.100";

//Den mappe hvor de forskellige domains ligger. (Da det er en win maskine skal det være sådan: c:\\Websites\\)
$dir = "c:\\Website\\kunder";

//------------------------------------------VIGTIG---------------------------------------------
//----------------------------Alt herunder skal der ikke ændres på.-----------------------------
echo "<div align=\"left\"><font size=\"3\" face=\"Verdana, Arial, Helvetica, sans-serif\"><strong>Server tjeksystem af Cyberfinn</strong><br>Arbejder i mappen: " . $dir . "<br>Serverens ip: " . $serverip . "</font></div>";
echo "<br><table border=\"1\" align=\"left\" cellpadding=\"3\" cellspacing=\"0\" bordercolor=\"#000000\">";
$green = "0";
$red = "0";
if ($handle = opendir($dir)) {
while (false !== ($file = readdir($handle))) {
if ($file != "." && $file != "..") {
echo "<tr>\n";
$ip_dns = "www." . $file;
echo "<td>" . $ip_dns . "</td>\n";
exec("ping ".$ip_dns." -n 1", $ping_results);
$rows = count($ping_results);
$tjek = $ping_results[$rows-1];
if(strstr($tjek,"not")) {
    echo "<td><font color=\"#FF0000\" >Domainet kører ikke.</font></td>\n"; $red++;
} else {
$ping = $ping_results[$rows-8];
preg_match("/\d{1,}\.\d{1,}\.\d{1,}\.\d{1,}/",$ping,$regs);
if ($regs[0] == $serverip) {
echo "<td><font color=\"#00CC33\">Kører på serveren</font></td>\n";
$green++; }
else {
echo "<td><font color=\"#FF0000\">Kører på en anden server (" . $regs[0] . ")</font></td>\n";
$red++;
}
}
echo "</tr>\n";
}
}
closedir($handle);
}
?>
</table>
<p>Der er <? echo $green; ?> domain som kører på denne server.<br>Der er <? echo $red; ?> domain som kører på denne server.</p>

Til WIN 2000:
<?PHP
//Dette script er udviklet af Cyberfinn (webfun@webfun.dk)
//Må benyttes frit til privat brug, hvis bare disse linjer forbliver i scripet.
//Du skal opsætte dissse tre opsætninger.

//Her skal man opsætte ipadressen på serveren.
$serverip = "217.157.182.100";

//Den mappe hvor de forskellige domains ligger. (Da det er en win maskine skal det være sådan: c:\\Websites\\)
$dir = "c:\\Website\\kunder";

//------------------------------------------VIGTIG---------------------------------------------
//----------------------------Alt herunder skal der ikke ændres på.-----------------------------
echo "<div align=\"left\"><font size=\"3\" face=\"Verdana, Arial, Helvetica, sans-serif\"><strong>Server tjeksystem af Cyberfinn</strong><br>Arbejder i mappen: " . $dir . "<br>Serverens ip: " . $serverip . "</font></div>";
echo "<br><table border=\"1\" align=\"left\" cellpadding=\"3\" cellspacing=\"0\" bordercolor=\"#000000\">";
$green = "0";
$red = "0";
if ($handle = opendir($dir)) {
while (false !== ($file = readdir($handle))) {
if ($file != "." && $file != "..") {
echo "<tr>\n";
$ip_dns = "www." . $file;
echo "<td>" . $ip_dns . "</td>\n";
exec("ping ".$ip_dns." -n 1", $ping_results);
$rows = count($ping_results);
$tjek = $ping_results[$rows-1];
if(strstr($tjek,"Unknown")) {
    echo "<td><font color=\"#FF0000\" >Domainet kører ikke.</font></td>\n"; $red++;
} else {
$ping = $ping_results[$rows-8];
preg_match("/\d{1,}\.\d{1,}\.\d{1,}\.\d{1,}/",$ping,$regs);
if ($regs[0] == $serverip) {
echo "<td><font color=\"#00CC33\">Kører på serveren</font></td>\n";
$green++; }
else {
echo "<td><font color=\"#FF0000\">Kører på en anden server (" . $regs[0] . ")</font></td>\n";
$red++;
}
}
echo "</tr>\n";
}
}
closedir($handle);
}
?>
</table>
<p>Der er <? echo $green; ?> domain som kører på denne server.<br>Der er <? echo $red; ?> domain som kører på denne server.</p>
Avatar billede Slettet bruger
13. juni 2003 - 13:34 #49
UPS, der var en lille fejl, prøv med disse:
Til Win 2003:
<?PHP
//Dette script er udviklet af Cyberfinn (webfun@webfun.dk)
//Må benyttes frit til privat brug, hvis bare disse linjer forbliver i scripet.
//Du skal opsætte dissse to opsætninger.

//Her skal man opsætte ipadressen på serveren.
$serverip = "217.157.182.100";

//Den mappe hvor de forskellige domains ligger. (Da det er en win maskine skal det være sådan: c:\\Websites\\)
$dir = "c:\\Website\\kunder";

//------------------------------------------VIGTIG---------------------------------------------
//----------------------------Alt herunder skal der ikke ændres på.-----------------------------
echo "<div align=\"left\"><font size=\"3\" face=\"Verdana, Arial, Helvetica, sans-serif\"><strong>Server tjeksystem af Cyberfinn</strong><br>Arbejder i mappen: " . $dir . "<br>Serverens ip: " . $serverip . "</font></div>";
echo "<br><table border=\"1\" align=\"left\" cellpadding=\"3\" cellspacing=\"0\" bordercolor=\"#000000\">";
$green = "0";
$red = "0";
if ($handle = opendir($dir)) {
while (false !== ($file = readdir($handle))) {
if ($file != "." && $file != "..") {
echo "<tr>\n";
$ip_dns = "www." . $file;
echo "<td>" . $ip_dns . "</td>\n";
exec("ping ".$ip_dns." -n 1", $ping_results);
$rows = count($ping_results);
$tjek = $ping_results[$rows-1];
if(strstr($tjek,"not")) {
    echo "<td><font color=\"#FF0000\" >Domainet kører ikke.</font></td>\n"; $red++;
} else {
$ping = $ping_results[$rows-8];
preg_match("/\d{1,}\.\d{1,}\.\d{1,}\.\d{1,}/",$ping,$regs);
if ($regs[0] == $serverip) {
echo "<td><font color=\"#00CC33\">Kører på serveren</font></td>\n";
$green++; }
else {
echo "<td><font color=\"#FF0000\">Kører på en anden server (" . $regs[0] . ")</font></td>\n";
$red++;
}
}
echo "</tr>\n";
}
}
closedir($handle);
}
?>
</table>
<p>Der er <? echo $green; ?> domains som kører på denne server.<br>Der er <? echo $red; ?> domains som kører på EN ANDEN SERVER.</p>

Til WIN 2000:
<?PHP
//Dette script er udviklet af Cyberfinn (webfun@webfun.dk)
//Må benyttes frit til privat brug, hvis bare disse linjer forbliver i scripet.
//Du skal opsætte dissse to opsætninger.

//Her skal man opsætte ipadressen på serveren.
$serverip = "217.157.182.100";

//Den mappe hvor de forskellige domains ligger. (Da det er en win maskine skal det være sådan: c:\\Websites\\)
$dir = "c:\\Website\\kunder";

//------------------------------------------VIGTIG---------------------------------------------
//----------------------------Alt herunder skal der ikke ændres på.-----------------------------
echo "<div align=\"left\"><font size=\"3\" face=\"Verdana, Arial, Helvetica, sans-serif\"><strong>Server tjeksystem af Cyberfinn</strong><br>Arbejder i mappen: " . $dir . "<br>Serverens ip: " . $serverip . "</font></div>";
echo "<br><table border=\"1\" align=\"left\" cellpadding=\"3\" cellspacing=\"0\" bordercolor=\"#000000\">";
$green = "0";
$red = "0";
if ($handle = opendir($dir)) {
while (false !== ($file = readdir($handle))) {
if ($file != "." && $file != "..") {
echo "<tr>\n";
$ip_dns = "www." . $file;
echo "<td>" . $ip_dns . "</td>\n";
exec("ping ".$ip_dns." -n 1", $ping_results);
$rows = count($ping_results);
$tjek = $ping_results[$rows-1];
if(strstr($tjek,"Unknown")) {
    echo "<td><font color=\"#FF0000\" >Domainet kører ikke.</font></td>\n"; $red++;
} else {
$ping = $ping_results[$rows-8];
preg_match("/\d{1,}\.\d{1,}\.\d{1,}\.\d{1,}/",$ping,$regs);
if ($regs[0] == $serverip) {
echo "<td><font color=\"#00CC33\">Kører på serveren</font></td>\n";
$green++; }
else {
echo "<td><font color=\"#FF0000\">Kører på en anden server (" . $regs[0] . ")</font></td>\n";
$red++;
}
}
echo "</tr>\n";
}
}
closedir($handle);
}
?>
</table>
<p>Der er <? echo $green; ?> domains som kører på denne server.<br>Der er <? echo $red; ?> domains som kører på EN ANDEN SERVER.</p>
Avatar billede Slettet bruger
17. juni 2003 - 17:00 #50
Får man snart point ??
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
IT-kurser om Microsoft 365, sikkerhed, personlig vækst, udvikling, digital markedsføring, grafisk design, SAP og forretningsanalyse.

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