Anzeige synchronisieren |
|
Ein kleiner Schönheitsfehler bei der Anzeige der einzelnen Hilfethemen ist die manuelle Synchronisation mit der Baumansicht über die Schaltfläche "Synchronize" bzw. "Anzeigen". Aus dem Grund habe ich die beiden zur Anzeige verwendeten Scripte vb_buttons.vbs und js_buttons.js so angepasst, dass sie mit dem Onload-Befehl aufgerufen werden und so die Anzeige automatisch aktualisieren. Do While Not EOF(file) Line Input #file, eintrag If InStr(1, eintrag, "buttons.js") > 0 Then gefunden = True If Not gefunden Then If InStr(1, eintrag, "</head>", vbTextCompare) Then Print #file2, "<script src=" & Chr(34) & "js_buttons.js" & _ Chr(34) & "language=" & Chr(34) & "Javascript" & Chr(34) & _ "></script>" Print #file2, "</head>" ElseIf InStr(1, eintrag, "<body", vbTextCompare) > 0 Then Print #file2, "<body bgcolor=#ffffff text=#000000 onload=" & _ Chr(34) & "OnNewTopic()" & Chr(34) & ">" Else Print #file2, eintrag End If Else Print #file2, eintrag End If Loop |
Besucher: 1 online | 29 heute | 2217 diesen Monat | 684337 insgesamt | Seitenaufrufe: 92 | Letzte Änderung: 24.06.2006 | © 2001-18 Christian Freßdorf | ||||
Der Unterschied zwischen einem Irrenhaus und unserer Gesellschaft ist, daß man im Irrenhaus die Patienten von den &AUML;rzten durch die weißen Kittel der letzteren unterscheiden kann. Anonym |
powered by phpCMS and PAX |