Thread Ein - / Ausblenden von Tabellen - Javascript & PERL CGI (23 answers)
Opened by PERLScripter at 2015-03-03 13:43

PERLScripter
 2015-03-03 15:20
#179941 #179941
User since
2015-03-03
12 Artikel
BenutzerIn
[default_avatar]
2015-03-03T14:10:32 PERLScripter
Wenn ich allerdings das Script etc. in mein PERL Script integrieren will, funktioniert es nicht, er blendet weder aus noch zeigt er die Überschrift an :-((


Zum Beispiel habe ich probiert, den Script Teil im Header unterzubringen, dann habe ich den Bereich <tr> in meiner Tabelle noch eine entsprechende ID gegeben und für "Platzhalter" den Verweis auf das Script ( <a href="javascript:onoff()"> angelegt. Das sähe dann so aus :

Code: (dl )
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
sub Anzeige_Ergebnisse {

print '<HTML>';
print '<HEAD>';
print '<TITLE>Monitoring</TITLE>';

print '<script type="text/javascript"> ';
print 'function onoff () ';
print '{ ';
print ' ';
print ' if (document.getElementById) ';
print ' { ';
# print ' document.getElementById("Ueberschrift").style.visibility = "visible";';
print ' document.getElementById("Zeile").style.visibility = "collapse"; ';
print ' } ';
print '} ';
print '</script> ';

print '</HEAD>';
print '<BODY BGCOLOR = "#FFFFFF">';
# print '<H1>Monitoring - Ergebnisse</H1>';

# --------------------------------------------------------------------------------------------------------------------------------------

print '<table border="1" width="75%">';

print '<tr>';
print '<td style="width:9%" align="middle"' . 'bgcolor="' . "$Bedingung" .'">' . $HTML_Anzeige_Zaehler . '</td>';
print '<td style="width:9%" align="middle"' . 'bgcolor="' . "$Bedingung" .'">' . $HTML_Anzeige_SSTs . '</td>';
print '<td style="width:11%" align="middle"' . 'bgcolor="' . "$Bedingung" .'">' . $HTML_Anzeige_Broker . '</td>';
print '<td style="width:7%" align="middle"' . 'bgcolor="' . "$Bedingung" .'">' . $HTML_Anzeige_MTs . '</td>';
print '<td style="width:7%" align="middle"' . 'bgcolor="' . "$Bedingung" .'">' . $HTML_Anzeige_Status . '</td>';
print '<td style="width:9%" align="middle"' . 'bgcolor="' . "$Bedingung" .'">' . $HTML_Anzeige_EC . '</td>';
print '<td style="width:9%" align="middle"' . 'bgcolor="' . "$Bedingung" .'">' . $HTML_Anzeige_TS_I . '</td>';
print '<td style="width:9%" align="middle"' . 'bgcolor="' . "$Bedingung" .'">' . $HTML_Anzeige_TS_II . '</td>';
print '<td style="width:9%" align="middle"' . 'bgcolor="' . "$Bedingung" .'">' . $HTML_Anzeige_TS_Ergebnis_Differenz . '</td>';
print '<td style="width:7%" align="middle"' . 'bgcolor="' . "$Bedingung" .'">' . $HTML_Anzeige_Anzahl . '</td>';
print '<td style="width:11%" align="middle"' . 'bgcolor="' . "$Bedingung" .'">' . '<a href="javascript:onoff()">Test</a>' . '</td>';
print '</tr>';

print ' <tr id="Zeile">';
print ' <td>B1</td>';
print ' <td>B2</td>';
print ' <td>B3</td>';
print ' </tr>';

print '</table>';

print '</BODY>';
print '</HTML>';

}


Leider ohne Erfolg.

Viele Grüße
PERLSCripter
Last edited: 2015-03-03 15:25:37 +0100 (CET)

View full thread Ein - / Ausblenden von Tabellen - Javascript & PERL CGI