---
title: "istället för att inkludera så ska det.."
type: "forum-thread"
url: "https://www.webforum.nu/amne/php/82514-istället-för-att-inkludera-så-ska-det"
topic: "PHP"
topic_url: "https://www.webforum.nu/amne/php"
author: "medialabs"
published: "2003-07-22T23:46:31.000Z"
updated: "2003-07-23T11:29:06.000Z"
replies: 2
views: 295
page: 1
pages: 1
language: "sv-SE"
site: "webForum — webforum.nu"
rights: "Upphovsrätten till varje inlägg tillhör dess författare."
attribution: "Citera som: webForum, https://www.webforum.nu/amne/php/82514-istället-för-att-inkludera-så-ska-det"
---

# istället för att inkludera så ska det..

## #1 — medialabs, 2003-07-22T23:46Z

jag skulle också behöva hjälp med att man istället för att inkluder med filen serverinfo.inc.php i getmail.php,

serverinfo.inc.php

\<?
    $bruger="";
    $adgangskode="";
    $server="";
    $port="110";

?\>

jag skulle vilja ha 2 st textboxar istället där man anger mail och lösen eftersom jag har flera olika användare på min mail. Jag skulle ha gjort detta själv men då jag inte kan ett dugg om PHP så överlåter jag det till er proffs.

getmail.php \| som är huvudsidan, där jag skulle vilja ha textboxarna och där alla mail presenteras. (finns lite WML kod i den, bara att ignorera wmlkoden..)

\<?
/\*
Copyright (c) Bo Knudsen <php@zazz.dk>
<http://www.zazz.dk>
<http://www.boligmester.dk>
\*/
?\>
\<? header("content-type:text/vnd.wap.wml"); ?\> 
\<? print '\<?xml version="1.0" encoding="ISO-8859-1" ?\>'; ?\> 
\<? print '\<!DOCTYPE wml PUBLIC "-//WAPFORUM//DTD WML 1.1//EN"'; ?\> 
\<? print '"http://www.wapforum.org/DTD/wml_1.1.xml"\>'; ?\> 

\<wml\> 
\<card title="Medialabs WAPmail"\> 
\<p\> 
\<?
require ("serverinfo.inc.php");
$fp = fsockopen($server, $port);
$dummy = fgets($fp, 1024);
fputs($fp, "USER $bruger\\r\\n");
$dummy = fgets($fp, 1024);
fputs($fp, "PASS $adgangskode\\r\\n");
$tredjeLinje = fgets($fp, 1024);
fputs($fp, "STAT\\r\\n");
$mails = fgets($fp, 1024);
$mails = split(" ", $mails);
$no_of_mails = $mails\[1\];
if (!$showmail)
{
    
    for ($i = 1; $i \<= $no_of_mails; $i++)
    {
        fputs($fp, "TOP $i 0\\r\\n");
        while (substr($linje = fgets($fp, 1024), 0, 2) != chr(13).chr(10)) 
        {
            if (substr($linje, 0, 9) == "Subject: ") 
            {
                $emne = htmlspecialchars(substr($linje, 9));
            }
            if (substr($linje, 0, 6) == "From: ") 
            {
                $fra = htmlspecialchars(substr($linje, 6));
            }
            if (substr($linje, 0, 6) == "Date: ") 
            {
                $dato = htmlspecialchars(substr($linje, 6));
            }
        }
        echo "$i.) \<a href=\\"$PHP_SELF?showmail=$i\\"\>".$emne."\</a\>\<br/\>\\n";
    }
}
if ($showmail) 
{
    echo "\<a href=\\"$PHP_SELF\\"\>Tillbaka\</a\>\<br/\>";
    fputs($fp, "RETR $showmail\\r\\n");
    $dummy = fgets($fp, 1024);

    while (substr($linje = fgets($fp, 1024), 0, 2) != chr(13).chr(10)) 
    {
        if (substr($linje, 0, 9) == "Subject: ") 
        {
            $emne = htmlspecialchars(substr($linje, 9));
        }
        if (substr($linje, 0, 6) == "From: ") 
        {
            $fra = htmlspecialchars(substr($linje, 6));
        }
        if (substr($linje, 0, 4) == "To: ") 
        {
            $til = htmlspecialchars(substr($linje, 4));
        }
        if (substr($linje, 0, 6) == "Date: ") 
        {
            $dato = htmlspecialchars(substr($linje, 6));
        }
    }
echo "Datum: ".$dato."\<br/\>\\n";
echo "Från: ".$fra."\<br/\>\\n";
echo "Till: ".$til."\<br/\>\\n";
echo "Ämne: ".$emne."\<br/\>\\n";
$posttekst="----------------\<br/\>";
while (substr($linje = fgets($fp, 1024), 0, 3) != ".".chr(13).chr(10)) 
    {
        $posttekst .= $linje;
    }
    $no_html = strip_tags($posttekst);
    $start = strpos ($no_html, "quoted-printable");
    $start=$start+17;
    $no_htmlstart = substr($no_html, $start);
    $slut=strpos($no_htmlstart, "------=");
    $no_htmlslut= substr($no_html, $start, $slut);
    
    echo "----------------\<br/\>".$no_htmlslut;
}
?\>
\</p\> 
\</card\> 
\</wml\>

Permalänk: https://www.webforum.nu/p/82514

## #2 — monAmour, 2003-07-23T05:53Z

Kör utan include filen då:

```
<?
/*
Copyright (c) Bo Knudsen [email]php@zazz.dk[/email]
[url]http://www.zazz.dk[/url]
[url]http://www.boligmester.dk[/url]
*/
?>
<? header("content-type:text/vnd.wap.wml"); ?>
<? print '<?xml version="1.0" encoding="ISO-8859-1" ?>'; ?>
<? print '<!DOCTYPE wml PUBLIC "-//WAPFORUM//DTD WML 1.1//EN"'; ?>
<? print '"http://www.wapforum.org/DTD/wml_1.1.xml">'; ?>

<wml>
<card title="Medialabs WAPmail">
<p>
<?
$logged_in = false;
if (isset($_POST['submit'])) {
$server = $_POST['server'];
$bruger = $_POST['bruger'];
$adgangskode = $_POST['adgangskode'];
$port = "110";

$logged_in = true;
}

if ($logged_in) {

$fp = fsockopen($server, $port);
$dummy = fgets($fp, 1024);
fputs($fp, "USER $bruger\r\n");
$dummy = fgets($fp, 1024);
fputs($fp, "PASS $adgangskode\r\n");
$tredjeLinje = fgets($fp, 1024);
fputs($fp, "STAT\r\n");
$mails = fgets($fp, 1024);
$mails = split(" ", $mails);
$no_of_mails = $mails[1];
if (!$showmail)
{

for ($i = 1; $i <= $no_of_mails; $i++)
{
fputs($fp, "TOP $i 0\r\n");
while (substr($linje = fgets($fp, 1024), 0, 2) != chr(13).chr(10))
{
if (substr($linje, 0, 9) == "Subject: ")
{
$emne = htmlspecialchars(substr($linje, 9));
}
if (substr($linje, 0, 6) == "From: ")
{
$fra = htmlspecialchars(substr($linje, 6));
}
if (substr($linje, 0, 6) == "Date: ")
{
$dato = htmlspecialchars(substr($linje, 6));
}
}
echo "$i.) <a href=\"$PHP_SELF?showmail=$i\">".$emne."</a><br/>\n";
}
}
if ($showmail)
{
echo "<a href=\"$PHP_SELF\">Tillbaka</a><br/>";
fputs($fp, "RETR $showmail\r\n");
$dummy = fgets($fp, 1024);

while (substr($linje = fgets($fp, 1024), 0, 2) != chr(13).chr(10))
{
if (substr($linje, 0, 9) == "Subject: ")
{
$emne = htmlspecialchars(substr($linje, 9));
}
if (substr($linje, 0, 6) == "From: ")
{
$fra = htmlspecialchars(substr($linje, 6));
}
if (substr($linje, 0, 4) == "To: ")
{
$til = htmlspecialchars(substr($linje, 4));
}
if (substr($linje, 0, 6) == "Date: ")
{
$dato = htmlspecialchars(substr($linje, 6));
}
}
echo "Datum: ".$dato."<br/>\n";
echo "Från: ".$fra."<br/>\n";
echo "Till: ".$til."<br/>\n";
echo "Ämne: ".$emne."<br/>\n";
$posttekst="----------------<br/>";
while (substr($linje = fgets($fp, 1024), 0, 3) != ".".chr(13).chr(10))
{
$posttekst .= $linje;
}
$no_html = strip_tags($posttekst);
$start = strpos ($no_html, "quoted-printable");
$start=$start+17;
$no_htmlstart = substr($no_html, $start);
$slut=strpos($no_htmlstart, "------=");
$no_htmlslut= substr($no_html, $start, $slut);

echo "----------------<br/>".$no_htmlslut;
}

} else { // not logged in with server info
?>
<!-- Här kanske ett formulär för inloggning ser annorluna ut i WML än i HTML men det får du redigera själv -->
<form method="post" action="<? echo($_SERVER['PHP_SELF']); ?>">
Server:<br>
<input type="text" name="server" size="30"><br>
Bruger:<br>
<input type="text" name="bruger" size="30"><br>
Adgangskode:<br>
<input type="password" name="adgangskode" size="30"><br>
<input type="submit" name="submit" value="Logga in"><br>
</form>
<?
}
?>
</p>
</card>
</wml>
```

Permalänk: https://www.webforum.nu/p/1116575

## #3 — medialabs, 2003-07-23T11:29Z

r. ska testa med en annan mobil först..

Permalänk: https://www.webforum.nu/p/1116757

---

Tråden på webben: https://www.webforum.nu/amne/php/82514-istället-för-att-inkludera-så-ska-det