Re: Smilies im Forum (C. Bergmann bib) - baseportal Forum - Web-Anwendungen einfach, schnell, leistungsfähig!
baseportal
English - Deutsch "Es gibt keine dummen Fragen - jeder hat einmal angefangen"

 baseportal-ForumDie aktuellsten 10, 30, 50, 100 Einträge anzeigen.  

 
 Ausgewählter Eintrag: Zur Liste 
    Beitrag von Giga (54 Beiträge) am Freitag, 14.Dezember.2001, 00:31.
    Re: Smilies im Forum (C. Bergmann bib)

      hi nochmal,

      Das "$_put{Icon}" habe ich soweit ich es sehen konnte an 3 Stellen ergänzt, hat leider nicht geklappt. Was sind das für diverse Stellen und wieviele ?


    Antworten

 Alle Einträge zum Thema: Zur Liste 
    Beitrag von Giga (54 Beiträge) am Mittwoch, 12.Dezember.2001, 03:26.
    Smilies im Forum (C. Bergmann bib)

      hi,

      Vielleicht interresiert es auch andere. Kann man Bilder oder animierte Smilies im Forum einfügen ?
      Außerdem würde ich anstatt des ">"-Zeichens bei der Auflistung durch irgend ein anderes kleines Image austauschen.

     Antworten

    Beitrag von Oliver ;-) (439 Beiträge) am Mittwoch, 12.Dezember.2001, 13:04.
    Re: Smilies im Forum (C. Bergmann bib)

      Hallo Giga,

      das geht natürlich.

      Du musst die Datenbank um das Feld z.B. "Icon" erweitern und in das Eingabeformular Radiobuttons und Gifs einbauen. In etwa so:

      <table><tr><td>
      <input type=radio value=smiley name=Icon:= ".($icon eq "smiley"?"checked ":"")."><img src='http://www.domaine.de/smiley/smiley.gif'>
      </td><td>...
      

      Außerdem musst du im Quelltext an diversen Stellen das "$_put{Icon}" ergänzen.

      Grüße
      Oliver ;-)

     Antworten

    Beitrag von Giga (54 Beiträge) am Freitag, 14.Dezember.2001, 00:31.
    Re: Smilies im Forum (C. Bergmann bib)

      hi nochmal,

      Das "$_put{Icon}" habe ich soweit ich es sehen konnte an 3 Stellen ergänzt, hat leider nicht geklappt. Was sind das für diverse Stellen und wieviele ?

     Antworten

    Beitrag von Oliver ;-) (439 Beiträge) am Freitag, 14.Dezember.2001, 11:02.
    Re: Smilies im Forum (C. Bergmann bib)

      Hallo Giga,

      ich habe dir mal alle Stellen rauskopiert, in denen "icon" vorkommt (die Formatierungen brauchst du ja nicht beachten):

      if($Vorschau || %_put)
      {
      out "<center><table cellspacing=2 width=95% cellpadding=4><tr bgcolor=$hellmark><td><span class=\"text\"><b> ".($Vorschau?"Vorschau:":"Ihr Eintrag:")."</b></span></td><td width=10% align=center nowrap> <a class=\"tlink\" href=\"#list\">Zur Liste</a> </td></tr></table></center><span class=\"tatext\"><ul>";
      &all_out("", $_put{Name}, $_put{EMail}, $_put{WWW}, $_put{Titel}, $_put{Text},$_put{Icon});
      
      ...


      if($Vorschau || $emsg)
      {
      &form_out($_get{Pos}, $_put{Name}, $_put{EMail}, $_put{WWW}, $_put{Titel}, $_put{Text},$_put{Icon});
      
      ...


      if($Vorschau || $emsg)
      {
      &form_out($_get{Pos}, $_put{Name}, $_put{EMail}, $_put{WWW}, $_put{Titel}, $_put{Text},$_put{Icon});
      
      ...


      sub form_out
      {
      my($pos, $name, $email, $www, $titel, $text, $icon)=@_;
      
      ...


      while(get_next || @_>0)
      {
      ($Name, $EMail, $WWW, $Titel, $Text, $Icon, $Datum)=(@_, time) if @_>0;
      
      ...


      out "<h4>".($Icon?"<img src='http://www.verwitwet.de/bilder/smiley/$Icon.gif' border=0>":"<img src='http://www.verwitwet.de/test/spacer.gif' border=0 width='16' hight='16'>")."  $Titel</h4>";
      
      ...


      Vielleicht kommst du ja damit weiter.

      Grüße
      Oliver ;-)

     Antworten

    Beitrag von Giga (54 Beiträge) am Freitag, 14.Dezember.2001, 20:29.
    Re: Smilies im Forum (C. Bergmann bib)

      hi Oliver :-)

      werde mich melden, wenn ich es ausprobiert habe.

      Gruß

     Antworten

    Beitrag von Giga (54 Beiträge) am Samstag, 5.Januar.2002, 05:10.
    Re: Smilies im Forum (C. Bergmann bib)

      hi oliver (nach langer Zeit :-) )

      Wo ich die letzte Zeile von deinem letzten Beitrag einfügen soll verstehe ich nicht:

      out "<h4>".($Icon?"<img src='http://www.verwitwet.de/bilder/smiley/$Icon.gif' border=0>":"<img src='http://www.verwitwet.de/test/spacer.gif' border=0 width='16' hight='16'>")."  $Titel</h4>";
      

      Wenn ich in das Eingabeformular "input type" usw. einfüge geht es nicht, weil es in "perl" ist bzw. ich kapiere es nicht wo es reinsoll :-)
      Soll ich das mit dem "input type radio..." dann weglassen wenn ich o.g. "out-Zeile" benutze?

      Hoffe du lebst noch und gibst mir eine Antwort :-)
      Gruß
      Giga

     Antworten

    Beitrag von Oliver ;-) (439 Beiträge) am Samstag, 5.Januar.2002, 22:58.
    Re: Smilies im Forum (C. Bergmann bib)

      Hallo Giga,

      ich lebe noch... ;-)

      Irgendwo im Quelltext steht eine Zeile, die mit

      out "<h4>... 
      

      beginnt und mit

      $Titel</h4>"; 
      

      endet. Dort musst du dann das mit dem Icon einbauen.

      Für das Formular habe ich dir mal die entsprechende Stelle meines Forms rausgeschnitten:

      ....
      <input type=checkbox name="SchickEmail:=" checked value="1"></span></td><td colspan="2"> </td></tr>
      <tr><td><font face="arial,helvetica" size="2">WWW:</font></td><td colspan="4"><input type=text name="WWW:=" size=40 maxlength=100 value="$www"></td></tr><tr>
      <td colspan="5">
      <!-- hier sind die Icons -->
      <table width="100%" cellspacing=0 cellpadding=0>
      <tr>
      <td> </td><td>
      EOF
      out "<input type=radio value=smiley name=Icon:= ".($icon eq "smiley"?"checked ":"")."style='border-color:#FFCC00;background-color:#FFFFff;'><img src='http://www.verwitwet.de/bilder/smiley/smiley.gif'><span class='tatext'> Froh</span></td>";
      out "<td><input type='radio' value='zornig' name='Icon:=' ".($icon eq "zornig"?"checked ":"")."style='border-color:#FFCC00; background-color:#FFFFff;'><img src='http://www.verwitwet.de/bilder/smiley/zornig.gif'><span class='tatext'> Ärger</span></td>";
      out "<td><input type=radio value=traurig name=Icon:= ".($icon eq "zornig"?"checked ":"")."style='border-color:#FFCC00; background-color:#FFFFff;'><img src='http://www.verwitwet.de/bilder/smiley/traurig.gif'><span class=tatext>Trauer</span></td>";
      out "<td><input type=radio value=daumen_unten name=Icon:= ".($icon eq "daumen_unten"?"checked ":"")."style='border-color:#FFCC00; background-color:#FFFFff;'><img src='http://www.verwitwet.de/bilder/smiley/daumen_unten.gif'><span class='tatext'> Kontra</span></td>";
      out "<td><input type='radio' value='daumen_oben' name='Icon:=' ".($icon eq "daumen_oben"?"checked ":"")."style='border-color:#FFCC00; background-color:#FFFFff;'>";
      out <<EOF;
      <img src='http://www.verwitwet.de/bilder/smiley/daumen_oben.gif'><span class='tatext'> Pro</span></td>
      </tr><tr>
      <td> </td><td>
      EOF
      out "<input type='radio' value='blume' name='Icon:=' ".($icon eq "blume"?"checked ":"")."style='border-color:#FFCC00; background-color:#FFFFff;'><img src='http://www.verwitwet.de/bilder/smiley/blume.gif'><span class='tatext'> Danke</span></td>";
      out "<td><input type=radio value=herz name=Icon:= ".($icon eq "herz"?"checked ":"")." style='border-color:#FFCC00; background-color:#FFFFff;'><img src='http://www.verwitwet.de/bilder/smiley/herz.gif'><span class=tatext> Herz(-lich)</span></td>";
      out "<td><input type=radio value=anmerkung name=Icon:= ".($icon eq "anmerkung"?"checked ":"")." style='border-color:#FFCC00; background-color:#FFFFff;'><img src='http://www.verwitwet.de/bilder/smiley/anmerkung.gif'><span class=tatext> Anmerkung</span></td>";
      out "<td><input type=radio value=frage name=Icon:= ".($icon eq "frage"?"checked ":"")." style='border-color:#FFCC00; background-color:#FFFFff;'><img src='http://www.verwitwet.de/bilder/smiley/frage.gif'><span class=tatext> Frage</span></td>";
      out "<td><input type=radio value=idee name=Icon:= ".($icon eq "idee"?"checked ":"")."style='border-color:#FFCC00; background-color:#FFFFff;'><img src='http://www.verwitwet.de/bilder/smiley/idee.gif'><span class=tatext>";
      

      out <<EOF;
      Idee</span></td>
      <td> </td>
      </tr>
      </table>
      

      <!-- Ende Icons -->
      </td>
      </tr>
      <tr><td><font face="arial,helvetica" size="2">Titel:</font></td><td colspan="4"><input type=text name="Titel:=" size=40 maxlength=70 value="$titel">
      
      ....

      Wie gehabt: Formatierungen und die Image-Urls solltest du noch anpassen

      Grüße
      Oliver ;-)

     Antworten

    Beitrag von Giga (54 Beiträge) am Sonntag, 6.Januar.2002, 00:56.
    Re: Smilies im Forum (C. Bergmann bib)

      noch ein Schritt, dann habe ich es vielleicht geschafft :-)

      Also, ich habe die Datenbank um das Feld "Icon" erweitert (großgeschriben). Dann die "$_put{Icon}" ergänzt und im Eingabeformular Radiobuttons und Gifs eingebaut (die Gif-Adressen werde ich später ändern).
      Irgendein Fehler ist aber immer noch vorhanden und ich finde es nicht :-(

      zum Testen kannst du es ja hier mal ausprobieren:
      http://baseportal.de/cgi-bin/baseportal.pl?htx=/esasen/clanphilos

      Templeate-Ausschnitt:

      # --- Ausgabe eines ausgewählten, abgewiesenen oder vorgeschauten Eintrags ---
      

      out "<a name=\"eingabe\">&nbsp;</a><br>";
      out "<ul><font size=3".($emsg?" color=d80000":"")."><b>$emsg$msg</b></font></ul>" if $emsg || $msg;
      

      if($Vorschau || %_put)
      {
       out "<center><table cellspacing=2 width=95% cellpadding=4><tr bgcolor=e0e0e0><td><font face=arial,helvetica size=3><b>&nbsp;".($Vorschau?"Vorschau:":"Ihr Eintrag:")."</b></font></td><td width=10% align=center nowrap>&nbsp;<a href=\"#list\"><font size=2 face=arial>Zur Liste</a>&nbsp;</td></tr></table></center><font face=arial,helvetica size=2><ul>";
       &all_out("", $_put{Name}, $_put{EMail}, $_put{WWW}, $_put{Titel}, $_put{Text}, $_put{Icon});
       out "</ul>";
      }
      

      if($_get{Pos} ne "")
      {
       out "<center><table cellspacing=2 width=95% cellpadding=4><tr bgcolor=e0e0e0><td><font face=arial,helvetica size=3><b>&nbsp;Ausgew&auml;hlter Eintrag:</b></font><td width=10% align=center nowrap>&nbsp;<a href=\"#list\"><font size=2 face=arial>Zur Liste</a>&nbsp;</td></tr></table></center><font face=arial,helvetica size=2><ul>";
      
       get "Pos==$_get{Pos}";  &all_out();  out "<h3>Ihre Antwort:</h3>";
       if($Vorschau || $emsg)  {   &form_out($_get{Pos}, $_put{Name}, $_put{EMail}, $_put{WWW}, $_put{Titel}, $_put{Text}, $_put{Icon});  } else  {   my $t=$Titel;   $t="Re: $t" unless $t=~ /^Re: /i;   &form_out($Pos, "", "", "", $t);  }  my $p=int($Pos); $p++ if $p ne $Pos;  get "sort=- Pos<=$p Pos>".($p-1);
       out "<p><a href=\"$mylinkr\">Neuer Eintrag</a>";  if($_amount_query>1)  {   out "</ul><br><center><table cellspacing=2 width=95% cellpadding=4><tr bgcolor=e0e0e0><td><font face=arial,helvetica size=3><b>&nbsp;Alle Eintr&auml;ge zum Thema:</b></font></td><td width=10% align=center nowrap>&nbsp;<a href=\"#list\"><font size=2 face=arial>Zur Liste</a>&nbsp;</td></tr></table></center><font face=arial,helvetica size=2><ul>";   $allpos=&all_out($_get{Pos});   out "<br>";  } else  {   $allpos="$_get{Pos}#";   } } else {  out "<center><table cellspacing=2 width=95% cellpadding=4><tr bgcolor=e0e0e0><td><font face=arial,helvetica size=3><b>&nbsp;Neuer Eintrag:</b></font></td><td width=10% align=center nowrap>&nbsp;<a href=\"#list\"><font size=2 face=arial>Zur Liste</a>&nbsp;</td></tr></table></center><font face=arial,helvetica size=2><ul>";  if($Vorschau || $emsg)  {   &form_out($_get{Pos}, $_put{Name}, $_put{EMail}, $_put{WWW}, $_put{Titel}, $_put{Text}, $_put{Icon});  } else  {   &form_out();  } } # --- Ausgabe der ersten Eintraege und der Liste --- unless($wcheck) {  out "</ul><br><center><table cellspacing=2 width=95% cellpadding=4><tr bgcolor=e0e0e0><td><font face=arial,helvetica size=3><b>&nbsp;Die aktuellsten $getfirst Einträge:</b></font></td></tr></table></center><font face=arial,helvetica size=2><ul>";  get "Id==* sort=- range=0,$getfirst";  $allpos=&all_out(); }

      get "Pos==* sort=- range=".($_get{range} || "0,$getlist");

       out "<a name=\"list\">&nbsp;</a></ul><center><table cellspacing=2 width=95% cellpadding=4><tr bgcolor=e0e0e0><td><font face=arial,helvetica size=3><b>&nbsp;Liste der ".($_range>0?"Einträge von $_range bis ".($_range+$_range_length>$_amount_query?$_amount_query:$_range+$_range_length):"ersten $getlist Einträge").":</b></font></td><td width=10% align=center nowrap>&nbsp;<a href=\"#eingabe\"><font size=2 face=arial>Zur Eingabe</a>&nbsp;</td></tr></table></center><font face=arial,helvetica size=2><ul>";
      &list_out($allpos, $_get{Pos});
      # --- blaetter-links ---
      

      out "<br><br><br>";

      $r1=$_range; $r2=$_range_length || $getlist;
      

      if($_amount_all>$r2)
      {
       my $z=0;
       @ilist=();
      
       if($r1-$r2>=0)  {   push @ilist, "&lt;&lt; <a href=\"$mylink&range=0,$r2\">Neueste Einträge</a>";   push @ilist, "&lt; <a href=\"$mylink&range=".($r1-$r2).",$r2\">Neuere Einträge</a>";   $z++;  }  push @ilist, "<a href=\"#eingabe\">Zur Eingabe</a>";
       if($r1+$r2<$_amount_all)  {   push @ilist, "<a href=\"$mylink&range=".($r1+$r2).",$r2\">Ältere Einträge</a> &gt;";   push @ilist, "<a href=\"$mylink&range=".(int($_amount_all/$r2)*$r2).",$r2\">Älteste Einträge</a> &gt;&gt;";   $z+=2;  }  out "</ul><center><table width=85%><tr><td";  out " align=right" if $z==2;  out " align=middle" if $z==3;  out " nowrap><font size=2 face=arial,helvetica>".(join " | ", @ilist)."</td></tr></table>"; } # --- Formular-Ausgabe ---

      sub form_out
      {
       my($pos, $name, $email, $www, $titel, $text,$icon)=@_;
       $name=~ s/"/&quot;/gs;
       $email=~ s/"/&quot;/gs;
       $www=~ s/"/&quot;/gs;
       $text=~ s/</&lt;/gs; $text=~ s/>/&gt;/gs;
       $titel=~ s/"/&quot;/gs;
      
       out <<EOF;
      <table cellspacing=0 cellpadding=12 bgcolor=f0f0f0 width=90%><tr><td><font face=arial,helvetica size=2>
      <table>
      <form action="$mylinkr" method="post" enctype="multipart/form-data" onsubmit="return testform()">
      <input type=hidden name="htx=" value="$htx"><input type=hidden name="wcheck=" value="1">
      <input type=hidden name="range=" value="$_get{range}"><input type=hidden name="Pos=" value="$pos">
      <tr><td><font face=arial,helvetica size=2>Name:</td><td nowrap><input type=text name="Name:=" size=19 maxlength=60 value="$name"><font face=arial,helvetica size=2> EMail: <input type=text name="EMail:=" size=14 maxlength=60 value="$email"> WWW: <input type=text name="WWW:=" size=14 maxlength=60 value="$www"></td></tr><tr>
      <td colspan="5">
      <!-- hier sind die Icons -->
      <table width="100%" cellspacing=0 cellpadding=0>
      <tr>
      <td> </td><td>
      EOF
      out "<input type=radio value=smiley name=Icon:= ".($icon eq "smiley"?"checked ":"")."style='border-color:#FFCC00;background-color:#FFFFff;'><img src='http://www.verwitwet.de/bilder/smiley/smiley.gif'><span class='tatext'> Froh</span></td>";
      out "<td><input type='radio' value='zornig' name='Icon:=' ".($icon eq "zornig"?"checked ":"")."style='border-color:#FFCC00; background-color:#FFFFff;'><img src='http://www.verwitwet.de/bilder/smiley/zornig.gif'><span class='tatext'> Ärger</span></td>";
      out "<td><input type=radio value=traurig name=Icon:= ".($icon eq "zornig"?"checked ":"")."style='border-color:#FFCC00; background-color:#FFFFff;'><img src='http://www.verwitwet.de/bilder/smiley/traurig.gif'><span class=tatext>Trauer</span></td>";
      out "<td><input type=radio value=daumen_unten name=Icon:= ".($icon eq "daumen_unten"?"checked ":"")."style='border-color:#FFCC00; background-color:#FFFFff;'><img src='http://www.verwitwet.de/bilder/smiley/daumen_unten.gif'><span class='tatext'> Kontra</span></td>";
      out "<td><input type='radio' value='daumen_oben' name='Icon:=' ".($icon eq "daumen_oben"?"checked ":"")."style='border-color:#FFCC00; background-color:#FFFFff;'>";
      out <<EOF;
      <img src='http://www.verwitwet.de/bilder/smiley/daumen_oben.gif'><span class='tatext'> Pro</span></td>
      </tr><tr>
      <td> </td><td>
       
      EOF
      out "<input type='radio' value='blume' name='Icon:=' ".($icon eq "blume"?"checked ":"")."style='border-color:#FFCC00; background-color:#FFFFff;'><img src='http://www.verwitwet.de/bilder/smiley/blume.gif'><span class='tatext'> Danke</span></td>";
      out "<td><input type=radio value=herz name=Icon:= ".($icon eq "herz"?"checked ":"")." style='border-color:#FFCC00; background-color:#FFFFff;'><img src='http://www.verwitwet.de/bilder/smiley/herz.gif'><span class=tatext> Herz(-lich)</span></td>";
      out "<td><input type=radio value=anmerkung name=Icon:= ".($icon eq "anmerkung"?"checked ":"")." style='border-color:#FFCC00; background-color:#FFFFff;'><img src='http://www.verwitwet.de/bilder/smiley/anmerkung.gif'><span class=tatext> Anmerkung</span></td>";
      out "<td><input type=radio value=frage name=Icon:= ".($icon eq "frage"?"checked ":"")." style='border-color:#FFCC00; background-color:#FFFFff;'><img src='http://www.verwitwet.de/bilder/smiley/frage.gif'><span class=tatext> Frage</span></td>";
      out "<td><input type=radio value=idee name=Icon:= ".($icon eq "idee"?"checked ":"")."style='border-color:#FFCC00; background-color:#FFFFff;'><img src='http://www.verwitwet.de/bilder/smiley/idee.gif'><span class=tatext>";
      

      out <<EOF;
       
      Idee</span></td>


      <td> </td>
      </tr>
      </table>
      

      <!-- Ende Icons -->
       





      </td>
      </tr>
      <tr>
      <td><font face=arial,helvetica size=2>Titel:</td><td><input type=text name="Titel:=" size=50 maxlength=80 value="$titel"></td></tr>
      <tr><td><font face=arial,helvetica size=2>Text:</td><td><textarea name="Text:=" rows=10 cols=55 wrap=virtual>$text</textarea></td></tr>
      <tr><td></td><td><input type=submit value="Speichern"> <input type=submit name="Vorschau=" value="Vorschau"> <input type=reset value="Zurücksetzen"></td></tr>
      </form>
      </table>
      

     Antworten

    Beitrag von Peter Piechot (2 Beiträge) am Freitag, 15.März.2002, 13:40. WWW: www.com-shine.de
    Re: Smilies im Forum (C. Bergmann bib)

      Ziemlich kompliziert, oder.
      Ich habe es in einem Gästebuch versucht etwas einfacher zu lösen.
      Vieleicht mal schauen?

      www.comshine.de/baseportal/orth/add

      "Bild"-Eintrag in der DB=Text

      Gruß
      Peter

     Antworten

    Beitrag von Toralf (101 Beiträge) am Freitag, 15.März.2002, 18:52.
    Re: Smilies im Forum (C. Bergmann bib)

      ähnliches hab ich so gelöst:
      checkboxen angelegt


      <loop db=deine code=perl>
      $bild ="";
      if($check1 eq "Ja") {
      $bild = "<img src='~.gif' alt=~ width='25'>";
      }
      $bild1 ="";
      if($check2 eq "Ja") {
      $bild1 = "<img src='~.gif' alt=~ width='25'>";
      }
      out <<EOF;
      <table><tr><td>$bild $bild1</td>
        </tr>
      </table>
      <EOF
      </loop>
      

     Antworten

    Beitrag von Giga (54 Beiträge) am Mittwoch, 10.April.2002, 01:12.
    Re: Smilies im Forum (C. Bergmann bib)

     Antworten

    Beitrag von Giga (54 Beiträge) am Donnerstag, 13.Dezember.2001, 00:11.
    Re: Smilies im Forum (C. Bergmann bib)

      der code stimmt hinten und vorne nich

     Antworten

    Beitrag von die echte Giga (1 Beitrag) am Donnerstag, 13.Dezember.2001, 00:16.
    Re: Smilies im Forum (C. Bergmann bib)

      Der Beitrag von "Giga" am Do., 13.12.01, 00:11 Uhr
      stammt nicht von mir !!

      Vielen dank an Oliver, werde es mal ausprobieren.

      Gruß
      Giga

     Antworten


     
 Liste der Einträge von 53100 bis 53250:Einklappen Zur Eingabe 
Neueste Einträge << 10 | 9 | 8 | 7 | 6 | 5 | 4 | 3 | 2 | Neuere Einträge < Zur Eingabe  > Ältere Einträge | 2 | 3 | 4 | 5 | 6 | 7 | 8 | 9 | 10 >> Älteste Einträge


Zurück zur Homepage

© baseportal.de. Alle Rechte vorbehalten. Nutzungsbedingungen



powered in 0.13s by baseportal.de
Erstellen Sie Ihre eigene Web-Datenbank - kostenlos!