alex: Auslesen ob vbscript aktiv

#!/usr/bin/perl

print "Content-type: text/html\n\n";

print "VBScript:\n";
print " <SCRIPT language='VBScript'>vbscript = 'aktiv'</SCRIPT>\n";
print " <SCRIPT language=JavaScript>if (vbscript == 'aktiv') document.write('aktiviert')\n";
print " else document.write('kein Test')</script>\n";

Das ist mein Test, welcher leider nicht funtioniert. Weder reicht script language=vbscript noch "vbscript" oder 'vbscript'. Gar nichts funzt.

Weiß einer mehr? (Alles auf IE bezogen, versteht sich...)

  1. Tach!

    print "  <SCRIPT language='VBScript'>vbscript = 'aktiv'</SCRIPT>\n";
    print "  <SCRIPT language=JavaScript>if (vbscript == 'aktiv') document.write('aktiviert')\n";
    print "  else document.write('kein Test')</script>\n";

    Das ist mein Test, welcher leider nicht funtioniert. Weder reicht script language=vbscript noch "vbscript" oder 'vbscript'. Gar nichts funzt.

    Meines Wissens wird die erste Zeile eines Scripts ignoriert, weil dort eigentlich eine HTML-Kommentareroeffnung hingehoert, die fuer die jeweilige Scriptsprache meist syntaktischer Muell ist. Also besser:

    <SCRIPT language="VBScript"><!--
        vbscript = 1
    '--></SCRIPT>

    <SCRIPT language="JavaScript"><!--
        if (!vbscript) document.write('nicht ');
        document.write('aktiviert');
    //--></SCRIPT>

    Und was hat das ueberhaupt mit Perl zu tun?

    So long

    1. Hi

      Ja, das Problem ist doch, daß das Script ansich funzt, doch wenn ich es in Perl implementiere beschwert sich der IE. Und das nur bei vbscripte, javascripte laufen reibungslos...
      Jetzt wollte ich eben wissen wieso und wie ich anders machen soll...

      thanx

      1. Ja, das Problem ist doch, daß das Script ansich funzt,

        Na das ist doch schon was.

        doch wenn ich es in Perl implementiere beschwert sich der IE.

        Was heisst "beschwert sich" ?! Meine Glaskugel ist mir letzte Woche runtergefallen, Du musst mir jetzt leider Fakten liefern.

        Also ich wuerde das jetzt alles einfach mit print ausgeben, das sieht dann so aus:

        print q{
        <SCRIPT language="VBScript"><!--
            vbscript = 1
        '--></SCRIPT>

        <SCRIPT language="JavaScript"><!--
            if (!vbscript) document.write('nicht ');
            document.write('aktiviert');
        //--></SCRIPT>
        }

        So long