Avatar billede Boddicker Seniormester
22. januar 2000 - 12:03 Der er 9 kommentarer og
1 løsning

Hvorfor f......

Nu har jeg med to forskellige scripts oplevet det samme. Jeg har installeret en guestbook og en søgemaskine. Begge dur fint. Problemet er at der - med ikke fastlagte intervaller - sker en fejl eller hvad man nu skal kalde det. I stedet for en nye side med resultatet af enten guestbogen eller søgemaskinen kommer der i IE blot en blank skærm. I NS kommer der en "Document contains no data". Hvis man så prøver igen, dur scriptet fint igen. Hvad f.... går der galt? Er der min webhoteludbyder, scriptet eller noget helt tredie, der er noget galt med?
Avatar billede Slettet bruger
22. januar 2000 - 16:14 #1
Godt spørgsmål!!!
Avatar billede Boddicker Seniormester
22. januar 2000 - 18:08 #2
Ja ik'? :)
Avatar billede hatecaps Nybegynder
23. januar 2000 - 00:22 #3
jeg havde noget lignende en gang. det viste sig at jeg ikke havde taget højde for alle mulige data/særtegn der kunne være med i kaldet til scriptet . hvis du poster scriptet kan vi jo kigge på det.
Avatar billede Boddicker Seniormester
23. januar 2000 - 10:00 #4
Problemet er, at det ikke drejer sig om et script, men om fire - indtil videre - der alle gør det samme!!
Avatar billede hatecaps Nybegynder
23. januar 2000 - 10:12 #5
så post et af dem, måske er det den samme fejl i alle fire .-)
Avatar billede Boddicker Seniormester
23. januar 2000 - 11:06 #6
Okidoki. Here we go:

#!/usr/bin/perl

# Kommentar-script

$bookfile = "../arkiv/mening/".$ENV{'QUERY_STRING'};

# Get the input
read(STDIN, $data, $ENV{'CONTENT_LENGTH'});

# Split the name-value pairs
@pairs = split(/&/, $data);

foreach $pair (@pairs)
{
    ($name, $value) = split(/=/, $pair);

    # Convert the HTML encoding
    $value =~ tr/+/ /;
    $value =~ s/%([a-fA-F0-9][a-fA-F0-9])/pack("C", hex($1))/eg;
    $value =~ s/<!--(.|\n)*-->//g;

    # Convert HTML stuff as necessary.
    $value =~ s/<([^>]|\n)*>//g;

    $FORM{$name} = $value;
}

# Verify that the required data has been received.
&missing_name unless $FORM{'name'};
&missing_msg unless $FORM{'msg'};

# Read in the book for editing
# Note:  These actions on the book file should be atomic (flock()).
open (FILE, "$bookfile") || die "Can't open $bookfile: $!\n";
@LINES=<FILE>;
close(FILE);
$SIZE=@LINES;

# Open book file
open (FILE, ">$bookfile") || die "Can't open $bookfile: $!\n";


for ($i = 0; $i <= $SIZE; $i++)
{
    $_=$LINES[$i];

    if (/<!--top-->/)
    {
        print FILE "<!--top-->\n";

        print FILE "<p align=\"left\"><font face=\"Arial, Helvetica, sans-serif\" size=-1><b>Navn:</b>\n";
        print FILE "$FORM{'name'}<br>";
       
        if ($FORM{'email'})
        {
            print FILE "<b>Email:</b>\n";
            print FILE " \<A HREF=\"mailto:$FORM{'email'}\">";
            print FILE "$FORM{'email'}</A><br>";
        }
       
        print FILE "<b>Kommentar:</b>\n";
        print FILE "$FORM{'msg'}<br></font></p>\n";
        print FILE " \<HR size=\"1\" noshade width=\"60%\"\">\n";
        print FILE "<br>";
    }
    else
    {
        print FILE $_;
    }
   

}

close (FILE);




# Response message.
print "Content-type: text/html\n\n";
print "<html><head>\n";
print "<script language=\"JavaScript\">\n";
print "<!--\n";
print "var img1onName, img2onName;\n";
print "// Find browser Netscape 3+ eller IE 4 +.\n";
print "bName = navigator.appName;\n";
print "bVer = parseInt(navigator.appVersion);\n";
print "if (bName == \"Netscape\" && bVer >= 3) {\n";
print "br = \"n3\";\n";
print "img1onName = \"http://www.movieboxen.dk/grafik/nyhedervalg.gif\";\n";
print "img2onName = \"http://www.movieboxen.dk/grafik/naesteugevalg.gif\";\n";
print "img4onName = \"http://www.movieboxen.dk/grafik/kalenderenvalg.gif\";\n";
print "img5onName = \"http://www.movieboxen.dk/grafik/arkivetvalg.gif\";\n";
print "img6onName = \"http://www.movieboxen.dk/grafik/kontaktosvalg.gif\";\n";
print "img7onName = \"http://www.movieboxen.dk/grafik/ommovieboxenvalg.gif\";\n";
print "img8onName = \"http://www.movieboxen.dk/grafik/linksvalg.gif\";\n";
print "    }\n";
print "    else if (bName == \"Microsoft Internet Explorer\" && bVer >= 4) {\n";
print "        br = \"e3\";\n";
print "        img1on = new Image();\n";
print "        img1on.src = \"http://www.movieboxen.dk/grafik/nyhedervalg.gif\";\n";
print "        img2on = new Image();\n";
print "        img2on.src = \"http://www.movieboxen.dk/grafik/naesteugevalg.gif\";\n";
print "        img4on = new Image();\n";
print "        img4on.src = \"http://www.movieboxen.dk/grafik/kalenderenvalg.gif\";\n";
print "        img5on = new Image();\n";
print "        img5on.src = \"http://www.movieboxen.dk/grafik/arkivetvalg.gif\";\n";
print "        img6on = new Image();\n";
print "        img6on.src = \"http://www.movieboxen.dk/grafik/kontaktosvalg.gif\";\n";
print "        img7on = new Image();\n";
print "        img7on.src = \"http://www.movieboxen.dk/grafik/ommovieboxenvalg.gif\";\n";
print "        img8on = new Image();\n";
print "        img8on.src = \"http://www.movieboxen.dk/grafik/linksvalg.gif\";\n";
print "    }\n";
print "    else {\n";
print "        br = \"n2\";\n";
print "    }\n";
print "// Lav objekter og preload billeder.\n";
print "    if ((br == \"n3\") || (br == \"e3\")) {\n";
print "        img1off = new Image();\n";
print "        img1off.src = \"http://www.movieboxen.dk/grafik/nyheder.gif\";\n";
print "        img2off = new Image();\n";
print "        img2off.src = \"http://www.movieboxen.dk/grafik/naesteuge.gif\";\n";
print "        img4off = new Image();\n";
print "        img4off.src = \"http://www.movieboxen.dk/grafik/kalenderen.gif\";\n";
print "        img5off = new Image();\n";
print "        img5off.src = \"http://www.movieboxen.dk/grafik/arkivet.gif\";\n";
print "        img6off = new Image();\n";
print "        img6off.src = \"http://www.movieboxen.dk/grafik/kontaktos.gif\";\n";
print "        img7off = new Image();\n";
print "        img7off.src = \"http://www.movieboxen.dk/grafik/ommovieboxen.gif\";\n";
print "        img8off = new Image();\n";
print "        img8off.src = \"http://www.movieboxen.dk/grafik/links.gif\";\n";
print "    }\n";
 
print "// Aktiver billeder.\n";
print "function imgAct(imgName) {\n";
print "    if (br == \"n3\") {\n";
print "        document[imgName].src = eval(imgName + \"onName\");\n";
print "    }\n";
print "    else if (br == \"e3\") {\n";
print "        document[imgName].src = eval(imgName + \"on.src\");\n";
print "    }\n";
print "}\n";
print "// Deaktiver billeder.\n";
print "function imgInact(imgName) {\n";
print "    if ((br == \"n3\") || (br = \"e3\")) {\n";
print "    document[imgName].src = eval(imgName + \"off.src\");\n";
print "    }\n";

print "}\n";
print "// -->\n";
print "</script>\n";


print "<style>\n";
print "body {font-family: Arial, Verdana, Helvetica, sans-serif; font-size: 10pt;}\n";
print "td {font-family: Arial, Verdana, Helvetica, sans-serif; font-size: 10pt;}\n";
print "a {text-decoration: underline; color: #0033CC}\n";
print ".overskrift {font-family: Arial, Helvetica, sans-serif; font-size: 12pt; font-weight: bold;}\n";
print ".underskrift {font-family: Arial, Helvetica, sans-serif; font-size: 8pt;}\n";
print "a:hover {color: #2D76FF}\n";
print "a:active {color: #DEE1FE}\n";
print "a:visited {color: #003399}\n";
print "</style>\n";
print "<META HTTP-EQUIV=\"Cache-Control\" CONTENT=\"no-store\">\n";
print "<META HTTP-EQUIV=\"Pragma\" CONTENT=\"no-cache\">\n";
print "<title>movieboxen.dk</title>\n";
print "</head>\n";
print "<body background=\"http://www.movieboxen.dk/grafik/baggrund.gif\" bgcolor=\"#205396\">\n";
print "<div align=\"center\">\n";
print "  <table width=\"700\" border=\"0\" cellspacing=\"0\" cellpadding=\"0\">\n";
print "    <tr>\n";
print "      <td width=\"37\" height=\"106\" valign=\"top\"> <IMG SRC=\"http://www.movieboxen.dk/grafik/topvideovenstre.gif\" USEMAP=\"#topvideovenstre\" BORDER=0 WIDTH=37 HEIGHT=106 onMouseOver=\"window.status='Tilbage til forsiden'; return true\" onMouseOut=\"window.status=''; return true\"></td>\n";
print "      <td width=\"626\" valign=\"top\">\n";
print "        <table width=\"626\" border=\"0\" cellspacing=\"0\" cellpadding=\"0\">\n";
print "          <tr valign=\"top\">\n";
print "            <td colspan=4> <IMG SRC=\"http://www.movieboxen.dk/grafik/topvideohojre1.gif\" USEMAP=\"#topvideohojre1\" BORDER=0 WIDTH=97 HEIGHT=74><IMG SRC=\"http://www.movieboxen.dk/grafik/topvideohojre2.gif\" USEMAP=\"#topvideohojre2\" BORDER=0 WIDTH=214 HEIGHT=74><img src=\"http://www.movieboxen.dk/grafik/topvideohojre3.gif\" width=\"208\" height=\"74\"><img src=\"http://www.movieboxen.dk/grafik/topvideohojre4.gif\" width=\"17\" height=\"74\"><img src=\"http://www.movieboxen.dk/grafik/topvideohojre5.gif\" width=\"90\" height=\"74\"></td>\n";
print "          </tr>\n";
print "          <tr>\n";
print "            <td width=\"113\" bgcolor=\"#FFFFFF\"> <IMG SRC=\"http://www.movieboxen.dk/grafik/bundvideovenstre.gif\" USEMAP=\"#bundvideovenstre\" BORDER=0 WIDTH=113 HEIGHT=82></td>\n";
print "<td bgcolor=\"#FFFFFF\" width=\"249\" align=\"center\">\n";
print "<A HREF=\"http://www.movieboxen.dk/cgi_bin/adban/zone1.pl?banner=NonSSI;page=01\"><IMG SRC=\"http://www.movieboxen.dk/cgi_bin/adban/zone1.pl?page=01\" border=0></A>";
print "            </td>";
print "            <td bgcolor=\"#FFFFFF\" width=\"249\" align=\"center\"> ";
print "<A HREF=\"http://www.movieboxen.dk/cgi_bin/adban/zone2.pl?banner=NonSSI;page=01\"><IMG SRC=\"http://www.movieboxen.dk/cgi_bin/adban/zone2.pl?page=01\" border=0></A>";
print "            </td>";
print "            <td bgcolor=\"#FFFFFF\" valign=\"top\" align=\"right\"><img src=\"http://www.movieboxen.dk/grafik/videobundhojre.gif\" width=\"15\" height=\"82\"></td>";
print "          </tr>";
print "          <tr background=\"http://www.movieboxen.dk/grafik/rasterbaggrund.gif\"> ";
print "            <td colspan=4 height=\"27\" background=\"http://www.movieboxen.dk/grafik/rasterbaggrund.gif\"> ";
print "              <table width=\"626\" border=\"0\" cellspacing=\"0\" cellpadding=\"0\">";
print "                <tr>     ";
print "                  <td height=\"27\" width=\"127\"> ";
print "                    <div align=\"center\"><a href=\"http://www.movieboxen.dk/nyheder.shtml\" onmouseover=\"imgAct('img1'), window.status='Nyheder'; return true\" onmouseout=\"imgInact('img1'), window.status=''; return true\"> ";
print "                      <img src=\"http://www.movieboxen.dk/grafik/nyheder.gif\" border=\"0\" name=\"img1\" width=\"94\" height=\"27\"></a></div>";
print "                  </td>";
print "                  <td height=\"27\" width=\"208\"> ";
print "                    <div align=\"center\"><a href=\"http://www.movieboxen.dk/naesteuge.shtml\" onmouseover=\"imgAct('img2'), window.status='Næste uges film'; return true\" onmouseout=\"imgInact('img2'), window.status=''; return true\"> ";
print "                      <img src=\"http://www.movieboxen.dk/grafik/naesteuge.gif\" border=\"0\" name=\"img2\"></a></div>";
print "                  </td>";
print "                  <td width=\"162\" height=\"27\"> ";
print "                    <div align=\"center\"><a href=\"http://www.movieboxen.dk/kalenderen.shtml\" onmouseover=\"imgAct('img4'), window.status='Kalenderen'; return true\" onmouseout=\"imgInact('img4'), window.status=''; return true\"> ";
print "                      <img src=\"http://www.movieboxen.dk/grafik/kalenderen.gif\" border=\"0\" name=\"img4\"></a></div>";
print "                  </td>";
print "                  <td width=\"129\" height=\"27\"> ";
print "                    <div align=\"center\"><a href=\"http://www.movieboxen.dk/arkivet.shtml\" onmouseover=\"imgAct('img5'), window.status='Tag et kig i arkivet'; return true\" onmouseout=\"imgInact('img5'), window.status=''; return true\"> ";
print "                      <img src=\"http://www.movieboxen.dk/grafik/arkivet.gif\" border=\"0\" name=\"img5\"></a></div>";
print "                  </td>";
print "                </tr>";
print "              </table>";
print "            </td>";
print "          </tr>";
print "        </table>";
print "      </td>";
print "      <td width=\"37\">";
print "      </td>";
print "    </tr>";
print "  </table>";
print "<!-- topslut --->";

print " <table width=\"700\" border=\"0\" cellspacing=\"0\" cellpadding=\"0\">";
print "    <tr>";
print "      <td height=\"400\" width=\"37\">&nbsp;</td>";
print "      <td height=\"400\" width=\"626\" bgcolor=\"#FFFFFF\">";
print "        <div align=\"center\"><span class=\"overskrift\">Tak for din kommentar!</span><br>";
print "          Du kan nu g&aring; tilbage og l&aelig;se dit - og andres - indl&aelig;g.<br>";
print "          <br>";
print "          <br>";
print "<a HREF=\"java script:history.go(-1)\" onMouseOver=\"window.status='Tilbage'; return true\" onMouseOut=\"window.status=''; return true\">Tilbage</a>";
print "        </div>";
print "      </td>";
print "      <td height=\"400\" width=\"37\">&nbsp;</td>";
print "    </tr>";
print "  </table>";


print "<!-- bundstart --->";
print "  <table width=\"700\" border=\"0\" cellspacing=\"0\" cellpadding=\"0\">";
print "    <tr> ";
print "      <td width=\"37\">&nbsp;</td>";
print "      <td width=\"626\" height=\"27\" background=\"http://www.movieboxen.dk/grafik/rasterbaggrund.gif\">";
print "        <table width=\"626\" border=\"0\" cellspacing=\"0\" cellpadding=\"0\">";
print "          <tr>";
print "            <td width=\"132\"> ";
print "              <div align=\"center\"><a href=\"http://www.movieboxen.dk/kontaktos.shtml\" onmouseover=\"imgAct('img6'), window.status='Kontakt os'; return true\" onmouseout=\"imgInact('img6'), window.status=''; return true\"> ";
print "                <img src=\"http://www.movieboxen.dk/grafik/kontaktos.gif\" border=\"0\" name=\"img6\"></a></div>";
print "            </td>";
print "            <td width=\"201\"> ";
print "              <div align=\"center\"><a href=\"http://www.movieboxen.dk/ommovieboxen.shtml\" onmouseover=\"imgAct('img7'), window.status='Om movieboxen.dk'; return true\" onmouseout=\"imgInact('img7'), window.status=''; return true\"> ";
print "                <img src=\"http://www.movieboxen.dk/grafik/ommovieboxen.gif\" border=\"0\" name=\"img7\" width=\"183\" height=\"27\"></a></div>";
print "            </td>";
print "            <td width=\"84\"> ";
print "              <div align=\"center\"><a href=\"http://www.movieboxen.dk/links.shtml\" onmouseover=\"imgAct('img8'), window.status='Links'; return true\" onmouseout=\"imgInact('img8'), window.status=''; return true\"> ";
print "                <img src=\"http://www.movieboxen.dk/grafik/links.gif\" border=\"0\" name=\"img8\"></a></div>";
print "            </td>";
print "            <td width=\"195\">&nbsp;</td>";
print "            <td width=\"14\">&nbsp;</td>";
print "          </tr>";
print "        </table>";
print "      </td>";
print "      <td width=\"37\">&nbsp;</td>";
print "    </tr>";
print "    <tr>";
print "      <td width=\"37\">&nbsp;</td>";
print "      <td width=\"626\">";
print "        <table width=\"626\" border=\"0\" cellspacing=\"0\" cellpadding=\"0\">";
print "          <tr>";
print "            <td width=\"15\" height=\"27\" valign=\"bottom\" align=\"left\" bgcolor=\"#FFFFFF\"><img src=\"http://www.movieboxen.dk/grafik/bundvenstre.gif\" width=\"15\" height=\"27\"></td>";
print "            <td bgcolor=\"#FFFFFF\" width=\"596\" height=\"27\" valign=\"bottom\"> ";
print "              <div align=\"right\"> <span class=\"underskrift\"><font size=-2> &copy;";
print "                movieboxen.dk 1999-2000</font></span></div>";
print "            </td>";
print "            <td width=\"15\" height=\"27\" bgcolor=\"#FFFFFF\"><img src=\"http://www.movieboxen.dk/grafik/bundhojre.gif\" width=\"15\" height=\"27\"></td>";
print "          </tr>";
print "        </table>";
print "      </td>";
print "      <td width=\"37\">&nbsp;</td>";
print "    </tr>";
print "  </table>";
print "</div>";
print "<MAP NAME=\"topvideovenstre\"> <AREA SHAPE=poly COORDS=\"36,27,10,36,5,45,37,100,37,27,36,27\" HREF=\"main.shtml\" onMouseOver=\"window.status='Tilbage til forsiden'; return true\" onMouseOut=\"window.status=''; return true\" alt=\"Tilbage til forsiden\" title=\"Tilbage til forsiden\"> ";
print "</MAP> <MAP NAME=\"topvideohojre1\"> <AREA SHAPE=poly COORDS=\"0,27,84,0,97,17,97,74,0,74,0,27\" HREF=\"main.shtml\" onMouseOver=\"window.status='Tilbage til forsiden'; return true\" onMouseOut=\"window.status=''; return true\" alt=\"Tilbage til forsiden\" title=\"Tilbage til forsiden\"> ";
print "</MAP> <MAP NAME=\"topvideohojre2\"> <AREA SHAPE=poly COORDS=\"0,15,27,55,0,74,0,15\" HREF=\"main.shtml\" onMouseOver=\"window.status='Tilbage til forsiden'; return true\" onMouseOut=\"window.status=''; return true\" alt=\"Tilbage til forsiden\" title=\"Tilbage til forsiden\"> ";
print "</MAP> <MAP NAME=\"bundvideovenstre\"> <AREA SHAPE=poly COORDS=\"95,0,14,49,0,24,0,0,95,0\" HREF=\"main.shtml\" onMouseOver=\"window.status='Tilbage til forsiden'; return true\" onMouseOut=\"window.status=''; return true\" alt=\"Tilbage til forsiden\" title=\"Tilbage til forsiden\"> ";
print "</MAP> ";
print "</body>";
print "</html>";

exit;


sub missing_name
{
    print "Content-type: text/html\n\n";
print "<script language=\"JavaScript\">";
print "<!--";
print "var img1onName, img2onName;";
print "// Find browser Netscape 3+ eller IE 4 +.";
print "bName = navigator.appName;";
print "bVer = parseInt(navigator.appVersion);";
print "if (bName == \"Netscape\" && bVer >= 3) {";
print "br = \"n3\";";
print "img1onName = \"http://www.movieboxen.dk/grafik/nyhedervalg.gif\";";
print "img2onName = \"http://www.movieboxen.dk/grafik/naesteugevalg.gif\";";
print "img4onName = \"http://www.movieboxen.dk/grafik/kalenderenvalg.gif\";";
print "img5onName = \"http://www.movieboxen.dk/grafik/arkivetvalg.gif\";";
print "img6onName = \"http://www.movieboxen.dk/grafik/kontaktosvalg.gif\";";
print "img7onName = \"http://www.movieboxen.dk/grafik/ommovieboxenvalg.gif\";";
print "img8onName = \"http://www.movieboxen.dk/grafik/linksvalg.gif\";";
print "    }";
print "    else if (bName == \"Microsoft Internet Explorer\" && bVer >= 4) {";
print "        br = \"e3\"; ";
print "        img1on = new Image();";
print "        img1on.src = \"http://www.movieboxen.dk/grafik/nyhedervalg.gif\";";
print "        img2on = new Image();";
print "        img2on.src = \"http://www.movieboxen.dk/grafik/naesteugevalg.gif\";";
print "        img4on = new Image();";
print "        img4on.src = \"http://www.movieboxen.dk/grafik/kalenderenvalg.gif\";";
print "        img5on = new Image();";
print "        img5on.src = \"http://www.movieboxen.dk/grafik/arkivetvalg.gif\";";
print "        img6on = new Image();";
print "        img6on.src = \"http://www.movieboxen.dk/grafik/kontaktosvalg.gif\";";
print "        img7on = new Image();";
print "        img7on.src = \"http://www.movieboxen.dk/grafik/ommovieboxenvalg.gif\";";
print "        img8on = new Image();";
print "        img8on.src = \"http://www.movieboxen.dk/grafik/linksvalg.gif\";";
print "    }";
print "    else {";
print "        br = \"n2\";";
print "    }";
print "// Lav objekter og preload billeder.";
print "    if ((br == \"n3\") || (br == \"e3\")) {";
print "        img1off = new Image();";
print "        img1off.src = \"http://www.movieboxen.dk/grafik/nyheder.gif\";";
print "        img2off = new Image();";
print "        img2off.src = \"http://www.movieboxen.dk/grafik/naesteuge.gif\";";
print "        img4off = new Image();";
print "        img4off.src = \"http://www.movieboxen.dk/grafik/kalenderen.gif\";";
print "        img5off = new Image();";
print "        img5off.src = \"http://www.movieboxen.dk/grafik/arkivet.gif\";";
print "        img6off = new Image();";
print "        img6off.src = \"http://www.movieboxen.dk/grafik/kontaktos.gif\";";
print "        img7off = new Image();";
print "        img7off.src = \"http://www.movieboxen.dk/grafik/ommovieboxen.gif\";";
print "        img8off = new Image();";
print "        img8off.src = \"http://www.movieboxen.dk/grafik/links.gif\";";
print "    }";
 
print "// Aktiver billeder.";
print "function imgAct(imgName) {";
print "    if (br == \"n3\") {";
print "        document[imgName].src = eval(imgName + \"onName\");";
print "    }";
print "    else if (br == \"e3\") {";
print "        document[imgName].src = eval(imgName + \"on.src\");";
print "    }";
print "}";
print "// Deaktiver billeder.";
print "function imgInact(imgName) {";
print "    if ((br == \"n3\") || (br = \"e3\")) {";
print "    document[imgName].src = eval(imgName + \"off.src\");";
print "    }";

print "}";
print "// -->";
print "</script>";


print "<style>";
print "body {font-family: Arial, Verdana, Helvetica, sans-serif; font-size: 10pt;}";
print "td {font-family: Arial, Verdana, Helvetica, sans-serif; font-size: 10pt;}";
print "a {text-decoration: underline; color: #0033CC}";
print ".overskrift {font-family: Arial, Helvetica, sans-serif; font-size: 12pt; font-weight: bold;}";
print ".underskrift {font-family: Arial, Helvetica, sans-serif; font-size: 8pt;}";
print "a:hover {color: #2D76FF}";
print "a:active {color: #DEE1FE}";
print "a:visited {color: #003399}";
print "</style>";
print "<META HTTP-EQUIV=\"Cache-Control\" CONTENT=\"no-store\">";
print "<META HTTP-EQUIV=\"Pragma\" CONTENT=\"no-cache\">";
print "<title>movieboxen.dk</title>";
print "</head>";
print "<body background=\"http://www.movieboxen.dk/grafik/baggrund.gif\" bgcolor=\"#205396\">";
print "<div align=\"center\"> ";
print "  <table width=\"700\" border=\"0\" cellspacing=\"0\" cellpadding=\"0\">";
print "<tr><td  colspan=2>";
print "        <div align=\"right\"><span class=\"underskrift\"><!--#exec cgi=\"/cgi_bin/timeit.pl\"--></span></div><td><tr>";
print "    <tr>";
print "      <td width=\"37\" height=\"106\" valign=\"top\"> <IMG SRC=\"http://www.movieboxen.dk/grafik/topvideovenstre.gif\" USEMAP=\"#topvideovenstre\" BORDER=0 WIDTH=37 HEIGHT=106 onMouseOver=\"window.status='Tilbage til forsiden'; return true\" onMouseOut=\"window.status=''; return true\"></td>";
print "      <td width=\"626\" valign=\"top\">";
print "        <table width=\"626\" border=\"0\" cellspacing=\"0\" cellpadding=\"0\">";
print "          <tr valign=\"top\">";
print "            <td colspan=4> <IMG SRC=\"http://www.movieboxen.dk/grafik/topvideohojre1.gif\" USEMAP=\"#topvideohojre1\" BORDER=0 WIDTH=97 HEIGHT=74><IMG SRC=\"http://www.movieboxen.dk/grafik/topvideohojre2.gif\" USEMAP=\"#topvideohojre2\" BORDER=0 WIDTH=214 HEIGHT=74><img src=\"http://www.movieboxen.dk/grafik/topvideohojre3.gif\" width=\"208\" height=\"74\"><img src=\"http://www.movieboxen.dk/grafik/topvideohojre4.gif\" width=\"17\" height=\"74\"><img src=\"http://www.movieboxen.dk/grafik/topvideohojre5.gif\" width=\"90\" height=\"74\"></td>";
print "          </tr>";
print "          <tr>";
print "            <td width=\"113\" bgcolor=\"#FFFFFF\"> <IMG SRC=\"http://www.movieboxen.dk/grafik/bundvideovenstre.gif\" USEMAP=\"#bundvideovenstre\" BORDER=0 WIDTH=113 HEIGHT=82></td>";
print "<td bgcolor=\"#FFFFFF\" width=\"249\" align=\"center\"> ";
print "<A HREF=\"http://www.movieboxen.dk/cgi_bin/adban/zone1.pl?banner=NonSSI;page=01\"><IMG SRC=\"http://www.movieboxen.dk/cgi_bin/adban/zone1.pl?page=01\" border=0></A>";
print "            </td>";
print "            <td bgcolor=\"#FFFFFF\" width=\"249\" align=\"center\"> ";
print "<A HREF=\"http://www.movieboxen.dk/cgi_bin/adban/zone2.pl?banner=NonSSI;page=01\"><IMG SRC=\"http://www.movieboxen.dk/cgi_bin/adban/zone2.pl?page=01\" border=0></A>";
print "            </td>";
print "            <td bgcolor=\"#FFFFFF\" valign=\"top\" align=\"right\"><img src=\"http://www.movieboxen.dk/grafik/videobundhojre.gif\" width=\"15\" height=\"82\"></td>";
print "          </tr>";
print "          <tr background=\"http://www.movieboxen.dk/grafik/rasterbaggrund.gif\"> ";
print "            <td colspan=4 height=\"27\" background=\"http://www.movieboxen.dk/grafik/rasterbaggrund.gif\"> ";
print "              <table width=\"626\" border=\"0\" cellspacing=\"0\" cellpadding=\"0\">";
print "                <tr>     ";
print "                  <td height=\"27\" width=\"127\"> ";
print "                    <div align=\"center\"><a href=\"http://www.movieboxen.dk/nyheder.shtml\" onmouseover=\"imgAct('img1'), window.status='Nyheder'; return true\" onmouseout=\"imgInact('img1'), window.status=''; return true\"> ";
print "                      <img src=\"http://www.movieboxen.dk/grafik/nyheder.gif\" border=\"0\" name=\"img1\" width=\"94\" height=\"27\"></a></div>";
print "                  </td>";
print "                  <td height=\"27\" width=\"208\"> ";
print "                    <div align=\"center\"><a href=\"http://www.movieboxen.dk/naesteuge.shtml\" onmouseover=\"imgAct('img2'), window.status='Næste uges film'; return true\" onmouseout=\"imgInact('img2'), window.status=''; return true\"> ";
print "                      <img src=\"http://www.movieboxen.dk/grafik/naesteuge.gif\" border=\"0\" name=\"img2\"></a></div>";
print "                  </td>";
print "                  <td width=\"162\" height=\"27\"> ";
print "                    <div align=\"center\"><a href=\"http://www.movieboxen.dk/kalenderen.shtml\" onmouseover=\"imgAct('img4'), window.status='Kalenderen'; return true\" onmouseout=\"imgInact('img4'), window.status=''; return true\"> ";
print "                      <img src=\"http://www.movieboxen.dk/grafik/kalenderen.gif\" border=\"0\" name=\"img4\"></a></div>";
print "                  </td>";
print "                  <td width=\"129\" height=\"27\"> ";
print "                    <div align=\"center\"><a href=\"http://www.movieboxen.dk/arkivet.shtml\" onmouseover=\"imgAct('img5'), window.status='Tag et kig i arkivet'; return true\" onmouseout=\"imgInact('img5'), window.status=''; return true\"> ";
print "                      <img src=\"http://www.movieboxen.dk/grafik/arkivet.gif\" border=\"0\" name=\"img5\"></a></div>";
print "                  </td>";
print "                </tr>";
print "              </table>";
print "            </td>";
print "          </tr>";
print "        </table>";
print "      </td>";
print "      <td width=\"37\">";
print "      </td>";
print "    </tr>";
print "  </table>";
print "<!-- topslut --->";

print " <table width=\"700\" border=\"0\" cellspacing=\"0\" cellpadding=\"0\">";
print "    <tr>";
print "      <td height=\"400\" width=\"37\">&nbsp;</td>";
print "      <td height=\"400\" width=\"626\" bgcolor=\"#FFFFFF\">";
print "        <div align=\"center\"><span class=\"overskrift\">Du glemte at skrive dit navn!</span><br>";
print "          Vær venlig at gå tilbage og prøv igen!<br>";
print "          <br>";
print "          <br>";
print "<a HREF=\"java script:history.go(-1)\" onMouseOver=\"window.status='Tilbage'; return true\" onMouseOut=\"window.status=''; return true\">Tilbage</a>";
print "        </div>";
print "      </td>";
print "      <td height=\"400\" width=\"37\">&nbsp;</td>";
print "    </tr>";
print "  </table>";


print "<!-- bundstart --->";
print "  <table width=\"700\" border=\"0\" cellspacing=\"0\" cellpadding=\"0\">";
print "    <tr> ";
print "      <td width=\"37\">&nbsp;</td>";
print "      <td width=\"626\" height=\"27\" background=\"http://www.movieboxen.dk/grafik/rasterbaggrund.gif\">";
print "        <table width=\"626\" border=\"0\" cellspacing=\"0\" cellpadding=\"0\">";
print "          <tr>";
print "            <td width=\"132\"> ";
print "              <div align=\"center\"><a href=\"http://www.movieboxen.dk/kontaktos.shtml\" onmouseover=\"imgAct('img6'), window.status='Kontakt os'; return true\" onmouseout=\"imgInact('img6'), window.status=''; return true\"> ";
print "                <img src=\"http://www.movieboxen.dk/grafik/kontaktos.gif\" border=\"0\" name=\"img6\"></a></div>";
print "            </td>";
print "            <td width=\"201\"> ";
print "              <div align=\"center\"><a href=\"http://www.movieboxen.dk/ommovieboxen.shtml\" onmouseover=\"imgAct('img7'), window.status='Om movieboxen.dk'; return true\" onmouseout=\"imgInact('img7'), window.status=''; return true\"> ";
print "                <img src=\"http://www.movieboxen.dk/grafik/ommovieboxen.gif\" border=\"0\" name=\"img7\" width=\"183\" height=\"27\"></a></div>";
print "            </td>";
print "            <td width=\"84\"> ";
print "              <div align=\"center\"><a href=\"http://www.movieboxen.dk/links.shtml\" onmouseover=\"imgAct('img8'), window.status='Links'; return true\" onmouseout=\"imgInact('img8'), window.status=''; return true\"> ";
print "                <img src=\"http://www.movieboxen.dk/grafik/links.gif\" border=\"0\" name=\"img8\"></a></div>";
print "            </td>";
print "            <td width=\"195\">&nbsp;</td>";
print "            <td width=\"14\">&nbsp;</td>";
print "          </tr>";
print "        </table>";
print "      </td>";
print "      <td width=\"37\">&nbsp;</td>";
print "    </tr>";
print "    <tr>";
print "      <td width=\"37\">&nbsp;</td>";
print "      <td width=\"626\">";
print "        <table width=\"626\" border=\"0\" cellspacing=\"0\" cellpadding=\"0\">";
print "          <tr>";
print "            <td width=\"15\" height=\"27\" valign=\"bottom\" align=\"left\" bgcolor=\"#FFFFFF\"><img src=\"http://www.movieboxen.dk/grafik/bundvenstre.gif\" width=\"15\" height=\"27\"></td>";
print "            <td bgcolor=\"#FFFFFF\" width=\"596\" height=\"27\" valign=\"bottom\"> ";
print "              <div align=\"right\"> <span class=\"underskrift\"><font size=-2> &copy;";
print "                movieboxen.dk 1999-2000</font></span></div>";
print "            </td>";
print "            <td width=\"15\" height=\"27\" bgcolor=\"#FFFFFF\"><img src=\"http://www.movieboxen.dk/grafik/bundhojre.gif\" width=\"15\" height=\"27\"></td>";
print "          </tr>";
print "        </table>";
print "      </td>";
print "      <td width=\"37\">&nbsp;</td>";
print "    </tr>";
print "  </table>";
print "</div>";
print "<MAP NAME=\"topvideovenstre\"> <AREA SHAPE=poly COORDS=\"36,27,10,36,5,45,37,100,37,27,36,27\" HREF=\"main.shtml\" onMouseOver=\"window.status='Tilbage til forsiden'; return true\" onMouseOut=\"window.status=''; return true\" alt=\"Tilbage til forsiden\" title=\"Tilbage til forsiden\"> ";
print "</MAP> <MAP NAME=\"topvideohojre1\"> <AREA SHAPE=poly COORDS=\"0,27,84,0,97,17,97,74,0,74,0,27\" HREF=\"main.shtml\" onMouseOver=\"window.status='Tilbage til forsiden'; return true\" onMouseOut=\"window.status=''; return true\" alt=\"Tilbage til forsiden\" title=\"Tilbage til forsiden\"> ";
print "</MAP> <MAP NAME=\"topvideohojre2\"> <AREA SHAPE=poly COORDS=\"0,15,27,55,0,74,0,15\" HREF=\"main.shtml\" onMouseOver=\"window.status='Tilbage til forsiden'; return true\" onMouseOut=\"window.status=''; return true\" alt=\"Tilbage til forsiden\" title=\"Tilbage til forsiden\"> ";
print "</MAP> <MAP NAME=\"bundvideovenstre\"> <AREA SHAPE=poly COORDS=\"95,0,14,49,0,24,0,0,95,0\" HREF=\"main.shtml\" onMouseOver=\"window.status='Tilbage til forsiden'; return true\" onMouseOut=\"window.status=''; return true\" alt=\"Tilbage til forsiden\" title=\"Tilbage til forsiden\"> ";
print "</MAP> ";
print "</body>";
print "</html>";

    exit;
}

sub missing_msg
{
    print "Content-type: text/html\n\n";
print "<script language=\"JavaScript\">";
print "<!--";
print "var img1onName, img2onName;";
print "// Find browser Netscape 3+ eller IE 4 +.";
print "bName = navigator.appName;";
print "bVer = parseInt(navigator.appVersion);";
print "if (bName == \"Netscape\" && bVer >= 3) {";
print "br = \"n3\";";
print "img1onName = \"http://www.movieboxen.dk/grafik/nyhedervalg.gif\";";
print "img2onName = \"http://www.movieboxen.dk/grafik/naesteugevalg.gif\";";
print "img4onName = \"http://www.movieboxen.dk/grafik/kalenderenvalg.gif\";";
print "img5onName = \"http://www.movieboxen.dk/grafik/arkivetvalg.gif\";";
print "img6onName = \"http://www.movieboxen.dk/grafik/kontaktosvalg.gif\";";
print "img7onName = \"http://www.movieboxen.dk/grafik/ommovieboxenvalg.gif\";";
print "img8onName = \"http://www.movieboxen.dk/grafik/linksvalg.gif\";";
print "    }";
print "    else if (bName == \"Microsoft Internet Explorer\" && bVer >= 4) {";
print "        br = \"e3\"; ";
print "        img1on = new Image();";
print "        img1on.src = \"http://www.movieboxen.dk/grafik/nyhedervalg.gif\";";
print "        img2on = new Image();";
print "        img2on.src = \"http://www.movieboxen.dk/grafik/naesteugevalg.gif\";";
print "        img4on = new Image();";
print "        img4on.src = \"http://www.movieboxen.dk/grafik/kalenderenvalg.gif\";";
print "        img5on = new Image();";
print "        img5on.src = \"http://www.movieboxen.dk/grafik/arkivetvalg.gif\";";
print "        img6on = new Image();";
print "        img6on.src = \"http://www.movieboxen.dk/grafik/kontaktosvalg.gif\";";
print "        img7on = new Image();";
print "        img7on.src = \"http://www.movieboxen.dk/grafik/ommovieboxenvalg.gif\";";
print "        img8on = new Image();";
print "        img8on.src = \"http://www.movieboxen.dk/grafik/linksvalg.gif\";";
print "    }";
print "    else {";
print "        br = \"n2\";";
print "    }";
print "// Lav objekter og preload billeder.";
print "    if ((br == \"n3\") || (br == \"e3\")) {";
print "        img1off = new Image();";
print "        img1off.src = \"http://www.movieboxen.dk/grafik/nyheder.gif\";";
print "        img2off = new Image();";
print "        img2off.src = \"http://www.movieboxen.dk/grafik/naesteuge.gif\";";
print "        img4off = new Image();";
print "        img4off.src = \"http://www.movieboxen.dk/grafik/kalenderen.gif\";";
print "        img5off = new Image();";
print "        img5off.src = \"http://www.movieboxen.dk/grafik/arkivet.gif\";";
print "        img6off = new Image();";
print "        img6off.src = \"http://www.movieboxen.dk/grafik/kontaktos.gif\";";
print "        img7off = new Image();";
print "        img7off.src = \"http://www.movieboxen.dk/grafik/ommovieboxen.gif\";";
print "        img8off = new Image();";
print "        img8off.src = \"http://www.movieboxen.dk/grafik/links.gif\";";
print "    }";
 
print "// Aktiver billeder.";
print "function imgAct(imgName) {";
print "    if (br == \"n3\") {";
print "        document[imgName].src = eval(imgName + \"onName\");";
print "    }";
print "    else if (br == \"e3\") {";
print "        document[imgName].src = eval(imgName + \"on.src\");";
print "    }";
print "}";
print "// Deaktiver billeder.";
print "function imgInact(imgName) {";
print "    if ((br == \"n3\") || (br = \"e3\")) {";
print "    document[imgName].src = eval(imgName + \"off.src\");";
print "    }";

print "}";
print "// -->";
print "</script>";


print "<style>";
print "body {font-family: Arial, Verdana, Helvetica, sans-serif; font-size: 10pt;}";
print "td {font-family: Arial, Verdana, Helvetica, sans-serif; font-size: 10pt;}";
print "a {text-decoration: underline; color: #0033CC}";
print ".overskrift {font-family: Arial, Helvetica, sans-serif; font-size: 12pt; font-weight: bold;}";
print ".underskrift {font-family: Arial, Helvetica, sans-serif; font-size: 8pt;}";
print "a:hover {color: #2D76FF}";
print "a:active {color: #DEE1FE}";
print "a:visited {color: #003399}";
print "</style>";
print "<META HTTP-EQUIV=\"Cache-Control\" CONTENT=\"no-store\">";
print "<META HTTP-EQUIV=\"Pragma\" CONTENT=\"no-cache\">";
print "<title>movieboxen.dk</title>";
print "</head>";
print "<body background=\"http://www.movieboxen.dk/grafik/baggrund.gif\" bgcolor=\"#205396\">";
print "<div align=\"center\"> ";
print "  <table width=\"700\" border=\"0\" cellspacing=\"0\" cellpadding=\"0\">";
print "<tr><td  colspan=2>";
print "        <div align=\"right\"><span class=\"underskrift\"><!--#exec cgi=\"/cgi_bin/timeit.pl\"--></span></div><td><tr>";
print "    <tr>";
print "      <td width=\"37\" height=\"106\" valign=\"top\"> <IMG SRC=\"http://www.movieboxen.dk/grafik/topvideovenstre.gif\" USEMAP=\"#topvideovenstre\" BORDER=0 WIDTH=37 HEIGHT=106 onMouseOver=\"window.status='Tilbage til forsiden'; return true\" onMouseOut=\"window.status=''; return true\"></td>";
print "      <td width=\"626\" valign=\"top\">";
print "        <table width=\"626\" border=\"0\" cellspacing=\"0\" cellpadding=\"0\">";
print "          <tr valign=\"top\">";
print "            <td colspan=4> <IMG SRC=\"http://www.movieboxen.dk/grafik/topvideohojre1.gif\" USEMAP=\"#topvideohojre1\" BORDER=0 WIDTH=97 HEIGHT=74><IMG SRC=\"http://www.movieboxen.dk/grafik/topvideohojre2.gif\" USEMAP=\"#topvideohojre2\" BORDER=0 WIDTH=214 HEIGHT=74><img src=\"http://www.movieboxen.dk/grafik/topvideohojre3.gif\" width=\"208\" height=\"74\"><img src=\"http://www.movieboxen.dk/grafik/topvideohojre4.gif\" width=\"17\" height=\"74\"><img src=\"http://www.movieboxen.dk/grafik/topvideohojre5.gif\" width=\"90\" height=\"74\"></td>";
print "          </tr>";
print "          <tr>";
print "            <td width=\"113\" bgcolor=\"#FFFFFF\"> <IMG SRC=\"http://www.movieboxen.dk/grafik/bundvideovenstre.gif\" USEMAP=\"#bundvideovenstre\" BORDER=0 WIDTH=113 HEIGHT=82></td>";
print "<td bgcolor=\"#FFFFFF\" width=\"249\" align=\"center\"> ";
print "<A HREF=\"http://www.movieboxen.dk/cgi_bin/adban/zone1.pl?banner=NonSSI;page=01\"><IMG SRC=\"http://www.movieboxen.dk/cgi_bin/adban/zone1.pl?page=01\" border=0></A>";
print "            </td>";
print "            <td bgcolor=\"#FFFFFF\" width=\"249\" align=\"center\"> ";
print "<A HREF=\"http://www.movieboxen.dk/cgi_bin/adban/zone2.pl?banner=NonSSI;page=01\"><IMG SRC=\"http://www.movieboxen.dk/cgi_bin/adban/zone2.pl?page=01\" border=0></A>";
print "            </td>";
print "            <td bgcolor=\"#FFFFFF\" valign=\"top\" align=\"right\"><img src=\"http://www.movieboxen.dk/grafik/videobundhojre.gif\" width=\"15\" height=\"82\"></td>";
print "          </tr>";
print "          <tr background=\"http://www.movieboxen.dk/grafik/rasterbaggrund.gif\"> ";
print "            <td colspan=4 height=\"27\" background=\"http://www.movieboxen.dk/grafik/rasterbaggrund.gif\"> ";
print "              <table width=\"626\" border=\"0\" cellspacing=\"0\" cellpadding=\"0\">";
print "                <tr>     ";
print "                  <td height=\"27\" width=\"127\"> ";
print "                    <div align=\"center\"><a href=\"http://www.movieboxen.dk/nyheder.shtml\" onmouseover=\"imgAct('img1'), window.status='Nyheder'; return true\" onmouseout=\"imgInact('img1'), window.status=''; return true\"> ";
print "                      <img src=\"http://www.movieboxen.dk/grafik/nyheder.gif\" border=\"0\" name=\"img1\" width=\"94\" height=\"27\"></a></div>";
print "                  </td>";
print "                  <td height=\"27\" width=\"208\"> ";
print "                    <div align=\"center\"><a href=\"http://www.movieboxen.dk/naesteuge.shtml\" onmouseover=\"imgAct('img2'), window.status='Næste uges film'; return true\" onmouseout=\"imgInact('img2'), window.status=''; return true\"> ";
print "                      <img src=\"http://www.movieboxen.dk/grafik/naesteuge.gif\" border=\"0\" name=\"img2\"></a></div>";
print "                  </td>";
print "                  <td width=\"162\" height=\"27\"> ";
print "                    <div align=\"center\"><a href=\"http://www.movieboxen.dk/kalenderen.shtml\" onmouseover=\"imgAct('img4'), window.status='Kalenderen'; return true\" onmouseout=\"imgInact('img4'), window.status=''; return true\"> ";
print "                      <img src=\"http://www.movieboxen.dk/grafik/kalenderen.gif\" border=\"0\" name=\"img4\"></a></div>";
print "                  </td>";
print "                  <td width=\"129\" height=\"27\"> ";
print "                    <div align=\"center\"><a href=\"http://www.movieboxen.dk/arkivet.shtml\" onmouseover=\"imgAct('img5'), window.status='Tag et kig i arkivet'; return true\" onmouseout=\"imgInact('img5'), window.status=''; return true\"> ";
print "                      <img src=\"http://www.movieboxen.dk/grafik/arkivet.gif\" border=\"0\" name=\"img5\"></a></div>";
print "                  </td>";
print "                </tr>";
print "              </table>";
print "            </td>";
print "          </tr>";
print "        </table>";
print "      </td>";
print "      <td width=\"37\">";
print "      </td>";
print "    </tr>";
print "  </table>";
print "<!-- topslut --->";

print " <table width=\"700\" border=\"0\" cellspacing=\"0\" cellpadding=\"0\">";
print "    <tr>";
print "      <td height=\"400\" width=\"37\">&nbsp;</td>";
print "      <td height=\"400\" width=\"626\" bgcolor=\"#FFFFFF\">";
print "        <div align=\"center\"><span class=\"overskrift\">Hov! Du glemte at skrive en kommentar!</span><br>";
print "          Vær venlig at gå tilbage og prøv igen!<br>";
print "          <br>";
print "          <br>";
print "<a HREF=\"java script:history.go(-1)\" onMouseOver=\"window.status='Tilbage'; return true\" onMouseOut=\"window.status=''; return true\">Tilbage</a>";
print "        </div>";
print "      </td>";
print "      <td height=\"400\" width=\"37\">&nbsp;</td>";
print "    </tr>";
print "  </table>";


print "<!-- bundstart --->";
print "  <table width=\"700\" border=\"0\" cellspacing=\"0\" cellpadding=\"0\">";
print "    <tr> ";
print "      <td width=\"37\">&nbsp;</td>";
print "      <td width=\"626\" height=\"27\" background=\"http://www.movieboxen.dk/grafik/rasterbaggrund.gif\">";
print "        <table width=\"626\" border=\"0\" cellspacing=\"0\" cellpadding=\"0\">";
print "          <tr>";
print "            <td width=\"132\"> ";
print "              <div align=\"center\"><a href=\"http://www.movieboxen.dk/kontaktos.shtml\" onmouseover=\"imgAct('img6'), window.status='Kontakt os'; return true\" onmouseout=\"imgInact('img6'), window.status=''; return true\"> ";
print "                <img src=\"http://www.movieboxen.dk/grafik/kontaktos.gif\" border=\"0\" name=\"img6\"></a></div>";
print "            </td>";
print "            <td width=\"201\"> ";
print "              <div align=\"center\"><a href=\"http://www.movieboxen.dk/ommovieboxen.shtml\" onmouseover=\"imgAct('img7'), window.status='Om movieboxen.dk'; return true\" onmouseout=\"imgInact('img7'), window.status=''; return true\"> ";
print "                <img src=\"http://www.movieboxen.dk/grafik/ommovieboxen.gif\" border=\"0\" name=\"img7\" width=\"183\" height=\"27\"></a></div>";
print "            </td>";
print "            <td width=\"84\"> ";
print "              <div align=\"center\"><a href=\"http://www.movieboxen.dk/links.shtml\" onmouseover=\"imgAct('img8'), window.status='Links'; return true\" onmouseout=\"imgInact('img8'), window.status=''; return true\"> ";
print "                <img src=\"http://www.movieboxen.dk/grafik/links.gif\" border=\"0\" name=\"img8\"></a></div>";
print "            </td>";
print "            <td width=\"195\">&nbsp;</td>";
print "            <td width=\"14\">&nbsp;</td>";
print "          </tr>";
print "        </table>";
print "      </td>";
print "      <td width=\"37\">&nbsp;</td>";
print "    </tr>";
print "    <tr>";
print "      <td width=\"37\">&nbsp;</td>";
print "      <td width=\"626\">";
print "        <table width=\"626\" border=\"0\" cellspacing=\"0\" cellpadding=\"0\">";
print "          <tr>";
print "            <td width=\"15\" height=\"27\" valign=\"bottom\" align=\"left\" bgcolor=\"#FFFFFF\"><img src=\"http://www.movieboxen.dk/grafik/bundvenstre.gif\" width=\"15\" height=\"27\"></td>";
print "            <td bgcolor=\"#FFFFFF\" width=\"596\" height=\"27\" valign=\"bottom\"> ";
print "              <div align=\"right\"> <span class=\"underskrift\"><font size=-2> &copy;";
print "                movieboxen.dk 1999-2000</font></span></div>";
print "            </td>";
print "            <td width=\"15\" height=\"27\" bgcolor=\"#FFFFFF\"><img src=\"http://www.movieboxen.dk/grafik/bundhojre.gif\" width=\"15\" height=\"27\"></td>";
print "          </tr>";
print "        </table>";
print "      </td>";
print "      <td width=\"37\">&nbsp;</td>";
print "    </tr>";
print "  </table>";
print "</div>";
print "<MAP NAME=\"topvideovenstre\"> <AREA SHAPE=poly COORDS=\"36,27,10,36,5,45,37,100,37,27,36,27\" HREF=\"main.shtml\" onMouseOver=\"window.status='Tilbage til forsiden'; return true\" onMouseOut=\"window.status=''; return true\" alt=\"Tilbage til forsiden\" title=\"Tilbage til forsiden\"> ";
print "</MAP> <MAP NAME=\"topvideohojre1\"> <AREA SHAPE=poly COORDS=\"0,27,84,0,97,17,97,74,0,74,0,27\" HREF=\"main.shtml\" onMouseOver=\"window.status='Tilbage til forsiden'; return true\" onMouseOut=\"window.status=''; return true\" alt=\"Tilbage til forsiden\" title=\"Tilbage til forsiden\"> ";
print "</MAP> <MAP NAME=\"topvideohojre2\"> <AREA SHAPE=poly COORDS=\"0,15,27,55,0,74,0,15\" HREF=\"main.shtml\" onMouseOver=\"window.status='Tilbage til forsiden'; return true\" onMouseOut=\"window.status=''; return true\" alt=\"Tilbage til forsiden\" title=\"Tilbage til forsiden\"> ";
print "</MAP> <MAP NAME=\"bundvideovenstre\"> <AREA SHAPE=poly COORDS=\"95,0,14,49,0,24,0,0,95,0\" HREF=\"main.shtml\" onMouseOver=\"window.status='Tilbage til forsiden'; return true\" onMouseOut=\"window.status=''; return true\" alt=\"Tilbage til forsiden\" title=\"Tilbage til forsiden\"> ";
print "</MAP> ";
print "</body>";
print "</html>";
    exit;
}


Som du nok kan se, har jeg indsat en masse alm. html-kode, så den passer ind på min side. Så kunne man jo tro, at DET var grunden, men selv i dens grundform laver den nøjagtige samme fejl...
Avatar billede hatecaps Nybegynder
23. januar 2000 - 19:14 #7
ok, inden jeg begynder at gå det igennem, et lille tip:

i stedet for al det HTML i dit script, put hele skidtet i en HTML fil, det er jjo ikke sådan at du fylder den ud med variabler. så behøver du bare at skrive f.eks

sub missing_msg
{
print "Content-type: text/html\n\n";
print "<script> location.href=\'mismes.html\' </script>";
exit;
}

o.s.v

jeg vender tilbage med mere når jeg har ryddet lidt op id et :-)
Avatar billede hatecaps Nybegynder
23. januar 2000 - 20:21 #8
jeg har lavet lidt om i dit script.. for at få det til at virke skal du lave mismes.html , misnam.html og response.txt svarende til det HTML du tidligere havde i selve scriptet. Jeg kunne kke umiddelbart finde en åbenlys fejl, men jeg er sikker på at dine problemer skyldes den store mængde print kommandoer du havde før.

prøv det en gang og se om fejlen stadigvæk opstår af og til

#!/usr/bin/perl

# Kommentar-script

$bookfile = "../arkiv/mening/".$ENV{'QUERY_STRING'};

# Get the input
read(STDIN, $data, $ENV{'CONTENT_LENGTH'});

# Split the name-value pairs
@pairs = split(/&/, $data);

foreach $pair (@pairs)
{
    ($name, $value) = split(/=/, $pair);

    # Convert the HTML encoding
    $value =~ tr/+/ /;
    $value =~ s/%([a-fA-F0-9][a-fA-F0-9])/pack("C", hex($1))/eg;
    $value =~ s/<!--(.|\n)*-->//g;

    # Convert HTML stuff as necessary.
    $value =~ s/<([^>]|\n)*>//g;

    $FORM{$name} = $value;
}

# Verify that the required data has been received.
&missing_name unless $FORM{'name'};
&missing_msg unless $FORM{'msg'};

# Read in the book for editing
# Note:  These actions on the book file should be atomic (flock()).
open (FILE, "$bookfile") || die "Can't open $bookfile: $!\n";
@LINES=<FILE>;
close(FILE);
$SIZE=@LINES;

# Open book file
open (FILE, ">$bookfile") || die "Can't open $bookfile: $!\n";


for ($i = 0; $i <= $SIZE; $i++)
{
    $_=$LINES[$i];

    if (/<!--top-->/)
    {
        print FILE "<!--top-->\n";

        print FILE "<p align=\"left\"><font face=\"Arial, Helvetica, sans-serif\" size=-1><b>Navn:</b>\n";
        print FILE "$FORM{'name'}<br>";
       
        if ($FORM{'email'})
        {
            print FILE "<b>Email:</b>\n";
            print FILE " \<A HREF=\"mailto:$FORM{'email'}\">";
            print FILE "$FORM{'email'}</A><br>";
        }
       
        print FILE "<b>Kommentar:</b>\n";
        print FILE "$FORM{'msg'}<br></font></p>\n";
        print FILE " \<HR size=\"1\" noshade width=\"60%\"\">\n";
        print FILE "<br>";
    }
    else
    {
        print FILE $_;
    }
   

}

close (FILE);

# Response message.

print "Content-type: text/html\n\n";

open (file,"<response.txt");
@lines = <FILE>;
close (FILE);
foreach $i(@lines) {
    print $i;
    }

exit;
###############################################################

sub missing_name
{
    print "Content-type: text/html\n\n";
    print "<script> location.href=\'misnam.html\'</script>";
    exit;
}

sub missing_msg
{
    print "Content-type: text/html\n\n";
    print "<script> location.href=\'mismes.html\'</script>";
    exit;
}

Avatar billede Boddicker Seniormester
24. januar 2000 - 08:19 #9
Well
Avatar billede Boddicker Seniormester
24. januar 2000 - 08:21 #10
Well... jeg har ikke rigtig haft tid til at tjekke din kode endnu, men jeg synes, at du har lagt så meget arbejde i det, at du under alle omstændigheder har fortjent den 30 points!

Jeg er ikke selv helt sikker på, at det er den megen html-kode, der er skyld i misséren. Selv, når jeg bruger en totalt blank udgave (altså en helt ren <html><body> etc...) kommer fejlen!

Tak for hjælpen!
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