2015-03-03T14:10:32
PERLScripterWenn 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 :
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)