powered by simpleCommunicator - 2.0.61     © 2026 Programmizd 02
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Помогите со скоростью передачи данных - eVB
5 сообщений из 5, страница 1 из 1
Помогите со скоростью передачи данных - eVB
    #33482778
SpySQL
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Народ, помогите разобраться со скоростью передачи данных!
Ситуация такая:
КПК: WinCE, SQL CE, eVB-проект, 5 табличек, в каждой копится примерно по 15-50 записей. Их отправляю через зуб-GPRS на сервер БД (Win2k3, SQL Server 2000, iis5) следующим образом:

Function SendRequest()
On Error Resume Next
' ******************************** Отправляем tmpRequest ********************************

Set objConnection = CreateObject("ADOCE.Connection.3.1")
Set objRec = CreateObject("ADOCE.Recordset.3.1")
objConnection.Open "Provider=Microsoft.SQLSERVER.OLEDB.CE.2.0;data source='\db\agent.sdf'"

objRec.Open "tmpRequest", objConnection, adOpenDynamic, adLockOptimistic, adCmdTableDirect

If (objRec.EOF) Then
objRec.Close
Set objRec = Nothing
objConnection.Close
Set objConnection = Nothing
Else
Set objRatesRDA = CreateObject("SSCE.RemoteDataAccess.2.0")
objRatesRDA.InternetURL = "http://***.***.***.***/agent/sscesa20.dll"
objRatesRDA.LocalConnectionString = "Data source = '\db\agent.sdf'"
objRec.MoveFirst

Do While Not objRec.EOF
objRatesRDA.SubmitSQL "INSERT INTO Request " & _
"(Store_id, district_id, quantity, quantity_repl, request_date, date_input, nomenclature_id) " & _
"VALUES ('" & objRec(1).Value & "','" & objRec(2).Value & "','" & objRec(3).Value & _
"','" & objRec(4).Value & "','" & objRec(6).Value & "','" & objRec(7).Value & _
"','" & objRec(5).Value & "')", "Provider=sqloledb;Data Source=***.***.***.***;initial catalog=ag;User ID=ag;password=aGeNt;"
objRec.Delete
objRec.MoveFirst
Loop

objRec.Close
Set objRec = Nothing
objConnection.Close
Set objConnection = Nothing
Set objRatesRDA = Nothing

End If

End Function

и т.д. - еще 4 таблицы таким же методом



Процесс длится дико долго.
Изначально - пробовал методы pull/push, но, учитывая, что клиентов порядка 25, таблицы серверной части быстро раздуваются - побоялся, что тоже процесс будет не быстрым, решил выбрать метод, приведенный выше.

Как все-таки сделать процесс передачи данных быстрым? Вернуться на pull/push и постоянно чистить серверные таблицы?
...
Рейтинг: 0 / 0
Помогите со скоростью передачи данных - eVB
    #33497108
SpySQL
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
UP
...
Рейтинг: 0 / 0
Помогите со скоростью передачи данных - eVB
    #33497130
Melkiades
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Что есть tmpRequest?
...
Рейтинг: 0 / 0
Помогите со скоростью передачи данных - eVB
    #33508787
SpySQL
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Это локальная табличка с данными, которые надо слить на сервер БД.
...
Рейтинг: 0 / 0
Помогите со скоростью передачи данных - eVB
    #33532494
SpySQL
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
UP
...
Рейтинг: 0 / 0
5 сообщений из 5, страница 1 из 1
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Помогите со скоростью передачи данных - eVB
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


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