Гость
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Элемент ScriptControl заменить на либо ...object или declare / 9 сообщений из 9, страница 1 из 1
18.03.2014, 04:21
    #38588943
Андрей159
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Элемент ScriptControl заменить на либо ...object или declare
Элемент ScriptControl нужно заменить на либо ...object или declare.
Парсинг на VB6 слишком медленный. Выгодней использовать регулярное выражение.
Всем добра и мир
с уважением Андрей
...
Рейтинг: 0 / 0
18.03.2014, 11:01
    #38589099
Antonariy
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Элемент ScriptControl заменить на либо ...object или declare
IActiveScript
...
Рейтинг: 0 / 0
18.03.2014, 11:04
    #38589103
Antonariy
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Элемент ScriptControl заменить на либо ...object или declare
Кстати, у меня и пример завалялся.
...
Рейтинг: 0 / 0
19.03.2014, 15:56
    #38590825
Андрей159
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Элемент ScriptControl заменить на либо ...object или declare
Круто. Высокий уровень. Спасибо
...
Рейтинг: 0 / 0
Период между сообщениями больше года.
06.06.2015, 16:25
    #38978179
Eolt
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Элемент ScriptControl заменить на либо ...object или declare
AntonariyКстати, у меня и пример завалялся.

Прикольно. А как скомпилировать vbActiveScript_3.ODL ? Долго бился с MIDL и MkTypeLib, ничего не получается, непонятные ошибки валяться одна за одной.
...
Рейтинг: 0 / 0
06.06.2015, 19:13
    #38978209
VSVLAD
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Элемент ScriptControl заменить на либо ...object или declare
Eolt,

В архиве у Antonariy есть уже готовая TLB
...
Рейтинг: 0 / 0
06.06.2015, 19:22
    #38978214
Eolt
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Элемент ScriptControl заменить на либо ...object или declare
VSVLAD,

TLB скомпилена с закоменченными интерфейсами отладки IActiveScriptSiteDebug, IDebugApplication
что как-бы снижает ценность исходника почти до нуля

Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
16.
17.
18.
19.
20.
21.
22.
23.
24.
25.
26.
27.
28.
29.
30.
31.
32.
33.
34.
35.
36.
37.
38.
39.
40.
41.
42.
43.
44.
45.
46.
47.
48.
49.
50.
51.
52.
53.
54.
55.
56.
57.
58.
59.
60.
61.
62.
63.
64.
65.
66.
67.
68.
69.
70.
71.
72.
73.
74.
75.
76.
77.
78.
79.
80.
81.
82.
83.
84.
85.
86.
87.
88.
89.
90.
91.
92.
93.
94.
95.
96.
97.
98.
99.
100.
101.
102.
103.
104.
105.
106.
107.
108.
109.
/*
[
        odl,
        uuid(51973C11-CB0C-11d0-B5C9-00A0244A0E7A),
]
interface IActiveScriptSiteDebug : stdole.IUnknown
{
		HRESULT GetDocumentContextFromPosition( 
            [in] LONG *dwSourceContext,
            [in] LONG *uCharacterOffset,
            [in] LONG *uNumChars,
            [out,retval] LONG *ppsc
        );
        
        HRESULT GetApplication( 
            [out,retval] LONG *ppda
        );
       
        //IDebugApplication        
        HRESULT GetRootApplicationNode( 
			[out,retval] LONG *ppdanRoot
        );

        HRESULT OnScriptErrorDebug( 
            [in] LONG *pErrorDebug,
            [in,out] BOOL *pfEnterDebugger,
            [out,retval] BOOL *pfCallOnScriptErrorWhenContinuing
            
        );
        
};
*/
/*
[
     	odl,
        uuid(51973C32-CB0C-11d0-B5C9-00A0244A0E7A)
     ]
    interface IDebugApplication : IRemoteDebugApplication
    {
    
        HRESULT SetName( 
            [in] LPSTR  pstrName) = 0;
        
        HRESULT StepOutComplete( void) = 0;
        
        HRESULT DebugOutput( 
            [in] LPSTR  pstr) = 0;
        
        HRESULT StartDebugSession( void) = 0;
        
        HRESULT HandleBreakPoint( 
            [in] BREAKREASON br,
            [in,out] BREAKRESUMEACTION  *pbra) = 0;
        
        HRESULT Close( void) = 0;
        
        HRESULT GetBreakFlags( 
            [in,out] APPBREAKFLAGS  *pabf,
            [in,out] IRemoteDebugApplicationThread  *pprdatSteppingThread) = 0;
        
        HRESULT GetCurrentThread( 
            [in,out] IDebugApplicationThread  *pat) = 0;
        
        HRESULT CreateAsyncDebugOperation( 
            [in] IDebugSyncOperation  *psdo,
            [in,out] IDebugAsyncOperation  *ppado) = 0;
        
        HRESULT AddStackFrameSniffer( 
            [in] IDebugStackFrameSniffer  *pdsfs,
            [in,out] LONG  *pdwCookie) = 0;
        
        HRESULT RemoveStackFrameSniffer( 
            [in] LONG dwCookie) = 0;
        
        HRESULT QueryCurrentThreadIsDebuggerThread( void) = 0;
        
        HRESULT SynchronousCallInDebuggerThread( 
            [in] IDebugThreadCall  *pptc,
            [in] LONG dwParam1,
            [in] LONG dwParam2,
            [in] LONG dwParam3) = 0;
        
        HRESULT CreateApplicationNode( 
            [in,out] IDebugApplicationNode  *ppdanNew) = 0;
        
        HRESULT FireDebuggerEvent( 
            [in] REFGUID riid,
            [in] IUnknown  *punk) = 0;
        
        HRESULT HandleRuntimeError( 
            [in] IActiveScriptErrorDebug  *pErrorDebug,
            [in] IActiveScriptSite  *pScriptSite,
            [in,out] BREAKRESUMEACTION  *pbra,
            [in,out] ERRORRESUMEACTION  *perra,
            [in,out] BOOL  *pfCallOnScriptError) = 0;
        
        BOOL FCanJitDebug( void) = 0;
        
        BOOL FIsAutoJitDebugEnabled( void) = 0;
        
        HRESULT AddGlobalExpressionContextProvider( 
            [in] IProvideExpressionContexts  *pdsfs,
            [in,out] LONG  *pdwCookie) = 0;
        
        HRESULT RemoveGlobalExpressionContextProvider( 
            [in] LONG dwCookie) = 0;
        
    };
*/    

...
Рейтинг: 0 / 0
06.06.2015, 20:29
    #38978231
VSVLAD
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Элемент ScriptControl заменить на либо ...object или declare
Eoltчто как-бы снижает ценность исходника почти до нуля
Смотря какая задача стоит, написать свой отладчик или что? Лично для меня функционала вполне хватило
...
Рейтинг: 0 / 0
06.06.2015, 21:30
    #38978247
Antonariy
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Элемент ScriptControl заменить на либо ...object или declare
EoltAntonariyКстати, у меня и пример завалялся.

Прикольно. А как скомпилировать vbActiveScript_3.ODL ? Долго бился с MIDL и MkTypeLib, ничего не получается, непонятные ошибки валяться одна за одной.ну ты ошибки-то показывай, может поймем всем миром.
...
Рейтинг: 0 / 0
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Элемент ScriptControl заменить на либо ...object или declare / 9 сообщений из 9, страница 1 из 1
Целевая тема:
Создать новую тему:
Автор:
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]