Gruppen

Top Gruppen: Windows 7; Windows Vista; Windows XP; Textverarbeitung; Excel; DSL; Internet Browser; E-Mail/Outlook
Betriebsysteme: Windows classik; Linux; BS-Sonstige
Software: Datenbanken; Bildbearbeitung; Audio/mp3/Video; Security/Viren; SW-Sonstige
Hardware: Mainboard/CPU; Grafikkarten; Peripherie; Laptop/Notebook; HW-Sonstiges
Netzwerk: Telefon,ISDN,Modem; W-Lan; NW-Sonstiges
Programmierung: PHP,ASP,Perl...; Java,C++...; Webseiten/HTML
Sonstiges: PC-Sonstiges; Plauderecke; SN Intern; Test

/ Forum / Skripte(PHP,ASP,Perl...)

Skripte(PHP,ASP,Perl...)

Fragevon hitXLDaniel vom 05.06.2020, 10:23 Options

Suche Script für ein Grußlaufband

Hallo,

ich suche ein Script für ein Grußlaufband für die Besucher auf der Page.

Der Grußtext soll als Laufband eingeblendet werden (Keine Grußbox, Shoutbox usw...) Der Besucher klickt beispielsweise auf "Gruß senden", dann öffnet sich ein kleines PopUp-Fenster, indem er seinen Namen und den Gruß postet. Dann wird der neue Gruß an bestehende Grüße angefügt.

Wie gesagt, suche eine Grußmöglichkeit für die Besucher der Page. Dieser soll dann als Laufband eingeblendet werden.

Hab schon gesucht und gegoogelt, komme immer wieder nur auf diese Gruß- oder Shoutboxen... möcht ich nicht.

Gibts das nicht als Laufband mit oben erwähnten Eigenschaften?

Gruß
Daniel

Antwort schreiben

Antwort 1 von Shipper vom 05.06.2020, 10:59 Options

Moin!

Du schreibst deine Grüße in eine Datenbank, liest die Grüße aus und schreibst einen nach dem anderen in ein <Marquee>

Wie z.B.


recordset.movefirst
do while not recordset.eof
  GrußString = GrußString + <% response.write recordset.fields("Gruß")
  recordset.movenext
loop

<Marquee> <% response.write GrußString %> </Marquee>

Antwort 2 von hitXLDaniel vom 05.06.2020, 11:10 Options

ui,
da ich mich mit sowas überhaubt nicht auskenne, sagt mir Dein Script jetzt gar nichts...Gibts nicht ein komplettes Script dafür?

Antwort 3 von Shipper vom 05.06.2020, 11:18 Options

Ouuuhh.... Hmmm...

Schade...

Was für einen Webserver nutzt du denn?! Was für eine Datenbank verwendest du?

Kann dir leider nur in Sachen ASP weiterhelfen...

Antwort 4 von TByte vom 09.06.2020, 14:26 Options

Ich kann dir mit Perl weiterhelfen. Also der HTML teil:
Der heißt jetzt mal ggg.html

<html>
<head>
<title>GR&Uuml;&szlig;E</title>
<script type="text/javascript">
function neu() {
window.open("http://www.hitXLDaniel.de/grusssenden/", "Zweitfenster", "width=400,height=400,left=100,top=200");
}
</script>
<body>
<marquee><font face="Arial" size="10">Ein Gru&szlig;!</font></marquee>
<font face="Arial">Schicken Sie uns Ihre Grüße! <a href="javascript:neu()">Hier klicken!</a></font>
</body>
</html>

Danach das Abschicke Fenster:

<html>
<head>
<title>GR&Uuml;&szlig;E SCHICKEN</title>
</head>
<body>
<form action="script.cgi">
<font face="Arial">Tippen Sie Ihren Gru&szlig; ein:</font><br />
<input type="text" size="50" />
<input type="Submit" value="Abschicken">
</form>
</body>
</html>

Fehlt nur noch das CGI-Script. Es ist zwar nicht perfekt, weil es nicht auf leere Sachen prüft, aber es klappt.

# Shee-bang (Da wo dein perl-Interpreter ist, die Pfadangabe)
use strict;
use CGI ('param');
my ($gruss, @seite, $seite, $grussd);
#Parameter übernehmen
$gruss = param('gruss');
#datei schreiben
open (GRUSS, ">>gruesse.txt");
print GRUSS "$gruss\n";
close GRUSS;
#Jetzt rauslesen
open (SEITE, "ggg.html");
@seite = <SEITE>;
close SEITE;
#Aus der Datei mit den Grüßen
open (GRUSSL, "gruesse.txt");
$seite = @seite[9]
while ($grussd = <GRUSSL>) {
$seite =~ s/Ein Gru&szlig;!/$grussd;
}
@seite[9] = $seite;
close GRUSSL;
open (SEITEE, ">ggg.html"):
print SEITEE "@seite";
close SEITEE;

Also ich hoffe mal das klappt, hab mir echt mühe gegeben, so ne Stunde oder so.
mfg
TByte

Antwort 5 von hitXLDaniel vom 09.06.2020, 17:03 Options

Hi TByte,

das sieht ja mal echt nach Hilfe aus...gerade wenn man sich mit Scripten nicht auskennt, wie ich halt einer bin..Danke!!!

Ich werd das mal versuchen...hoffe, ich kann alles nachvollziehen...ansonsten frag ich dich halt nochmal...wenn ich darf?

Gruß
Daniel

Antwort 6 von hitXLDaniel vom 09.06.2020, 19:58 Options

sodele...hab noch Probleme mit dem cgi-Script, wo muss ich das ablegen? Hab auf dem Webserver einen Ordner gefunden mit dem Namen "cgi-bin"...muss da das Script rein? Und was ist mit den html-Dateien...kommen die nicht dort rein?

Antwort 7 von Bregenz vom 09.06.2020, 20:08 Options

Ich hätte ja so etwas vorgeschlagen.

Antwort 8 von nighttip vom 09.06.2020, 22:54 Options

@ Bregenz, gute Seite für Leute die das noch Händisch machen, gespeichert. MfG

Antwort 9 von hitXLDaniel vom 10.06.2020, 08:40 Options

Hallo,
wollte jetzt nur noch wissen, wo ich die Daten ablegen soll...auch wegen der Verlinkung in den Scripten, besonders dieses CGI-Script..

Antwort 10 von TByte vom 10.06.2020, 13:56 Options

Also das CGI Script kommt in den Ordner CGI-BIN, wenn du so eins hast. Wenn nicht, dann bringt s auch nix, eins zu erstellen. Die anderen HTML Dateien soltlest du auch noch dahin tun, sonst musst du das Script umständlich verändern. Frag mal bei deinem Anbieter nach, ob du ein Shee-Bang setzen musst, wenn ja, wohin.
mfg
TByte

Antwort 11 von ollilolli vom 10.06.2020, 14:03 Options

habe mir nicht alles durchgelesen, aber wenn ich sachen wie laufschrift, marquee, javascript lese, schüttelt es mich einfach nur.

warum?

schon mal an daran gedacht, w3c conform zu entwickeln?
schon mal daran gedacht, barrierefrei zu entwickeln?

nur so als anregung...

Antwort 12 von hitXLDaniel vom 10.06.2020, 14:50 Options

@ TByte:

so, hab den Anbieter wegen diesem Shee-Bang kontaktiert, warte nun auf Antwort...

Gruß
Daniel

Antwort 13 von hitXLDaniel vom 10.06.2020, 15:23 Options

Sodele, hab eben die Antwort bekommen, und leider bietet sie keine Lösung:

Hallo,

da fragen Sie doch Ihren Bekannten nochmal, was er damit meint und ob dieses Script auch funktioniert.
Ich bin hierbei nämlich auch überfragt (kein Perl-Spezialist).

PS: Ich habe in dem Script ein paar Änderungen vorgenommen, die aber auch nicht geholfen haben. Sie müssen es nochmal hochladen, damit sich auf dem Server wieder die Originalversion befindet.

Mit freundlichen Grüßen
Oliver H.^*xxxxxxxxx*

^{*Threadedit* 15:31:28, 10.06.2008
Admininfo: Persönliche Daten gelöscht, siehe FAQ 5, #5}

Antwort 14 von TByte vom 10.06.2020, 18:12 Options

Ok, also sag dem mal, dass jedes Perl-skript ein Shee-bang hben muss. Er muss nicht wissen, was das ist. Frag ihn einfach, wo der Perl Interpreter auf em webserver ist.
Mustermail:

Zitat:
Guten Tag Hr. Oliver H.,

Da im Verzeichnissbaum des von Ihnen angebotenen Websapces sich ein Ordner namens Cgi-bin befindet, gehe ich stark davon aus, dass ich meine Skripte aufsetzen kann. Eine der beliebtesten CGI-Sprachen ist Perl. Da, wie oben genannt, Perl genutzt werden kann, suche ich nun den Interpreter dazu. Denn jedes Perl-Skript unter einem Unix-Server benötigt eine Pfadangabe zum Perl-Interpreter.

Mit freundlichen Grüßen
dein Name

So ungefähr sollte es klappen
mfg
TByte

Antwort 15 von hitXLDaniel vom 10.06.2020, 21:46 Options

Danke,
werd denen Deinen Briefentwurf schicken..mal sehen, was passiert..
Ansonsten vielleicht ne Alternative zu "Shee-bang"

Antwort 16 von TByte vom 10.06.2020, 21:52 Options

Zitat:
Ansonsten vielleicht ne Alternative zu "Shee-bang"

Klar:
Benötigte Perl-Interpreter-Pfadangabe in einem lauffähigem Skript unter einem unix System
mfg
TByte

Antwort 17 von hitXLDaniel vom 12.06.2020, 09:18 Options

Hi,

so, der Support hat nun endlich geantwortet:

Zitat:
Hallo,

der Pfad ist: /usr/bin/perl

Mit freundlichen Grüßen

Ist dat nun so richtig?

Gruß
Daniel

Antwort 18 von TByte vom 12.06.2020, 15:51 Options

Perfekt!
Dann sollte das fetige Skript so aussehen:

# !/usr/bin/perl
use strict;
use CGI ('param');
my ($gruss, @seite, $seite, $grussd);
#Parameter übernehmen
$gruss = param('gruss');
#datei schreiben
open (GRUSS, ">>gruesse.txt");
print GRUSS "$gruss\n";
close GRUSS;
#Jetzt rauslesen
open (SEITE, "ggg.html");
@seite = <SEITE>;
close SEITE;
#Aus der Datei mit den Grüßen
open (GRUSSL, "gruesse.txt");
$seite = @seite[9]
while ($grussd = <GRUSSL>) {
$seite =~ s/Ein Gru&szlig;!/$grussd;
}
@seite[9] = $seite;
close GRUSSL;
open (SEITEE, ">ggg.html"):
print SEITEE "@seite";
close SEITEE;

Versuchs mal und gib mir die Adresse der Seite, werde die Bugs ausbügeln.
mfg
TByte

Antwort 19 von hitXLDaniel vom 16.06.2020, 08:51 Options

@ TByte:

Sorry, war am Wochenende nicht da. So hab das Script gerändert:


# !/usr/bin/perl
use strict;
use CGI ('param');
my ($gruss, @seite, $seite, $grussd);
#Parameter übernehmen
$gruss = param('gruss');
#datei schreiben
open (GRUSS, ">>gruesse.txt");
print GRUSS "$gruss\n";
close GRUSS;
#Jetzt rauslesen
open (SEITE, "iframe_grussfenster.htm");
@seite = <SEITE>;
close SEITE;
#Aus der Datei mit den Grüßen
open (GRUSSL, "gruesse.txt");
$seite = @seite[9]
while ($grussd = <GRUSSL>) {
$seite =~ s/Ein Gru&szlig;!/$grussd;
}
@seite[9] = $seite;
close GRUSSL;
open (SEITEE, ">iframe_grussfenster.htm"):
print SEITEE "@seite";
close SEITEE;

Die Files hab ich in den Ordner "CGI-BIN". Allerdings wird der Fehler: "Internal Server Error" angezeigt. Vielleicht haperts ja an der Verlinkung der htm-Files?

Antwort 20 von TByte vom 16.06.2020, 17:11 Options

ne also du darfst nicht auf den Perl-File gehen, sondern auf die HTML-Seiten. Verlink mal den Link zu den Seiten und dem Skript. Also auf deiner Seite steht www.hitxl.de, jetzt noch wo die Seiten sind, villeicht unter www.hitxl.de/cgi-bin/script.pl
www.hitxl.de/cgi-bin/ggg.html
www.hitxl.de/cgi-bin/hhh.html?
mfg
TByte

« Zurück
1
2
Weiter »

Hinweis

Diese Frage ist schon etwas älter, Sie können daher nicht mehr auf sie antworten. Sollte Ihre Frage noch nicht gelöst sein, stellen Sie einfach eine neue Frage im Forum..

Neue Einträge

Tipp einschicken

News einschicken