ReSQL.ru
     
powered by simpleCommunicator - 2.0.61     © 2026 Programmizd 02
Мобильная версия    Контакт    Правила    FAQ    Помощь
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Доб. в избранное | Игнор. тему | Прикреп. тему | Пометить прочит. / непрочит. | Фильтр
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Вставка строк в таблицу на VBA
6 сообщений из 6, страница 1 из 1
Вставка строк в таблицу на VBA
    #32306811
Ingvarwolf
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Ingvarwolf
Участник
Для проверки надо вставить записи в таблицу. Вручную очень долго — чтобы нормально проверить надо что-то вроде 10000 строк вставить. Написал небольшую программку, которая вызывается по нажатию на кнопку в форме. Использую в ней код вроде
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
For i =  0  To nRowCount
        strMasterCode = CStr(Chr(Rnd *  26  +  65 ) & Chr(Rnd *  26  +  65 ) & Chr(Rnd *  26  +  65 ))
        strMasterName = strMasterCode &  "_Master_Name" 
        
        strSql =  "insert into tblMasters(code, name) "  _
                &  "values("  & strMasterCode &  ", "  & strMasterName &  ")" 
        DoCmd.RunSQL (strSql)
    Next
но во-первых Access выдает мне запрос при попытке вставить каждую строку и надо нажимать каждый раз на ОК, а во-вторых, еще вылетает ошибка, что строку вставить как раз таки и не получается... Я с VBA не сильно знаком, подскажите пожалуйста.
...
Рейтинг: 0 / 0
27.10.2003, 22:08
| Ответить | Цитировать | Написать  
Вставка строк в таблицу на VBA
    #32306817
Фотография Vsevolod V
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Vsevolod V
Участник
Ну во-первых нужно разобраться почему не вставляется строка. Видимо дело в том, что ты забыл заполнить ключевое поле.

Во-вторых. Чтобы не спрашивало про добавление можно: либо тупо отключить "предупреждения" :). Либо использовать RecordSet (см. F1)
...
Рейтинг: 0 / 0
27.10.2003, 22:56
| Ответить | Цитировать | Написать  
Вставка строк в таблицу на VBA
    #32306820
Фотография Geo
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Geo
Участник
2Всеволод
В очередной раз поздравляю вас соврамши.

2Ingvarwolf
Для начала надо добавить двойные кавычки:

strSql = "insert into tblMasters(code, name) " _
& "values(""" & strMasterCode & """, """ & strMasterName & """)"
...
Рейтинг: 0 / 0
27.10.2003, 23:14
| Ответить | Цитировать | Написать  
Вставка строк в таблицу на VBA
    #32306829
Фотография Vsevolod V
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Vsevolod V
Участник
Geo
Честно говоря, на код я даже не смотрел :)

""" & strMasterName & """
а почему не ' " & strMasterName & " ' ???
...
Рейтинг: 0 / 0
28.10.2003, 00:03
| Ответить | Цитировать | Написать  
Вставка строк в таблицу на VBA
    #32306942
Фотография Лох Позорный
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Лох Позорный
Участник
фак номер раз \r
фак номер два
...
Рейтинг: 0 / 0
28.10.2003, 09:10
| Ответить | Цитировать | Написать  
Вставка строк в таблицу на VBA
    #32307028
Ingvarwolf
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Ingvarwolf
Участник
Спасибо, пацаны, выручили. С этим я разобрался. Но, поскольку, моя работа с Access не закончилась, то ждите еще топиков... Если только я раньше не прочитаю какую-нибудь книгу. :D
...
Рейтинг: 0 / 0
28.10.2003, 10:09
| Ответить | Цитировать | Написать  
6 сообщений из 6, страница 1 из 1
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Вставка строк в таблицу на VBA
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение   Полит. конфиден.  
NoSQL.ru       Кролег: Проекты, Новости, Чат       РЕД ФОРУМ       Фотоальбом: Участники, Встречи
Закрыть
start [/forum/topic.php?fid=45&fpage=1730&tid=1678625]:
 0ms
get settings:
 7ms
get forum list:
 14ms
check forum access:
 3ms
check topic access:
 3ms
track hit:
 33ms
get topic data:
 8ms
get forum data:
 2ms
get page messages:
 34ms
get tp. blocked users:
 1ms
others: 208ms
total:  313ms
созд. / загр.: 313ms
x
x
Закрыть


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