Как получить параметры переданные из WEB ?

@esso · Регистрация: 27.01.2008

Студворк — интернет-сервис помощи студентам

Ситуация

Пишу ActiveX компоненту на VisualBasic
Из формы обращаюсь к ней <OBJECT ............><PARAM NAME='par1' VALUE='val1'></OBJECT>
Так вот как в компоненте выдернуть этот 'par1' ?

Помогите знающие люди

@Konst_one · 16.06.2008, 19:29

У VBD есть метод Parent, который возвращает window того html-а, в котором он находится, а дальше все просто (можно уже и DOM использовать).

@esso · 17.06.2008, 06:59 **[ТС]**

А нельзя ли поподробнее ?
пожалуйста...

@esso · 17.06.2008, 14:59 **[ТС]**

Народ , кто знает, помогите. Подскажите где ошибка

ActiveX:

Dim m_SetIds As Integer
Const m_def_SetIds = 16

Public Property Get SetIds() As Integer
SetIds = m_SetIds
End Property

Public Property Let SetIds(ByVal New_SetIds As Integer)
m_SetIds = New_SetIds
PropertyChanged 'SetIds'
End Property

Private Sub UserControl_InitProperties()
m_SetIds = m_def_SetIds
End Sub

Private Sub UserControl_WriteProperties(PropBag As PropertyBag)
PropBag.WriteProperty 'SetIds', m_SetIds, m_def_SetIds
End Sub

Private Sub UserControl_ReadProperties(PropBag As PropertyBag)
m_SetIds = PropBag.ReadProperty('SetIds', m_def_SetIds)
End Sub

HTML:

<OBJECT classid='clsid:F30C6B1D-6F69-4964-98CA-111DEAD3D386' codebase='http://mysite.ru/add.ocx#version=1,0,0,0'>
<PARAM NAME='SetIds' value='<%=ids%>'>

Вообщем он не хочет принимать этот параметр а ставит SetIds = дефалтное значение

Уже устал искать....где что не так....

Новые блоги и статьи Все статьи Все блоги /
SDL3 для Desktop (MinGW): Создаём пустое окно с нуля для 2D-графики на SDL3, Си и C++ 8Observer8 10.03.2026 Содержание блога Финальные проекты на Си и на C++: hello-sdl3-c. zip hello-sdl3-cpp. zip Результат:	Установка CMake и MinGW 13.1 для сборки С и C++ приложений из консоли и из Qt Creator в EXE 8Observer8 10.03.2026 Содержание блога MinGW - это коллекция инструментов для сборки приложений в EXE. CMake - это система сборки приложений. Здесь описаны базовые шаги для старта программирования с помощью CMake и. . .	Как дизайн сайта влияет на конверсию: 7 решений, которые реально повышают заявки Neotwalker 08.03.2026 Многие до сих пор воспринимают дизайн сайта как “красивую оболочку”. На практике всё иначе: дизайн напрямую влияет на то, оставит человек заявку или уйдёт через несколько секунд. Даже если у вас. . .	Модульная разработка через nuget packages DevAlt 07.03.2026 Сложившийся в . Net-среде способ разработки чаще всего предполагает монорепозиторий в котором находятся все исходники. При создании нового решения, мы просто добавляем нужные проекты и имеем. . .
Модульный подход на примере F# DevAlt 06.03.2026 В блоге дяди Боба наткнулся на такое определение: В этой книге («Подход, основанный на вариантах использования») Ивар утверждает, что архитектура программного обеспечения — это структуры,. . .	Управление камерой с помощью скрипта OrbitControls.js на Three.js: Вращение, зум и панорамирование 8Observer8 05.03.2026 Содержание блога Финальная демка в браузере работает на Desktop и мобильных браузерах. Итоговый код: orbit-controls-threejs-js. zip. Сканируйте QR-код на мобильном. Вращайте камеру одним пальцем,. . .	SDL3 для Web (WebAssembly): Синхронизация спрайтов SDL3 и тел Box2D 8Observer8 04.03.2026 Содержание блога Финальная демка в браузере. Итоговый код: finish-sync-physics-sprites-sdl3-c. zip На первой гифке отладочные линии отключены, а на второй включены:. . .	SDL3 для Web (WebAssembly): Идентификация объектов на Box2D v3 - использование userData и событий коллизий 8Observer8 02.03.2026 Содержание блога Финальная демка в браузере. Итоговый код: finish-collision-events-sdl3-c. zip Сканируйте QR-код на мобильном и вы увидите, что появится джойстик для управления главным героем. . . .

@esso 0 / 0 / 0 Регистрация: 27.01.2008 Сообщений: 14

	Как получить параметры переданные из WEB ? 16.06.2008, 16:02. Показов 949. Ответов 3 Метки нет (Все метки) Ситуация Пишу ActiveX компоненту на VisualBasic Из формы обращаюсь к ней <OBJECT ............><PARAM NAME='par1' VALUE='val1'></OBJECT> Так вот как в компоненте выдернуть этот 'par1' ? Помогите знающие люди 0

@Konst_one 2 / 2 / 1 Регистрация: 19.07.2007 Сообщений: 737
	16.06.2008, 19:29
	У VBD есть метод Parent, который возвращает window того html-а, в котором он находится, а дальше все просто (можно уже и DOM использовать). 0

@esso 0 / 0 / 0 Регистрация: 27.01.2008 Сообщений: 14
	17.06.2008, 06:59 [ТС]
	А нельзя ли поподробнее ? пожалуйста... 0

@esso 0 / 0 / 0 Регистрация: 27.01.2008 Сообщений: 14
	17.06.2008, 14:59 [ТС]
	Народ , кто знает, помогите. Подскажите где ошибка ActiveX: Dim m_SetIds As Integer Const m_def_SetIds = 16 Public Property Get SetIds() As Integer SetIds = m_SetIds End Property Public Property Let SetIds(ByVal New_SetIds As Integer) m_SetIds = New_SetIds PropertyChanged 'SetIds' End Property Private Sub UserControl_InitProperties() m_SetIds = m_def_SetIds End Sub Private Sub UserControl_WriteProperties(PropBag As PropertyBag) PropBag.WriteProperty 'SetIds', m_SetIds, m_def_SetIds End Sub Private Sub UserControl_ReadProperties(PropBag As PropertyBag) m_SetIds = PropBag.ReadProperty('SetIds', m_def_SetIds) End Sub HTML: <OBJECT classid='clsid:F30C6B1D-6F69-4964-98CA-111DEAD3D386' codebase='http://mysite.ru/add.ocx#version=1,0,0,0'> <PARAM NAME='SetIds' value='<%=ids%>'> Вообщем он не хочет принимать этот параметр а ставит SetIds = дефалтное значение Уже устал искать....где что не так.... 0

Опции темы