Sir Fart-A-Lot: Browser Absturz.

SELF-Forum

Browser Absturz.

Sir Fart-A-Lot
– Informationen zu den Bewertungsregeln

Hallo Forumsteilnehmer!

Ich bin neu auf dem Gebiet VBScript, aber kann mir einer von Euch vielleicht sagen, warum mein Browser abstürzt, wenn ich das Script ausführe?
Achja, das Quellcodebeispiel ist aus der MSDN (April 2002), deswegen auch teilweise die englischen "Remarks".
Dieses Script soll angeblich Text-Objekte zufällig durchlaufen. Es ist als Übung für ActiveX Timer Control gedacht, aber wie soll ich üben, wenn mein IE 6.0 andauernd abschmiert?
Bloß komisch, daß Microsoft VBScript Beispiele einfügt, die dann gar nicht funktionieren...

Danke für die Hilfe...

Sir Fart-A-Lot

+++

Hier die HTML-Datei:

<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN">

<html>
<head>
 <title>Absturz, aber warum?</title>
</head>

<body>

<OBJECT ID="txtFactoid" WIDTH=130 HEIGHT=130 CLASSID="CLSID:8BD21D10-EC42-11CE-9E0D-00AA006002F3">
 <PARAM NAME="VariousPropertyBits" VALUE="-1400879085">
 <PARAM NAME="ScrollBars" VALUE="2">
 <PARAM NAME="Size" VALUE="6350;3457">
 <PARAM NAME="SpecialEffect" VALUE="0">
 <PARAM NAME="FontName" VALUE="Garamond">
 <PARAM NAME="FontCharSet" VALUE="0">
 <PARAM NAME="FontPitchAndFamily" VALUE="2">
 <PARAM NAME="FontWeight" VALUE="0">
 <PARAM NAME="FontHeight" VALUE="200">
</OBJECT>

<OBJECT ID="tmrFactoid" WIDTH=0 HEIGHT=0 CLASSID="CLSID:59CCB4A0-727D-11CF-AC36-00AA00A47DD2">
 <PARAM NAME="Interval" VALUE="2000">
</OBJECT>

<SCRIPT LANGUAGE="VBScript" type="text/vbscript">
<!--
 dim strFactoids(14)
 strFactoids(0) = "Scientists have"
 strFactoids(1) = "two"
 strFactoids(2) = "cocks"
 strFactoids(3) = "but"
 strFactoids(4) = "only"
 strFactoids(5) = "one"
 strFactoids(6) = "ball"
 strFactoids(7) = "and"
 strFactoids(8) = "no"
 strFactoids(9) = "brain"
 strFactoids(10) = "because"
 strFactoids(11) = "they"
 strFactoids(12) = "are"
 strFactoids(13) = "genetically altered."
 strFactoids(14) = "By the way: Jojoba, a shrub related to boxwood…"

sub Window_Onload()
  'Init random number sequence
  Randomize
  'Set inital value of txtFactoid
  Call SetFactoid
 end sub

Sub tmrFactoid_Timer()
  Call SetFactoid
 end sub

Sub SetFactoid()
  txtFactoid.Locked = False
  txtFactoid.Value = strFactoids(Int((UBound(strFactoids) + 1) * Rnd))
 end sub

//-->
</script>

</body>
</html>

Beitrag melden
–
Informationen zu den Bewertungsregeln

  1. Browser Absturz.

    kaepten
    – Informationen zu den Bewertungsregeln

    Hi

    Ich habe den Absturz auch. Es hat aber nichts mit dem VBScript, sondern dem Object dass Du einbindest zu tun. Und an dem eingebundenen Objekt wirst Du wohl nichts ändern können! (Ausser es nicht oder richtig einzubinden) Ich arbeite auch mit MSDN Beispielen und es kommt leider viel zu oft vor, dass etwas nicht funtzt. Online findest Du dazu aber bestimmt Hinweise.

    Mein Tipp: Wenn du VBScript lernen willst, dann verzichte doch mal vorerst auch ActiveX. ActiveX ist meiner Meinung nach ohnehin "Teufelszeug" von dem Man mit Vorteil die Finger lässt.

    :-)

    cheers
    kaepten

    Beitrag melden
    –
    Informationen zu den Bewertungsregeln

    1. Browser Absturz.

      Sir Fart-A-Lot
      – Informationen zu den Bewertungsregeln

      Danke Dir kaepten!

      Beitrag melden
      –
      Informationen zu den Bewertungsregeln

  2. Browser Absturz.

    Sir Fart-A-Lot
    – Informationen zu den Bewertungsregeln

    Hallo!

    Ich bin´s nochmal. Mittlerweile habe ich es herausgefunden, warum der Internet Explorer beim ausführen des Scripts abgestürzt ist, das hat mir einfach keine Ruhe gelassen:

    <PARAM NAME="VariousPropertyBits" VALUE="-1400879085">

    ^--- !!!

    Ja, es lag nur an diesem Minus-Zeichen! Dann funktioniert es anstandslos. Mannomann, Fehlerquell(code) MSDN sag´ ich da nur! Aber man lernt ja nie aus.

    Ich bedanke mich bei allen, die sich die Mühe gemacht haben, mein Posting durchzulesen und mir behilflich sein wollten!

    cya,
    Sir Fart-A-Lot.

    Beitrag melden
    –
    Informationen zu den Bewertungsregeln