Visual Basic, .NET, ASP, VBScript
 

   
   
     

Форум - Общий форум

Страница: 1 |

 

  Вопрос: Создание ActiveX для браузера Добавлено: 23.04.06 04:21  

Автор вопроса:  xa0c | ICQ: 993606 
Блин, голова уже пухнет...
Пишу ActiveX, который должен загрузиться у клиента, получить инфу и показать её на странице(передать как параметр php/asp)
Указываю свойство:
Const m_def_Info = "0"
Dim m_Info As Variant

Public Property Get Info() As Variant
    Info = m_Info
End Property

Public Property Let Music(ByVal New_Info As Variant)
    m_Info = New_Info
    PropertyChanged "Info"
End Property

Private Sub UserControl_ReadProperties(PropBag As PropertyBag)
    m_Info = PropBag.ReadProperty("Info", m_def_Info)
End Sub

Private Sub UserControl_WriteProperties(PropBag As PropertyBag)
    Call PropBag.WriteProperty("Info", m_Info, m_def_Info)
End Sub


На странице пишу
<OBJECT
          id="myocx"
  classid="clsid:F022179F-1608-4D3E-95BB-623B6DA1BF59"
  codebase="MyCoolOCX.ocx#version=1,0,0,0">
</OBJECT>


ActiveX загружается, работает, инфу собирает... А вот как её передать в php/asp?.. Да хотя бы получить... Пробую:
<input type="button" value="Go!" name="testbtn">
<SCRIPT LANGUAGE="VBScript">
<!--
Sub testbtn_onclick()
MsgBox myocx.info
End Sub
-->
</SCRIPT>

Выдаёт: "Object doesn't support this property or method: 'myocx.info'". Если создать эвент, то на
Sub MyOcx_MyEvent()
MsgBox "Yes!"
End Sub

тоже никакой реакции...
Что я неправильно делаю?.. До этого писАл ActiveX'ы для прог - всё ок работало...

Ответить

  Ответы Всего ответов: 4  

Номер ответа: 1
Автор ответа:
 HACKER


 

Разработчик Offline Client

Вопросов: 236
Ответов: 8362
 Профиль | | #1 Добавлено: 23.04.06 06:46
воопервый, откуда взял clsid? Если срисовал с исходника странице когда тестиш у себя в ide - не факт что у других активикс загрузится в принципе. Если же нашёл как расчитать (и чем) этот clsid для своего активикса, расскаж и мне... тоже интересно...

Отпостить данные на сервак через форму мона...

<form action="mypage.php" method="post" name="form1">
<input type="hidden" name="text">
</form>
<script>
function MyFunction(param){
document.form1.text.value = param;
document.form1.submit();
}
</script>

Ну как вызвать ф-цию и передать ей параметр думаю разберёшся :)

Ответить

Номер ответа: 2
Автор ответа:
 xa0c



ICQ: 993606 

Вопросов: 7
Ответов: 28
 Профиль | | #2 Добавлено: 23.04.06 17:31
воопервый, откуда взял clsid?

Из реестра :)
Посмотрел, списАл.

Ну как вызвать ф-цию и передать ей параметр думаю разберёшся

В этом и вопрос был - я не могу получить никакой информации из написанного мной ActiveX'a.

Ответить

Номер ответа: 3
Автор ответа:
 HACKER


 

Разработчик Offline Client

Вопросов: 236
Ответов: 8362
 Профиль | | #3 Добавлено: 23.04.06 22:33
Из реестра :)

И с чего ты взял что этот clsid будет в реестре у другого пользователя? :) И вообще, откуда он там возмётся :))

и кстати...

Public Property Let Music(ByVal New_Info As Variant)
    m_Info = New_Info
    PropertyChanged "Info"
End Property


тогда ж походу не Music, а Info...

Public Property Let Info(ByVal New_Info As Variant)
    m_Info = New_Info
    PropertyChanged "Info"
End Property

Ответить

Номер ответа: 4
Автор ответа:
 xa0c



ICQ: 993606 

Вопросов: 7
Ответов: 28
 Профиль | | #4 Добавлено: 24.04.06 01:44
И с чего ты взял что этот clsid будет в реестре у другого пользователя? :) И вообще, откуда он там возмётся :))

Ну а если не найдется - загрузится и установится(как убедить юзера разрешить данное деяние - это уже отдельный вопрос)

тогда ж походу не Music, а Info..

А, ну да... Это я для конспирации менял, когда постил сюда, одну пропустил... :))
Это опечатка, всё правильно в исходнике на самом деле :)

Вопрос остаётся в силе - как получить доступ к свойству activex'a?..

Ответить

Страница: 1 |

Поиск по форуму



© Copyright 2002-2011 VBNet.RU | Пишите нам