[ Wlada @ 01.08.2004. 19:47 ] @
Kako da pri startovanju program automatski proveri da li kompjuter na kome se izvrsava ima instaliranu flash kontrolu ili ne.
[ DrS @ 03.08.2004. 11:02 ] @
Citat:
Wlada: Kako da pri startovanju program automatski proveri da li kompjuter na kome se izvrsava ima instaliranu flash kontrolu ili ne.


Nikako.
Kada se startuje program, i on dođe do klijentske mašine da bi ispitao da li ima podršku za Flash, nema načina da ti onda iznova startuješ serverski kód. Ideja za realizovanje tako nečega bi morala da se svede na sledeće: kada (klijentski) skript detektuje da (klijentska) mašina ima mogućnost prikazivanja flash-a, onda treba da se "skoči" na (serversku) stranicu koja je urađena u flash-u. Kód koji bi to realizovao bi mogao otprilike ovako da izgleda (neprovereno):

Code:

<script language="JavaScript">
<!--
    var useFlash = navigator.mimeTypes && navigator.mimeTypes["application/x-shockwave-flash"] && navigator.mimeTypes["application/x-shockwave-flash"].enabledPlugin;
//-->
</script>
<script language="VBScript">
<!--
    On Error Resume Next
    useFlash = Not IsNull(CreateObject("ShockwaveFlash.ShockwaveFlash"))
-->
</script>
<script language="JavaScript">
<!--
    if (useFlash)
        window.location = "FlashPage.html";
    else
        window.location = "NoFlashPage.html";
//-->
</script>
[ mladenovicz @ 08.08.2004. 11:47 ] @
Code:

Private Function UsingFlash() As Boolean
    Dim objFlash As Object
    
    On Error Resume Next
    Set objFlash = CreateObject("ShockwaveFlash.ShockwaveFlash")
    
    UsingFlash = Not (objFlash Is Nothing)
End Function