Имя пользователя:
Пароль:
 

Показать сообщение отдельно

Googler


Сообщения: 3665
Благодарности: 1563

Профиль | Отправить PM | Цитировать


Creat0R
Цитата:
при открытии странички с роликом на YouTube к примеру, получаю предупреждение о том что нужно установить Flash Player »
не знаю как надо, но по тому линку который ты указал проверка производится по алгоритму (вытащил из HTML):
Код: Выделить весь код
MsgBox(0, "", ShockwaveDetectAxVer(0))

; $iVerReq=0 - возврат текущей версии
; $iVerReq>0 - соответствие минимальным требованиям к версии
Func ShockwaveDetectAxVer($iVerReq)
    Local $i, $iVer, $sVer
    For $i=8 To 1 Step -1
        $sVer = GetShockwaveVer($i)
        If $sVer <> '0.0' Then
            $iVer = Number($sVer)
            If $sVer='1.0' Then $iVer = 6
            If $iVerReq Then Return $iVer>=$iVerReq
            Return $iVer
        EndIf
        If $iVerReq Then Return False
        Return 0
    Next
EndFunc

Func GetShockwaveVer($iVer)
    Local $swControl=ObjCreate("SWCtl.SWCtl." & $iVer), $sVer = '0.0'
    If IsObj($swControl) Then
        $sVer = $iVer + '.0'
        $sVer = $swControl.ShockwaveVersion("")
        Return $sVer
    EndIf
EndFunc

Последний раз редактировалось amel27, 27-11-2007 в 03:17. Причина: ошибка в скрипте

Это сообщение посчитали полезным следующие участники:

Отправлено: 05:15, 26-11-2007 | #765