Toon posts:

[ perl ] links aan post toevoegen

Pagina: 1
Acties:

Verwijderd

Topicstarter
ik heb een post script, nu wordt ook het email adress vd persoon gepost, ik wil graag dat dit een mailtolink wordt, hoe pas ik dat in?

print FH "<tr><TD><p>date// $dag-$maand-$jaar . $bericht . $naam . $email</p> <br> </TD></tr>\n";

  • RdeTuinman
  • Registratie: Mei 2001
  • Laatst online: 16-08 07:25
Misschien gewoon:
code:
1
print FH "<tr><TD><p>date// $dag-$maand-$jaar . $bericht . $naam . <a href=\"mailto:$email\">$email</a></p> <br> </TD></tr>\n";

:?

Verwijderd

Topicstarter
Op zondag 24 februari 2002 12:44 schreef RdeTuinman het volgende:
Misschien gewoon:
code:
1
print FH "<tr><TD><p>date// $dag-$maand-$jaar . $bericht . $naam . <a href=\"mailto:$email\">$email</a></p> <br> </TD></tr>\n";

:?
nope nu maak hij vh bericht een href en gooit hij de volgorde door elkaar...

  • RdeTuinman
  • Registratie: Mei 2001
  • Laatst online: 16-08 07:25
Wat staat er dan precies in je variabele $email?

Als daar bijvoorbeeld pietjepuk@domein.nl in staat zou er toch mailto:pietjepuk@domein.nl moeten komen te staan?

Verwijderd

Topicstarter
Op zondag 24 februari 2002 14:31 schreef RdeTuinman het volgende:
Wat staat er dan precies in je variabele $email?

Als daar bijvoorbeeld pietjepuk@domein.nl in staat zou er toch mailto:pietjepuk@domein.nl moeten komen te staan?
moment ik geef je de hele code wel even

Verwijderd

Topicstarter
#!/usr/bin/perl


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

use LWP::Simple;
use CGI;

chdir "/home/http/users/www.ttkdesign.nl/html/ttktoday/";
$filenaam = "index.htm";
open(F,"< $filenaam"); while (<F>) { $file.=$_ } close(F);

@tijd = localtime(time);
$dag = @tijd[3];
$maand = @tijd[4]+1;
$jaar = @tijd[5];
$jaar = 1900+@tijd[5];
#print FH "$dag-$maand-$jaar";


($begin, $eind) = split(/<!--hier eindigt de laatste reply-->/, $file);

$query = CGI::new();
$naam = $query->param("naam");
$email = $query->param("email");
$bericht = $query->param("bericht");


chdir "/home/http/users/www.ttkdesign.nl/html/ttktoday/";
open(FH, ">$filenaam");
print FH $begin;
print FH "<!--hier eindigt de laatste reply-->";
print FH "<tr><TD><p>date// $dag-$maand-$jaar . $bericht . $naam . <a href=\"mailto:$email\">$email</a></p> <br> </TD></tr>\n";
print FH $eind;



print <<einde;

>html>
<head>
<title>TTK _TODAY</title>
<script language="JavaScript"><!--
location.href = 'http://www.ttkdesign.nl/ttktoday/index.htm';
// --></script>
</head>


einde
</html>

Verwijderd

alweer jij >:)
Code volgende keer tussen [code] [/.code] tags (zonder punten)

Kan je effe een voorbeeldje laten zien van de pagina waar op wordt gepost met min. 2 berichten erop?

en waarom pak je eigenlijk geen guestbook script ben je van al deze bende af

Verwijderd

hier gaat het dus om:
code:
1
<tr><TD><p>date// 24-2-2002 . jennifer_laheye@hotmail.com . jennifer . <a href="mailto:i went walking with my dog, enjoyed the beautifull sun">i went walking with my dog, enjoyed the beautifull sun</a></p> <br> </TD></tr>

duidelijk dat je bericht in de variable $email staat. kwestie van namen veranderen in je html-f :) rmpje

Verwijderd

Topicstarter
Op zondag 24 februari 2002 16:57 schreef Foxboy het volgende:
alweer jij >:)
Code volgende keer tussen [code] [/.code] tags (zonder punten)

Kan je effe een voorbeeldje laten zien van de pagina waar op wordt gepost met min. 2 berichten erop?

en waarom pak je eigenlijk geen guestbook script ben je van al deze bende af
http://today.ttkdesign.nl

nee, want eerst was de posting goed.....alleen door die href te plaatsen is alles veranderd...

Verwijderd

wissel $email en $bericht om en je bent klaar (de iets minder mooie optie)

of je wisselt de namen in je formpje om.
Pagina: 1