powered by simpleCommunicator - 2.0.51     © 2025 Programmizd 02
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Экспорт в xml по шаблону 2
8 сообщений из 8, страница 1 из 1
Экспорт в xml по шаблону 2
    #39776894
Jumakhon
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Привет всем программистам!
Как экспорт из Access в xml с кодами vba? Пожалуйста помогите!!!

вот такая схема
<?xml version="1.0"?>
-<batch>
<id>0001</id>
<created_date>31-01-2019</created_date>
<foreigner/>
-<legal>
-<record>
<ein>0110024393</ein>
<INN>010100355</INN>
<short_entity_name>ЧДММ "МАРКАЗИ САЛОМАТИИ САЛВА"</short_entity_name>
-<legal_address>
<ein>0110024393</ein>
<sOther/>
<country>Республика Таджикистан </country>
</legal_address>
-<director>
<dir_inn>015734312</dir_inn>
<dir_Name>Файзулло Куканиев Нуралиевич</dir_Name>
<dir_Mobile>907-18-50-00</dir_Mobile>
<dir_Email/>
</director>
</record>
</legal>
</batch>

Пожалуйста я первые на таких проблем встречаю, жду ваш поддержки
...
Рейтинг: 0 / 0
Экспорт в xml по шаблону 2
    #39776929
Фотография Панург
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Jumakhon, и что дальше? откуда экспортировать? Источник то дай, посмотреть структуру.
Код: xml
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
16.
17.
18.
19.
20.
21.
22.
23.
24.
<?xml version="1.0"?>
<batch>
	<id>0001</id>
	<created_date>31-01-2019</created_date>
	<foreigner/>
	<legal>
		<record>
			<ein>0110024393</ein>
			<INN>010100355</INN>
			<short_entity_name>ЧДММ "МАРКАЗИ САЛОМАТИИ САЛВА"</short_entity_name>
			<legal_address>
				<ein>0110024393</ein>
				<sOther/>
				<country>Республика Таджикистан </country>
			</legal_address>
			<director>
				<dir_inn>015734312</dir_inn>
				<dir_Name>Файзулло Куканиев Нуралиевич</dir_Name>
				<dir_Mobile>907-18-50-00</dir_Mobile>
				<dir_Email/>
			</director>
		</record>
	</legal>
</batch>

...
Рейтинг: 0 / 0
Экспорт в xml по шаблону 2
    #39776993
DarkMan
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
ПанургJumakhon, и что дальше? откуда экспортировать? Источник то дай, посмотреть структуру.
Код: xml
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
16.
17.
18.
19.
20.
21.
22.
23.
24.
<?xml version="1.0"?>
<batch>
	<id>0001</id>
	<created_date>31-01-2019</created_date>
	<foreigner/>
	<legal>
		<record>
			<ein>0110024393</ein>
			<INN>010100355</INN>
			<short_entity_name>ЧДММ "МАРКАЗИ САЛОМАТИИ САЛВА"</short_entity_name>
			<legal_address>
				<ein>0110024393</ein>
				<sOther/>
				<country>Республика Таджикистан </country>
			</legal_address>
			<director>
				<dir_inn>015734312</dir_inn>
				<dir_Name>Файзулло Куканиев Нуралиевич</dir_Name>
				<dir_Mobile>907-18-50-00</dir_Mobile>
				<dir_Email/>
			</director>
		</record>
	</legal>
</batch>



Если человек не коверкает язык спецом , а действительно иностранец, то если я правильно понял , ему нужно экспортировать определенные данные из базы Access в файл XML . Судя по примеру , это таблица типа User с данными.
P.S Это только мои размышления в слух. :))
...
Рейтинг: 0 / 0
Экспорт в xml по шаблону 2
    #39777072
Фотография Панург
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
DarkManесли я правильно понял , ему нужно экспортировать определенные данные из базы Access в файл XML .Это я и так понял, ТС вполне определённо высказался.

DarkManЕсли человек не коверкает язык спецом
JumakhonРеспублика Таджикистан
...
Рейтинг: 0 / 0
Экспорт в xml по шаблону 2
    #39777073
Фотография Панург
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
DarkManСудя по примеру , это таблица типа User с данными.Это типа ЕГРЮЛ, скорее всего.
...
Рейтинг: 0 / 0
Экспорт в xml по шаблону 2
    #39777472
Фотография court
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
JumakhonКак экспорт из Access в xml с кодами vba?Создаешь у себя в БД такую структуру.



Заполняешь её.
И дальше, или "с кодами vba" :
Код: vbnet
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
16.
17.
18.
19.
20.
21.
22.
Sub test()
    Dim objAD1 As AdditionalData
    Dim objAD2 As AdditionalData
    Dim objAD3 As AdditionalData
    Dim TempFile As String, ResultFile As String, TransformFile As String
    
    TempFile = CurrentProject.Path & "\xz.xml"
    ResultFile = CurrentProject.Path & "\Result.xml"
    TransformFile = CurrentProject.Path & "\xz.xsl"
    
    Set objAD1 = Application.CreateAdditionalData
    Set objAD2 = objAD1.Add("legal")
    Set objAD3 = objAD2.Add("record")
    objAD3.Add "legal_address"
    objAD3.Add "director"
    '
    Application.ExportXML ObjectType:=acExportTable, DataSource:="batch", _
        DataTarget:=TempFile, _
        AdditionalData:=objAD1
        
    Application.TransformXML TempFile, TransformFile, ResultFile
End Sub



Или просто : выбрать в окне БД таб.batch, и дальше Файл - Экспорт - XML - Дополнительно - в "данные для экспорта" выбрать все таблицы - Преобразования... - выбрать файл xz.xsl - OK - OK

Файл трансформации xz.xsl во вложении
...
Рейтинг: 0 / 0
Экспорт в xml по шаблону 2
    #39777679
Фотография Панург
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
court
Код: vbnet
1.
Application.CreateAdditionalData

court
Код: vbnet
1.
Application.ExportXML

court
Код: vbnet
1.
Application.TransformXML

А я что-то и не обратил внимание, всё по старинке DOMDocument мучаю, изредка...
Спасибо.
...
Рейтинг: 0 / 0
Период между сообщениями больше года.
Экспорт в xml по шаблону 2
    #39946483
Jumakhon
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Сапсибо вам ребятами! Решение этого задача найдена.
...
Рейтинг: 0 / 0
8 сообщений из 8, страница 1 из 1
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Экспорт в xml по шаблону 2
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


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