Script для того чтобы извлечь информацию от xml и двинуть архивы - Проблемы и решения вопросов, связанных с Network

TazEE,

Я увижу я могу сделать для помощи. Вы вывесили архив xml образца будете инвалидным архивом xml по мере того как они пропускают несколько заключительный бирок. Я имею судимое, котор нужно отрегулировать и работать с им. Под отрегулированный сценарий должен помочь вам вдоль вашей дороги. Я имею судимое для того чтобы положить некоторые комментарии внутри к голевой передаче.

Для вас немедленно вопросам больше чем одного графика, вас нужно закрепить петлеть до список узла который вы получаете. Право теперь вы только хватаете первое ое одно. Также, я предлагаю вы проверка, котор нужно сделать конечно его имеет удостоверение личности графика по мере того как ваш образец имел некоторые узлы ОБЪЯВЛЕНИЯ без удостоверения личности графика. Препятствуйте мне знать если вы имеете вопросы, то по мере того как вы работаете через сценарий.

Вместо писать вне к архиву я как раз держал все графические IDs в блоке шнура в памяти (strGraphicList)

- Медведь

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:

Тусклое fso, outfile, графическое, Elem
Тусклое strFromDir, strToDir, strGraphicList (), I
Установите fso = CreateObject («Scripting.FileSystemObject»)

'**** Установило ваше **** значений директории здесь
strFromDir = «C:\Original»
strToDir = «C:\New»
iий = 0

Установите xmlDoc = CreateObject («Msxml2.DOMDocument»)
xmlDoc.load («C:\test\test.XML ")

Установите ElemList = xmlDoc.getElementsByTagName («объявление»)

'ElemList.Length покажет вам сколько узлы ОБЪЯВЛЕНИЯ вы нашли
'msgbox ElemList.Length

'Петля через ваш список узла
Для каждого Elem в ElemList

	'Проверите для того чтобы увидеть если этот узел имеет названный атрибут Графиком
	Если не Elem.getAttribute («график») после этого
		'Сделайте конечно блок будет правым размером
		strGraphicList заповедника Redim (I)
		
		'Если так, задайте значение атрибутов к блоку
		strGraphicList (I) = Elem.getAttribute («график»)
		
		'Инкрементируйте счетчик
		iий = I + 1
	Закончитесь если
Затем


'Петля через блок
Для I = 0 к Ubound (strGraphicList) - 1
	'Сделайте конечно первоначально архив существует в источнике
	Если fso.FileExists, то (sstrFromDir & «\» & strGraphicList (I)) После этого
		'Нашл архив - для того чтобы скопировать к назначению
		strFromDir fso.CopyFile & «\» & strGraphicList (I), strToDir & «\»
	Закончитесь если
Затем
		
'Утвердите что все архивы выходят в назначение
Для I = 0 к Ubound (strGraphicList) - 1
	'Сделайте конечно первоначально архив существует в источнике
	Если НЕ fso.FileExists, то (strToDir & «\» & strGraphicList (I)) После этого
		'Счесно о
		не были ы msgbox «удостоверение личности графика» & strGraphicList (I) & «»
	Закончитесь если
Затем
		
«сделанное» msgbox

Вопрос : Script для того чтобы извлечь информацию от xml и двинуть архивы

Ответ : Script для того чтобы извлечь информацию от xml и двинуть архивы