XMLDOM

@MORFEY1338 · Регистрация: 07.06.2018

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

PureBasic
1
2
3
4
5
6
7
8
9
10
11
Import "uuid.lib"
  CLSID_DOMDocument
  IID_IXMLDOMDocument
EndImport
 
Global ovLTkn.IXMLDOMDocument
CoInitialize_(0)
CoCreateInstance_(@CLSID_DOMDocument, 0, 1, @IID_IXMLDOMDocument, @ovLTkn)
ovLTkn\put_async(#False)
ovLTkn\load()
ovLTkn\Release()

Подскажите как передать параметры для load, там нужно указать 2 параметра если я правильно понимаю то параметры в виде bstr и bool

@Pro_grammer · 22.12.2020, 11:06

А встроенная XML библиотека и простая загрузка из неё :LoadXML(#XML, FileName$)не подойдет?

@MORFEY1338 · 22.12.2020, 11:15 **[ТС]**

Ну мне нужно по http подгружать, во встроенном вроде нет такой возможности

@Pro_grammer · 22.12.2020, 11:26

Сообщение от MORFEY1338

мне нужно по http подгружать

А если ReceiveHTTPFile грузим файл, а потом его LoadXML.

Сообщение от MORFEY1338

параметры в виде bstr

там псевдо тип p-variant высвечивает

@MORFEY1338 · 22.12.2020, 14:50 **[ТС]**

Вообще я хотел узнать как передавать правильно параметры в COM и где вообще можно посмотреть информацию об объекте если я буду использовать какой то другой где можно узнать инфу о передаваемых ему параметрах, я смотрел похожее на C++ но вроде там есть различия, к примеру в VBS в том же Load всего 1 параметр а тут их почему-то два

@Pro_grammer · 22.12.2020, 15:38

Сообщение от MORFEY1338

и где вообще можно посмотреть информацию об объекте

В документации представленной автором, где же ещё?
Что удалось найти по использованию в Пуре:

PureBasic
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
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
211
212
213
214
215
216
217
218
219
220
221
222
223
224
225
226
227
228
229
230
231
232
233
234
235
236
237
238
239
240
241
242
243
244
245
246
247
248
249
250
251
252
253
254
255
256
257
258
259
260
261
262
263
264
265
266
267
268
269
270
271
272
273
274
275
276
277
278
279
280
281
282
283
284
285
286
287
288
289
290
291
292
293
294
295
296
297
298
299
#VT_EMPTY = 0
#VT_NULL = 1
#VT_I2 = 2
#VT_I4 = 3
#VT_R4 = 4
#VT_R8 = 5
#VT_CY = 6
#VT_DATE = 7
#VT_BSTR = 8
#VT_DISPATCH = 9
#VT_ERROR = 10
#VT_BOOL = 11
#VT_VARIANT = 12
#VT_UNKNOWN = 13
#VT_DECIMAL = 14
#VT_I1 = 16
#VT_UI1 = 17
#VT_UI2 = 18
#VT_UI4 = 19
#VT_I8 = 20
#VT_UI8 = 21
#VT_INT = 22
#VT_UINT = 23
#VT_VOID = 24
#VT_HRESULT = 25
#VT_PTR = 26
#VT_SAFEARRAY = 27
#VT_CARRAY = 28
#VT_USERDEFINED = 29
#VT_LPSTR = 30
#VT_LPWSTR = 31
#VT_RECORD = 36
#VT_FILETIME = 64
#VT_BLOB = 65
#VT_STREAM = 66
#VT_STORAGE = 67
#VT_STREAMED_OBJECT = 68
#VT_STORED_OBJECT = 69
#VT_BLOB_OBJECT = 70
#VT_CF = 71
#VT_CLSID = 72
#VT_BSTR_BLOB = $FFF
#VT_VECTOR = $1000
#VT_ARRAY = $2000
#VT_BYREF = $4000
#VT_RESERVED = $8000
#VT_ILLEGAL = $FFFF
#VT_ILLEGALMASKED = $FFF
#VT_TYPEMASK = $FFF
#DISP_E_PARAMNOTFOUND = $80020004
 
; Structure VARIANT
;   vt.w
;   wReserved1.w
;   wReserved2.w   
;   wReserved3.w
;   StructureUnion
;     value.l
;     bstrVal.l
;     scode.l
;   EndStructureUnion
; EndStructure
 
;- Interface definitions
Interface myIXMLDOMNode Extends IDispatch
  get_nodeName(a.l) ;
  get_nodeValue(a.l) ;
  put_nodeValue(a.l) ;
  get_nodeType(a.l) ;
  get_parentNode(a.l) ;
  get_childNodes(a.l) ;
  get_firstChild(a.l) ;
  get_lastChild(a.l) ;
  get_previousSibling(a.l) ;
  get_nextSibling(a.l) ;
  get_attributes(a.l) ;
  insertBefore(a.l,b.l,c.l) ;
  replaceChild(a.l,b.l,c.l) ;
  removeChild(a.l,b.l) ;
  appendChild(a.l,b.l) ;
  hasChildNodes(a.l) ;
  get_ownerDocument(a.l) ;
  cloneNode(a.l,b.l) ;
  get_nodeTypeString(a.l) ;
  get_text(a.l) ;
  put_text(a.l) ;
  get_specified(a.l) ;
  get_definition(a.l) ;
  get_nodeTypedValue(a.l) ;
  put_nodeTypedValue(a.l) ;
  get_dataType(a.l) ;
  put_dataType(a.l) ;
  get_xml(a.l) ;
  transformNode(a.l,b.l) ;
  selectNodes(a.l,b.l) ;
  selectSingleNode(a.l,b.l) ;
  get_parsed(a.l) ;
  get_namespaceURI(a.l) ;
  get_prefix(a.l) ;
  get_baseName(a.l) ;
  transformNodeToObject(a.l,b.l) ;
EndInterface
 
Interface myIXMLDOMDocument Extends myIXMLDOMNode
  get_doctype(a.l) ;
  get_implementation(a.l) ;
  get_documentElement(a.l) ;
  put_documentElement(a.l) ;
  createElement(a.l,b.l) ;
  createDocumentFragment(a.l) ;
  createTextNode(a.l,b.l) ;
  createComment(a.l,b.l) ;
  createCDATASection(a.l,b.l) ;
  createProcessingInstruction(a.l,b.l,c.l) ;
  createAttribute(a.l,b.l) ;
  createEntityReference(a.l,b.l) ;
  getElementsByTagName(a.l,b.l) ;
  CreateNode(a.l,b.l,c.l,d.l) ;
  nodeFromID(a.l,b.l) ;
  load(a.l,b.l) ;
  get_readyState(a.l) ;
  get_parseError(a.l) ;
  get_url(a.l) ;
  get_async(a.l) ;
  put_async(a.l) ;
  abort() ;
  LoadXML(a.l,b.l) ;
  save(a.l) ;
  get_validateOnParse(a.l) ;
  put_validateOnParse(a.l) ;
  get_resolveExternals(a.l) ;
  put_resolveExternals(a.l) ;
  get_preserveWhiteSpace(a.l) ;
  put_preserveWhiteSpace(a.l) ;
  put_onreadystatechange(a.l) ;
  put_ondataavailable(a.l) ;
  put_ontransformnode(a.l) ;
EndInterface
 
 
Procedure.s Uni2Ansi(unicodestr.l)
  lenA = WideCharToMultiByte_(#CP_ACP, 0, unicodestr, -1, 0, 0, 0, 0);
  ansistr.s = Space(lenA)
  If (lenA > 0)
    WideCharToMultiByte_(#CP_ACP, 0, unicodestr, -1, @ansistr, lenA, 0, 0);
  EndIf
  ProcedureReturn ansistr
EndProcedure
 
Procedure.l Ansi2Uni(ansistr.s)
  lenA.l = Len(ansistr)
  lenW = MultiByteToWideChar_(#CP_ACP, 0, ansistr, lenA, 0, 0)
  If (lenW > 0) ; Check whether conversion was successful
    unicodestr = SysAllocStringLen_(0, lenW)
    MultiByteToWideChar_(CP_ACP, 0, ansistr, lenA, unicodestr, lenW)
    result = unicodestr
    SysFreeString_(unicodestr)
    ProcedureReturn result
  Else
    ProcedureReturn 0
  EndIf
EndProcedure
 
Procedure.s GetHResultMessage(HResult.l)
  ;Converts a COM HResult value into a more meaningful message.
  ;Params:
  ;     HResult.l A HResult value return from a COM call
 
  Message.s = ""
  Select HResult
    Case #S_OK
      Message = "OK"
    Case #CLASS_E_CLASSNOTAVAILABLE
      Message = "Class Not Available"
    Case #E_NOINTERFACE
      Message = "No Interface"
    Case #CO_E_NOTINITIALIZED
      Message = "CO_E_NOTINITIALIZED"
    Case #CO_E_ALREADYINITIALIZED
      Message = "CO_E_ALREADYINITIALIZED"
    Case #CO_E_CANTDETERMINECLASS
      Message = "CO_E_CANTDETERMINECLASS"
    Case #CO_E_CLASSSTRING
      Message = "The registered CLSID for the ProgID is invalid"
    Case #CO_E_IIDSTRING
      Message = "CO_E_IIDSTRING"
    Case #CO_E_APPNOTFOUND
      Message = "CO_E_APPNOTFOUND"
    Case #CO_E_APPSINGLEUSE
      Message = "CO_E_APPSINGLEUSE"
    Case #CO_E_ERRORINAPP
      Message = "CO_E_ERRORINAPP"
    Case #CO_E_DLLNOTFOUND
      Message = "CO_E_DLLNOTFOUND"
    Case #CO_E_ERRORINDLL
      Message = "CO_E_ERRORINDLL"
    Case #CO_E_WRONGOSFORAPP
      Message = "CO_E_WRONGOSFORAPP"
    Case #CO_E_OBJNOTREG
      Message = "CO_E_OBJNOTREG"
    Case #CO_E_OBJISREG
      Message = "CO_E_OBJISREG"
    Case #CO_E_OBJNOTCONNECTED
      Message = "CO_E_OBJNOTCONNECTED"
    Case #CO_E_APPDIDNTREG
      Message = "CO_E_APPDIDNTREG"
    Case #CO_E_RELEASED
      Message = "CO_E_RELEASED"
    Case #REGDB_E_WRITEREGDB
      Message = "An error occurred writing the CLSID To the registry."
    Case #E_OUTOFMEMORY
      Message = "Out of memory."
    Case #STG_E_INSUFFICIENTMEMORY
      Message = "Out of memory."
    Case #E_INVALIDARG
      Message = "One or more of the arguments is invalid."
    Case #DISP_E_UNKNOWNNAME
      Message = "One Or more of the names could not be found."
    Case #DISP_E_UNKNOWNLCID
      Message = "The locale identifier (LCID) could not be found in the OLE DLLs."
    Default
      Message = "Error Number: $" + Hex(HResult)
  EndSelect
 
  ProcedureReturn Message
EndProcedure
 
Global oXML.myIXMLDOMDocument
Global oXSL.myIXMLDOMDocument
 
Global XML_file.VARIANT
Global XSL_file.VARIANT
Global VBool1.VARIANT
Global VBool2.VARIANT
 
XML_file\vt = #VT_BSTR
XML_file\bstrVal = SysAllocString_(Ansi2Uni("C:\Dokum.xml"))
 
XSL_file\vt = #VT_BSTR
XSL_file\bstrVal = SysAllocString_(Ansi2Uni("C:\Dokum.xml"))
 
VBool1\vt = #VT_BOOL
VBool2\vt = #VT_BOOL
 
;- Start of program
CoInitialize_(0)
 
If CoCreateInstance_(?CLSID_XMLDOM,0,1,?IID_IXMLDOMDocument,@oXML)<>#S_OK
  MessageRequester("Warning:","Couldn't init oXML",0)
  End
EndIf
 
If CoCreateInstance_(?CLSID_XMLDOM,0,1,?IID_IXMLDOMDocument,@oXSL)<>#S_OK
  MessageRequester("Warning:","Couldn't init oXSL",0)
  End
EndIf
 
*My_xml_result.VARIANT = oXML\load(XML_file,VBool1)
 
Debug "XML " + GetHResultMessage(My_xml_result)
 
;
; Crashes as soon as you try to load the XSL sheet.
;
 
buffer.s = Space(1024)
 
*My_xsl_result.VARIANT = oXSL\load(XSL_file,VBool2)
 
Debug "XSL " + GetHResultMessage(My_xsl_result)
 
oXML\transformNode(@oXSL,@buffer)
 
If oXML
  oXML\Release()
EndIf
 
If oXSL
  oXSL\Release()
EndIf
 
CoUninitialize_()
 
End
 
;- Datasection
DataSection
CLSID_XMLDOM:      ;{2933BF90-7B36-11D2-B20E-00C04F983E60}
Data.l $2933BF90
Data.w $7B36,$11D2
Data.b $B2,$0E,$00,$C0,$4F,$98,$3E,$60
EndDataSection
 
DataSection
IID_IXMLDOMDocument:      ;{2933BF81-7B36-11D2-B20E-00C04F983E60}
Data.l $2933BF81
Data.w $7B36,$11D2
Data.b $B2,$0E,$00,$C0,$4F,$98,$3E,$60
EndDataSection

@MORFEY1338 · 22.12.2020, 16:15 **[ТС]**

Пробовал этот код ещё раньше и он не работает, хз может делаю что не так:

PureBasic
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
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
#VT_EMPTY = 0
#VT_NULL = 1
#VT_I2 = 2
#VT_I4 = 3
#VT_R4 = 4
#VT_R8 = 5
#VT_CY = 6
#VT_DATE = 7
#VT_BSTR = 8
#VT_DISPATCH = 9
#VT_ERROR = 10
#VT_BOOL = 11
#VT_VARIANT = 12
#VT_UNKNOWN = 13
#VT_DECIMAL = 14
#VT_I1 = 16
#VT_UI1 = 17
#VT_UI2 = 18
#VT_UI4 = 19
#VT_I8 = 20
#VT_UI8 = 21
#VT_INT = 22
#VT_UINT = 23
#VT_VOID = 24
#VT_HRESULT = 25
#VT_PTR = 26
#VT_SAFEARRAY = 27
#VT_CARRAY = 28
#VT_USERDEFINED = 29
#VT_LPSTR = 30
#VT_LPWSTR = 31
#VT_RECORD = 36
#VT_FILETIME = 64
#VT_BLOB = 65
#VT_STREAM = 66
#VT_STORAGE = 67
#VT_STREAMED_OBJECT = 68
#VT_STORED_OBJECT = 69
#VT_BLOB_OBJECT = 70
#VT_CF = 71
#VT_CLSID = 72
#VT_BSTR_BLOB = $FFF
#VT_VECTOR = $1000
#VT_ARRAY = $2000
#VT_BYREF = $4000
#VT_RESERVED = $8000
#VT_ILLEGAL = $FFFF
#VT_ILLEGALMASKED = $FFF
#VT_TYPEMASK = $FFF
#DISP_E_PARAMNOTFOUND = $80020004
 
; Structure VARIANT
;   vt.w
;   wReserved1.w
;   wReserved2.w   
;   wReserved3.w
;   StructureUnion
;     value.l
;     bstrVal.l
;     scode.l
;   EndStructureUnion
; EndStructure
 
;- Interface definitions
Interface myIXMLDOMNode Extends IDispatch
  get_nodeName(a.l) ;
  get_nodeValue(a.l) ;
  put_nodeValue(a.l) ;
  get_nodeType(a.l) ;
  get_parentNode(a.l) ;
  get_childNodes(a.l) ;
  get_firstChild(a.l) ;
  get_lastChild(a.l) ;
  get_previousSibling(a.l) ;
  get_nextSibling(a.l) ;
  get_attributes(a.l) ;
  insertBefore(a.l,b.l,c.l) ;
  replaceChild(a.l,b.l,c.l) ;
  removeChild(a.l,b.l) ;
  appendChild(a.l,b.l) ;
  hasChildNodes(a.l) ;
  get_ownerDocument(a.l) ;
  cloneNode(a.l,b.l) ;
  get_nodeTypeString(a.l) ;
  get_text(a.l) ;
  put_text(a.l) ;
  get_specified(a.l) ;
  get_definition(a.l) ;
  get_nodeTypedValue(a.l) ;
  put_nodeTypedValue(a.l) ;
  get_dataType(a.l) ;
  put_dataType(a.l) ;
  get_xml(a.l) ;
  transformNode(a.l,b.l) ;
  selectNodes(a.l,b.l) ;
  selectSingleNode(a.l,b.l) ;
  get_parsed(a.l) ;
  get_namespaceURI(a.l) ;
  get_prefix(a.l) ;
  get_baseName(a.l) ;
  transformNodeToObject(a.l,b.l) ;
EndInterface
 
Interface myIXMLDOMDocument Extends myIXMLDOMNode
  get_doctype(a.l) ;
  get_implementation(a.l) ;
  get_documentElement(a.l) ;
  put_documentElement(a.l) ;
  createElement(a.l,b.l) ;
  createDocumentFragment(a.l) ;
  createTextNode(a.l,b.l) ;
  createComment(a.l,b.l) ;
  createCDATASection(a.l,b.l) ;
  createProcessingInstruction(a.l,b.l,c.l) ;
  createAttribute(a.l,b.l) ;
  createEntityReference(a.l,b.l) ;
  getElementsByTagName(a.l,b.l) ;
  CreateNode(a.l,b.l,c.l,d.l) ;
  nodeFromID(a.l,b.l) ;
  load(a.l,b.l) ;
  get_readyState(a.l) ;
  get_parseError(a.l) ;
  get_url(a.l) ;
  get_async(a.l) ;
  put_async(a.l) ;
  abort() ;
  LoadXML(a.l,b.l) ;
  save(a.l) ;
  get_validateOnParse(a.l) ;
  put_validateOnParse(a.l) ;
  get_resolveExternals(a.l) ;
  put_resolveExternals(a.l) ;
  get_preserveWhiteSpace(a.l) ;
  put_preserveWhiteSpace(a.l) ;
  put_onreadystatechange(a.l) ;
  put_ondataavailable(a.l) ;
  put_ontransformnode(a.l) ;
EndInterface
 
 
Procedure.s Uni2Ansi(unicodestr.l)
  lenA = WideCharToMultiByte_(#CP_ACP, 0, unicodestr, -1, 0, 0, 0, 0);
  ansistr.s = Space(lenA)
  If (lenA > 0)
    WideCharToMultiByte_(#CP_ACP, 0, unicodestr, -1, @ansistr, lenA, 0, 0);
  EndIf
  ProcedureReturn ansistr
EndProcedure
 
Procedure.l Ansi2Uni(ansistr.s)
  lenA.l = Len(ansistr)
  lenW = MultiByteToWideChar_(#CP_ACP, 0, ansistr, lenA, 0, 0)
  If (lenW > 0) ; Check whether conversion was successful
    unicodestr = SysAllocStringLen_(0, lenW)
    MultiByteToWideChar_(CP_ACP, 0, ansistr, lenA, unicodestr, lenW)
    result = unicodestr
    SysFreeString_(unicodestr)
    ProcedureReturn result
  Else
    ProcedureReturn 0
  EndIf
EndProcedure
 
 
Global oXML.myIXMLDOMDocument
Global oXSL.myIXMLDOMDocument
 
Global XML_file.VARIANT
Global XSL_file.VARIANT
Global VBool1.VARIANT
Global VBool2.VARIANT
 
XML_file\vt = #VT_BSTR
XML_file\bstrVal = SysAllocString_(Ansi2Uni("thread2758155.html"))
 
XSL_file\vt = #VT_BSTR
XSL_file\bstrVal = SysAllocString_(Ansi2Uni("https://www.cyberforum.ru/pure-basic/thread2758155.html"))
 
VBool1\vt = #VT_BOOL
VBool2\vt = #VT_BOOL
 
;- Start of program
CoInitialize_(0)
 
If CoCreateInstance_(?CLSID_XMLDOM,0,1,?IID_IXMLDOMDocument,@oXML)<>#S_OK
 
oXML\load(XSL_file,VBool2)
 
oXML\save(XML_file)
 
oXML\Release()
EndIf
CoUninitialize_()
 
;- Datasection
DataSection
CLSID_XMLDOM:      ;{2933BF90-7B36-11D2-B20E-00C04F983E60}
Data.l $2933BF90
Data.w $7B36,$11D2
Data.b $B2,$0E,$00,$C0,$4F,$98,$3E,$60
EndDataSection
 
DataSection
IID_IXMLDOMDocument:      ;{2933BF81-7B36-11D2-B20E-00C04F983E60}
Data.l $2933BF81
Data.w $7B36,$11D2
Data.b $B2,$0E,$00,$C0,$4F,$98,$3E,$60
EndDataSection

Новые блоги и статьи Все статьи Все блоги /
Новый ноутбук volvo 07.12.2025 Всем привет. По скидке в "черную пятницу" взял себе новый ноутбук Lenovo ThinkBook 16 G7 на Амазоне: Ryzen 5 7533HS 64 Gb DDR5 1Tb NVMe 16" Full HD Display Win11 Pro	Музыка, написанная Искусственным Интеллектом volvo 04.12.2025 Всем привет. Некоторое время назад меня заинтересовало, что уже умеет ИИ в плане написания музыки для песен, и, собственно, исполнения этих самых песен. Стихов у нас много, уже вышли 4 книги, еще 3. . .	От async/await к виртуальным потокам в Python IndentationError 23.11.2025 Армин Ронахер поставил под сомнение async/ await. Создатель Flask заявляет: цветные функции - провал, виртуальные потоки - решение. Не threading-динозавры, а новое поколение лёгких потоков. Откат?. . .	Поиск "дружественных имён" СОМ портов Argus19 22.11.2025 Поиск "дружественных имён" СОМ портов На странице: https:/ / norseev. ru/ 2018/ 01/ 04/ comportlist_windows/ нашёл схожую тему. Там приведён код на С++, который показывает только имена СОМ портов, типа,. . .	Сколько Государство потратило денег на меня, обеспечивая инсулином. Programma_Boinc 20.11.2025 Сколько Государство потратило денег на меня, обеспечивая инсулином. Вот решила сделать интересный приблизительный подсчет, сколько государство потратило на меня денег на покупку инсулинов. . . .
Ломающие изменения в C#.NStar Alpha Etyuhibosecyu 20.11.2025 Уже можно не только тестировать, но и пользоваться C#. NStar - писать оконные приложения, содержащие надписи, кнопки, текстовые поля и даже изображения, например, моя игра "Три в ряд" написана на этом. . .	Мысли в слух kumehtar 18.11.2025 Кстати, совсем недавно имел разговор на тему медитаций с людьми. И обнаружил, что они вообще не понимают что такое медитация и зачем она нужна. Самые базовые вещи. Для них это - когда просто люди. . .	Создание Single Page Application на фреймах krapotkin 16.11.2025 Статья исключительно для начинающих. Подходы оригинальностью не блещут. В век Веб все очень привыкли к дизайну Single-Page-Application . Быстренько разберем подход "на фреймах". Мы делаем одну. . .	Фото: Daniel Greenwood kumehtar 13.11.2025	Расскажи мне о Мире, бродяга kumehtar 12.11.2025 — Расскажи мне о Мире, бродяга, Ты же видел моря и метели. Как сменялись короны и стяги, Как эпохи стрелою летели. - Этот мир — это крылья и горы, Снег и пламя, любовь и тревоги, И бескрайние. . .

@Pro_grammer 6807 / 2839 / 527 Регистрация: 24.04.2011 Сообщений: 5,308 Записей в блоге: 10
	22.12.2020, 11:06
	А встроенная XML библиотека и простая загрузка из неё :LoadXML(#XML, FileName$)не подойдет? 0

@MORFEY1338 0 / 0 / 0 Регистрация: 07.06.2018 Сообщений: 17
	22.12.2020, 11:15 [ТС]
	Ну мне нужно по http подгружать, во встроенном вроде нет такой возможности 0

@MORFEY1338 0 / 0 / 0 Регистрация: 07.06.2018 Сообщений: 17
	22.12.2020, 14:50 [ТС]
	Вообще я хотел узнать как передавать правильно параметры в COM и где вообще можно посмотреть информацию об объекте если я буду использовать какой то другой где можно узнать инфу о передаваемых ему параметрах, я смотрел похожее на C++ но вроде там есть различия, к примеру в VBS в том же Load всего 1 параметр а тут их почему-то два 0