Top-Themen

AppleEntwicklungHardwareInternetLinuxMicrosoftMultimediaNetzwerkeOff TopicSicherheitSonstige SystemeVirtualisierungWeiterbildungZusammenarbeit

Aktuelle Themen

Administrator.de FeedbackApache ServerAppleAssemblerAudioAusbildungAuslandBackupBasicBatch & ShellBenchmarksBibliotheken & ToolkitsBlogsCloud-DiensteClusterCMSCPU, RAM, MainboardsCSSC und C++DatenbankenDatenschutzDebianDigitiales FernsehenDNSDrucker und ScannerDSL, VDSLE-BooksE-BusinessE-MailEntwicklungErkennung und -AbwehrExchange ServerFestplatten, SSD, RaidFirewallFlatratesGoogle AndroidGrafikGrafikkarten & MonitoreGroupwareHardwareHosting & HousingHTMLHumor (lol)Hyper-VIconsIDE & EditorenInformationsdiensteInstallationInstant MessagingInternetInternet DomäneniOSISDN & AnaloganschlüsseiTunesJavaJavaScriptKiXtartKVMLAN, WAN, WirelessLinuxLinux DesktopLinux NetzwerkLinux ToolsLinux UserverwaltungLizenzierungMac OS XMicrosoftMicrosoft OfficeMikroTik RouterOSMonitoringMultimediaMultimedia & ZubehörNetzwerkeNetzwerkgrundlagenNetzwerkmanagementNetzwerkprotokolleNotebook & ZubehörNovell NetwareOff TopicOpenOffice, LibreOfficeOutlook & MailPapierkorbPascal und DelphiPeripheriegerätePerlPHPPythonRechtliche FragenRedHat, CentOS, FedoraRouter & RoutingSambaSAN, NAS, DASSchriftartenSchulung & TrainingSEOServerServer-HardwareSicherheitSicherheits-ToolsSicherheitsgrundlagenSolarisSonstige SystemeSoziale NetzwerkeSpeicherkartenStudentenjobs & PraktikumSuche ProjektpartnerSuseSwitche und HubsTipps & TricksTK-Netze & GeräteUbuntuUMTS, EDGE & GPRSUtilitiesVB for ApplicationsVerschlüsselung & ZertifikateVideo & StreamingViren und TrojanerVirtualisierungVisual StudioVmwareVoice over IPWebbrowserWebentwicklungWeiterbildungWindows 7Windows 8Windows 10Windows InstallationWindows MobileWindows NetzwerkWindows ServerWindows SystemdateienWindows ToolsWindows UpdateWindows UserverwaltungWindows VistaWindows XPXenserverXMLZusammenarbeit
GELÖST

Mit Perl und JavaScript aller 5 sek. Bild ändern

Frage Entwicklung Perl

Mitglied: Dipps

Dipps (Level 2) - Jetzt verbinden

08.10.2008, aktualisiert 10.10.2008, 4729 Aufrufe, 1 Kommentar

Mit Perl und JavaScript aller 5 sek. Bild ändern

Hallo ich habe eine Perlseite (mit Templets) und möchte in einem Templet das Bild aller 5 sek ändern mit Java Script am besten.
das bild wird folgender massen am anfang geladen:

01.
<% 
02.
  require "../4flex/plugins/bild_startseite/plugin.pl"; 
03.
 
04.
  my $imgtempl="<img src=\"##IMAGE1##\" width=\"350\" height=\"##HEIGHT1##\" border=\"1\" alt=\"##ALT1##\" name=\"testbild\">"; 
05.
  my ($imghtml, $imgid)=&zufallsbild($dbh, $cgi, 95, $imgtempl); 
06.
%> 
07.
.... 
08.
<% print $imghtml; %>
nun soll nach 5sek ein neues zufälliges bild an diese stelle wie kann ich das am besten machen?
Mitglied: Dipps
10.10.2008 um 12:18 Uhr
Danke für die viele Hilfe habe es jetzt entlich selbst irgendwie geschaft. Für alle die mal das selbe Problem haben der Code:

01.
<% 
02.
  require "../4flex/plugins/bild_startseite/plugin.pl"; 
03.
 
04.
  my $imgtempl="<img src=\"##IMAGE1##\" width=\"350\" height=\"##HEIGHT1##\" border=\"1\" alt=\"##ALT1##\" id=\"imgbild\">"; 
05.
  my ($imghtml, $imgid)=&zufallsbild($dbh, $cgi, 95, $imgtempl); 
06.
%> 
07.
.... 
08.
<% print $imghtml; %> 
09.
 
10.
<script language="JavaScript"> 
11.
 
12.
setTimeout("img_autoreload('imgbild')", 5000); 
13.
                        var image; 
14.
                        var image_url=new Array(); 
15.
 
16.
<% 
17.
for(my $i = 0; $i <= 200; $i++) { 
18.
  
19.
 
20.
 
21.
 
22.
 
23.
  require "../4flex/plugins/bild_startseite/plugin.pl"; 
24.
 
25.
  my $imgtempl="##IMAGE1##"; 
26.
  my ($imghtml, $imgid)=&zufallsbild($dbh, $cgi, 95, $imgtempl); 
27.
 
28.
print "image_url[$i] =\"$imghtml\";\n"; 
29.
30.
 
31.
%> 
32.
 
33.
 
34.
 
35.
 
36.
 
37.
                        function img_autoreload(id) 
38.
39.
image = document.getElementById(id); 
40.
 
41.
                         
42.
 
43.
 
44.
var x =  Math.floor((Math.random() * 201)); 
45.
 
46.
 
47.
image.src = image_url[x-1]; 
48.
                                 
49.
setTimeout("img_autoreload('imgbild')", 5000); 
50.
51.
                </script>
Bitte warten ..
Ähnliche Inhalte
Windows Server
Computernamen von Sharepoint 2013 nachträglich ändern (1)

Frage von Philipp.S zum Thema Windows Server ...

Windows Userverwaltung
gelöst Lokalen Bentuzer Kennwort Ändern (9)

Frage von Adnan88 zum Thema Windows Userverwaltung ...

Neue Wissensbeiträge
RedHat, CentOS, Fedora

Fedora, RedHat, Centos: DNS-Search Domain setzen

(13)

Tipp von Frank zum Thema RedHat, CentOS, Fedora ...

Drucker und Scanner

Samsung SL-M4025ND, firmware update und (kompatible) Tonerkassetten

(1)

Erfahrungsbericht von markus-1969 zum Thema Drucker und Scanner ...

Heiß diskutierte Inhalte
CMS
Lokales Wordpress im LAN - wie aufsetzen? (16)

Frage von Static zum Thema CMS ...

LAN, WAN, Wireless
gelöst Komplett neues Netzwerk, Ubiquiti WLAN, Router, Switch (16)

Frage von Freak-On-Silicon zum Thema LAN, WAN, Wireless ...

LAN, WAN, Wireless
IP im privaten Netz nicht erreichbar (14)

Frage von guntis zum Thema LAN, WAN, Wireless ...

Java
gelöst Net user per script aus txt oder csv für FTP (12)

Frage von OlliPWS zum Thema Java ...