ReSQL.ru
     
powered by simpleCommunicator - 2.0.61     © 2026 Programmizd 02
Мобильная версия    Контакт    Правила    FAQ    Помощь
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Доб. в избранное | Игнор. тему | Прикреп. тему | Пометить прочит. / непрочит. | Фильтр
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Ошибка
11 сообщений из 11, страница 1 из 1
Ошибка
    #34338206
Arthur26
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Arthur26
Участник
У меня аксесовская база, написал программу, ввожу последовательно данные через форму, но вдруг, при очередном вводе, выдает ошибку (приложенный файл).
Спасибо.
...
Рейтинг: 0 / 0
17.02.2007, 12:49
| Ответить | Цитировать | Написать  
Ошибка
    #34341782
Дурак
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Дурак
Участник
Это в акссесовский форум.
...
Рейтинг: 0 / 0
19.02.2007, 17:04
| Ответить | Цитировать | Написать  
Ошибка
    #34342378
Charles Weyland
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Charles Weyland
Участник
Дык ты покажи, чё там за прогу вводишь! не скупись!!!
Вот у меня к тебе вопрос: я тут программу написал, запускаю, а она выдаёт: деление на ноль, не поможешь, где тут у меня ошибка???
...
Рейтинг: 0 / 0
19.02.2007, 20:38
| Ответить | Цитировать | Написать  
Ошибка
    #34342875
Melkiades
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Melkiades
Участник
Charles WeylandДык ты покажи, чё там за прогу вводишь! не скупись!!!
Вот у меня к тебе вопрос: я тут программу написал, запускаю, а она выдаёт: деление на ноль, не поможешь, где тут у меня ошибка???
В строке 17, естественно, где же еще.
...
Рейтинг: 0 / 0
20.02.2007, 09:49
| Ответить | Цитировать | Написать  
Ошибка
    #34343139
Фотография orunbek
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
orunbek
Участник
Melkiades Charles WeylandДык ты покажи, чё там за прогу вводишь! не скупись!!!
Вот у меня к тебе вопрос: я тут программу написал, запускаю, а она выдаёт: деление на ноль, не поможешь, где тут у меня ошибка???
В строке 17, естественно, где же еще.
Нет ;-) Это из-за того что Access уже не может больше открывать таблицы ;)
...
Рейтинг: 0 / 0
20.02.2007, 11:02
| Ответить | Цитировать | Написать  
Ошибка
    #34343567
Arthur26
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Arthur26
Участник
orunbek, т.е. есть ограничение на количество открытия/закрытия таблиц в Accesse?
А тогда какое есть решение?
В программе открываю несколько раз разные дочерние окна и при этом, естейственно, каждый раз выполнется запрос к базе данных и отображение в Gride.
...
Рейтинг: 0 / 0
20.02.2007, 12:48
| Ответить | Цитировать | Написать  
Ошибка
    #34343633
Фотография orunbek
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
orunbek
Участник
Я просто перевел то что было в картинке.
Скорее всего из-за этого ;)
Лучше поподробнее расскажите о своей проблеме, как уже говорил Charles Weyland
Может есть другие пути решения этой задачи
Код свой приведите
...
Рейтинг: 0 / 0
20.02.2007, 13:08
| Ответить | Цитировать | Написать  
Ошибка
    #34343708
Фотография Konst_One
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Konst_One
Участник
что-то там в реестре было для акцесса про MaxOpenfiles
...
Рейтинг: 0 / 0
20.02.2007, 13:25
| Ответить | Цитировать | Написать  
Ошибка
    #34344321
Arthur26
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
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, 15:39
| Ответить | Цитировать | Написать  
Ошибка
    #34345003
Дурак
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Дурак
Участник
Попробуйте для начала, (раз вы уж каждый раз открываете и создаете рекордсет) закрывать его и убивать...
...
Рейтинг: 0 / 0
20.02.2007, 18:31
| Ответить | Цитировать | Написать  
Ошибка
    #34346122
vbapro
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
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
21.02.2007, 10:43
| Ответить | Цитировать | Написать  
11 сообщений из 11, страница 1 из 1
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Ошибка
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение   Полит. конфиден.  
NoSQL.ru       Кролег: Проекты, Новости, Чат       РЕД ФОРУМ       Фотоальбом: Участники, Встречи
Закрыть
start [/forum/topic.php?fid=60&fpage=245&tid=2164468]:
 0ms
get settings:
 9ms
get forum list:
 15ms
check forum access:
 2ms
check topic access:
 2ms
track hit:
 44ms
get topic data:
 11ms
get forum data:
 2ms
get page messages:
 50ms
get tp. blocked users:
 2ms
others: 214ms
total:  351ms
созд. / загр.: 351ms
x
x
Закрыть


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