lion
1

XML->ADODB.Stream->ADODB.Recordset

05.04.2007, 20:25. Показов 2044. Ответов 1
Метки нет (Все метки)

Пытаюсь настроить XML->ADODB.Stream->ADODB.Recordset


Подаю ПРАВИЛЬНЫЙ XML на вход ниже приведенной функции а рекордсет получаю пустой(EOF = TRUE & BOF = TRUE). Подхватывается только структура полей, а сами записи исчезают.

(VBA)

Function XMLtoADOrecordset(xml As String) As ADODB.Recordset
' build an ADO recordset from an XML string
On Error Resume Next

Dim rs As New ADODB.Recordset
Dim st As New ADODB.Stream
'Dim st As Object

st.Open
st.WriteText xml
st.Position = 0
rs.Open st

If Err.Number <> 0 Then
MsgBox Err.Description
Exit Function
End If

Set XMLtoADOrecordset = rs
End Function



Какие будут предложения.....?
__________________
Помощь в написании контрольных, курсовых и дипломных работ здесь
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
05.04.2007, 20:25
Ответы с готовыми решениями:

Можно ли использовать ADODB.Recordset?
Ситуация вобщем то такая - повсеместная Есть обычные asp файлы, пишу на VBScript. Создаю...

Про Download на ADODB.Stream и размер файла
Я как-то задавал вопрос, но никто не ответил (может глупый вопрос?). но нимогу скачать файл таким...

Не вижу ошибку в коде. объект ADODB.Recordset
редактирую б д &lt;%@LANGUAGE='VBSCRIPT' CODEPAGE='1251'%&gt; &lt;!DOCTYPE HTML PUBLIC '-//W3C//DTD HTML...

При попытке создать объект ADODB.Recordset зависает IIS .
Web Сервер на базе Win2000/IIS Подключаюсь с ASP страницы через VBScript к ODBC источнику (Btrieve...

1
0 / 0 / 0
Регистрация: 03.03.2007
Сообщений: 140
07.04.2007, 15:59 2
Возможно, дело в 'правильности' XML.
Попробуй сохранить рекордсет как XML и посмотри на него - именно это в понятии Микрософт и будет правильный. Его и подавай для теста на свою функцию

Dim RS As Recordset
RS.Save 'qq.xml', adPersistXML
0
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
07.04.2007, 15:59

Проблема с подключением к Access: Error Type: ADODB.Recordset (0x800A0BB9)
Помогите. Подключаюсь к Access: Set Connection=Server.CreateObject('ADODB.Connection')...

Не работает ADODB.Stream: HTTP 500 - Internal server error Internet Explorer
Помогите не работает почему-то. Вот код взял у вас на форуме: function saveToFile(strFName,...

Странная проблема с delete: ADODB.Recordset (0x800A0E78) Operation is not allowed when the object is closed
есть код set outpostDB = Server.CreateObject('ADODB.Connection') outpostDB.Open &quot;ххх&quot; ...

Ошибка ADODB.Recordset error '800a0e78' The operation requested by the application is not allowed if the object is closed.
Podskazhite, pochemu u menya posle vipolneniya vseh zadaniy pri popitke vipolnit' sleduyushiy kod...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
2
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2021, vBulletin Solutions, Inc.