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, 4714 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 ..
Neuester Wissensbeitrag
Windows 10

Powershell 5 BSOD

(1)

Tipp von agowa338 zum Thema Windows 10 ...

Ähnliche Inhalte
VB for Applications
gelöst Wie mittels VBA beim Import von CSV dateien das Format aller Zellen auf "Zahl" ändern? (2)

Frage von Glibber4 zum Thema VB for Applications ...

Erkennung und -Abwehr
Lokale Virenprüfstation : Windows 10: Ändern von Einstellungen verhinden (5)

Frage von TryAndSolve zum Thema Erkennung und -Abwehr ...

Windows Server
gelöst Word 2010 : Absatz - Abstand per GPO ändern (3)

Frage von johanna-p zum Thema Windows Server ...

Windows Netzwerk
gelöst Frage zu den Netzwerkfreigaben mit Bild (8)

Frage von M.Marz zum Thema Windows Netzwerk ...

Heiß diskutierte Inhalte
LAN, WAN, Wireless
gelöst Server erkennt Client nicht wenn er ausserhalb des DHCP Pools liegt (28)

Frage von Mar-west zum Thema LAN, WAN, Wireless ...

Outlook & Mail
Outlook 2010 findet ost datei nicht (18)

Frage von Floh21 zum Thema Outlook & Mail ...

Windows Server
Server 2008R2 startet nicht mehr (Bad Patch 0xa) (18)

Frage von Haures zum Thema Windows Server ...