|
|
Регистрация | << Правила форума >> | FAQ | Пользователи | Календарь | Поиск | Сообщения за сегодня | Все разделы прочитаны |
|
Опции темы | Поиск в этой теме | Опции просмотра |
#1
|
|||
|
|||
Не доступен Query на Web-сервисе
Всем привет!
Помогите решить мою проблему! вот рабочая часть моей программы: Код:
function TConvert.GiveNewOrders(Value: String): string; var XMLDoc: TXMLDocument; i: Integer; strarInsert: TArStr; begin { TODO : Implement method echoEnum } XMLDoc := TXMLDocument.Create(Application); XMLDoc.Active := True; //XMLDoc.XML.Text := Value; XMLDoc.LoadFromFile('d:\2.xml'); strarInsert := GetQueriesFromDataSetXML(XMLDoc); WebModule1.SQLConnection1.Connected := True; WebModule1.SQLQuery1.Close; WebModule1.SQLQuery1.SQL.Clear; WebModule1.SQLQuery1.SQL.Add(strarInsert.Strings[0]); WebModule1.SQLQuery1.Active := true; WebModule1.SQLQuery1.ExecSQL; Result := strarInsert.Strings[0]; WebModule1.SQLQuery1.Close; Функция GetQueriesFromDataSetXML(XMLDoc) возвращает набор Insert-ов. Здесь все работает. Но как только пытаюсь выполнить любое действие с SQLQuery - вылетает ошибка "Acsses Violation". При работе в обычном приложении (а не на Web-сервисе) все работает без заминки. В чем может быть загвоздка? Спасибо за внимание! Последний раз редактировалось Admin, 29.08.2011 в 18:30. |