Гость
Целевая тема:
Создать новую тему:
Автор:
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Ошибка / 11 сообщений из 11, страница 1 из 1
17.02.2007, 12:49
    #34338206
Arthur26
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Ошибка
У меня аксесовская база, написал программу, ввожу последовательно данные через форму, но вдруг, при очередном вводе, выдает ошибку (приложенный файл).
Спасибо.
...
Рейтинг: 0 / 0
19.02.2007, 17:04
    #34341782
Дурак
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Ошибка
Это в акссесовский форум.
...
Рейтинг: 0 / 0
19.02.2007, 20:38
    #34342378
Charles Weyland
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Ошибка
Дык ты покажи, чё там за прогу вводишь! не скупись!!!
Вот у меня к тебе вопрос: я тут программу написал, запускаю, а она выдаёт: деление на ноль, не поможешь, где тут у меня ошибка???
...
Рейтинг: 0 / 0
20.02.2007, 09:49
    #34342875
Melkiades
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Ошибка
Charles WeylandДык ты покажи, чё там за прогу вводишь! не скупись!!!
Вот у меня к тебе вопрос: я тут программу написал, запускаю, а она выдаёт: деление на ноль, не поможешь, где тут у меня ошибка???
В строке 17, естественно, где же еще.
...
Рейтинг: 0 / 0
20.02.2007, 11:02
    #34343139
orunbek
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Ошибка
Melkiades Charles WeylandДык ты покажи, чё там за прогу вводишь! не скупись!!!
Вот у меня к тебе вопрос: я тут программу написал, запускаю, а она выдаёт: деление на ноль, не поможешь, где тут у меня ошибка???
В строке 17, естественно, где же еще.
Нет ;-) Это из-за того что Access уже не может больше открывать таблицы ;)
...
Рейтинг: 0 / 0
20.02.2007, 12:48
    #34343567
Arthur26
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Ошибка
orunbek, т.е. есть ограничение на количество открытия/закрытия таблиц в Accesse?
А тогда какое есть решение?
В программе открываю несколько раз разные дочерние окна и при этом, естейственно, каждый раз выполнется запрос к базе данных и отображение в Gride.
...
Рейтинг: 0 / 0
20.02.2007, 13:08
    #34343633
orunbek
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Ошибка
Я просто перевел то что было в картинке.
Скорее всего из-за этого ;)
Лучше поподробнее расскажите о своей проблеме, как уже говорил Charles Weyland
Может есть другие пути решения этой задачи
Код свой приведите
...
Рейтинг: 0 / 0
20.02.2007, 13:25
    #34343708
Konst_One
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Ошибка
что-то там в реестре было для акцесса про MaxOpenfiles
...
Рейтинг: 0 / 0
20.02.2007, 15:39
    #34344321
Arthur26
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Ошибка
Описываю программу:
MDI программа, при каждом открытии дочернего окна (на форме data control и VSFlexGrid), с помощью запроса выполняется выборка данных из БД, и данные отображаются на VSFlexGrid (data связано с VSFlexGrid). Потом, когда выполняется команда New, открывается новая форма (там тоже data и прочие (TextBox, ComboBox, Buttons..)) и, для того чтобы добавить новую запись, опять, выборка из таблицы

Data1.RecordSource = "SELECT ... FROM ..." и
Data1.Refresh
Data1.Recordset.AddNew
Data1.Recordset.Fields(1) = Text1(0)...

и, так, при каждом очередном добавлении записи в таблицу БД.

Подскажите, может это неверный способ добавления записей в таблицу БД, т.к. каждый раз приходится выполнять вышеуказанные строки.
...
Рейтинг: 0 / 0
20.02.2007, 18:31
    #34345003
Дурак
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Ошибка
Попробуйте для начала, (раз вы уж каждый раз открываете и создаете рекордсет) закрывать его и убивать...
...
Рейтинг: 0 / 0
21.02.2007, 10:43
    #34346122
vbapro
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Ошибка
можно таким способом:
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
16.
17.
18.
19.
20.
21.
22.
23.
24.
Function test() As Long

Dim SQLSTR As String
Dim rs As ADODB.Recordset
Dim strTable1 As String
Dim strColumn1 As String
Dim strColumn2 As String
Dim strValue1 As String
Dim strValue2 As String

    strTable1 = "MainData"
    
    strColumn1 = "STDID"
    strColumn2 = "STDID1"
    
    strValue1 = "STDID"
    strValue2 = "STDID1"

Set rs = New ADODB.Recordset

    SQLSTR = "Insert Into " & strTable1 & "(" & strColumn1 & "," & strColumn2 & ") VALUES ('" & strValue1 & "','" & strValue2 & "')"
    rs.Open SQLSTR, CurrentProject.Connection, adOpenDynamic, adLockBatchOptimistic
    rs.Close
    
End Function
...
Рейтинг: 0 / 0
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Ошибка / 11 сообщений из 11, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


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