Гость
Войти | Профиль | Очистить
Целевая тема:
Создать новую тему:
Автор:
Действия ...
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / run-tin error '13' type mismatch / 17 сообщений из 17, страница 1 из 1
13.07.2004, 22:17:52
    #32602772
zrumchik
zrumchik
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
run-tin error '13' type mismatch
Dim dbProfession As Database
Dim rstProd As Recordset

Set dbProfession = CurrentDb()
Set rstProd = dbProfession.OpenRecordset("WP", dbOpenTable)

Что за фигня? Какой тогда тип должен быть у rstProd?
Пробовал поменять на Recordsets тогда он не хочет выполнять rstProd.MoveFirst и т.п.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
13.07.2004, 22:50:22
    #32602789
Владимир Саныч
Владимир СанычПривилегированный пользователь
Модератор форума
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
run-tin error '13' type mismatch
http://www.sql.ru/faq/faq_topic.aspx?fid=213
вопрос 13.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
13.07.2004, 23:09:19
    #32602795
zrumchik
zrumchik
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
run-tin error '13' type mismatch
Спасибо, только теперь он выдаёт run-time error '91' Object variable or With block variable not set это с чего вдруг?
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
13.07.2004, 23:16:58
    #32602799
zrumchik
zrumchik
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
run-tin error '13' type mismatch
Запускаю debug он, подвожу мышу к rstProd появляется всплывающая подсказка rstProd=Nothing. Это из-за того, что ссылка на таблицу неправильная? В базе есть таблица с именем WP.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
13.07.2004, 23:45:20
    #32602805
Владимир Саныч
Владимир СанычПривилегированный пользователь
Модератор форума
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
run-tin error '13' type mismatch
zrumchikЗапускаю debug он, подвожу мышу к rstProd появляется всплывающая подсказка rstProd=Nothing.
На какой строке???
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
13.07.2004, 23:47:34
    #32602809
zrumchik
zrumchik
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
run-tin error '13' type mismatch
Владимир Саныч zrumchikЗапускаю debug он, подвожу мышу к rstProd появляется всплывающая подсказка rstProd=Nothing.
На какой строке???
Set rstProd = dbProfession.OpenRecordset("WP", dbOpenTable)

Всё на той же.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
13.07.2004, 23:48:58
    #32602810
Владимир Саныч
Владимир СанычПривилегированный пользователь
Модератор форума
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
run-tin error '13' type mismatch
До исполнения этой строки, естественно, Nothing.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
13.07.2004, 23:51:25
    #32602813
Владимир Саныч
Владимир СанычПривилегированный пользователь
Модератор форума
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
run-tin error '13' type mismatch
Кстати, Database тоже должно быть DAO.Database. Я сейчас подправил в факах.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
14.07.2004, 00:01:44
    #32602817
zrumchik
zrumchik
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
run-tin error '13' type mismatch
Владимир СанычКстати, Database тоже должно быть DAO.Database. Я сейчас подправил в факах.

Большое спасибо! Всё заработало. А как подсчитать количество полей в таблице?

rstProd.RecordCount считает количество записей, есть ли аналогичная штука для полей?
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
14.07.2004, 00:05:18
    #32602820
Владимир Саныч
Владимир СанычПривилегированный пользователь
Модератор форума
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
run-tin error '13' type mismatch
zrumchikА как подсчитать количество полей в таблице?
currentdb.tabledefs!имятаблицы.fields.count

zrumchikrstProd.RecordCount считает количество записей, есть ли аналогичная штука для полей?
Если нужно количество полей в рекордсете, а не в таблице, то:
rstProd.fields.count
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
14.07.2004, 00:17:50
    #32602823
zrumchik
zrumchik
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
run-tin error '13' type mismatch
А что нужно изменить в строке

Set rstProd = db.OpenRecordset("WP", dbOpenTable)

чтобы вместо таблицы открыть запрос?
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
14.07.2004, 00:23:33
    #32602825
Владимир Саныч
Владимир СанычПривилегированный пользователь
Модератор форума
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
run-tin error '13' type mismatch
dbOpenDynaset вместо dbOpenTable
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
14.07.2004, 00:38:37
    #32602831
zrumchik
zrumchik
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
run-tin error '13' type mismatch
Ещё раз спасибо. Ну и последний на сегоднюшнюю ночь вопрос. Саныч, пожалуйста напиши кусок кода, который бы создавал рабочую книгу Ексель, в ней рабочий лист и делал бы только что созданный рабочий лист активным.

Заранее благодарю.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
14.07.2004, 00:45:47
    #32602834
(c)VIG
(c)VIG
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
run-tin error '13' type mismatch
zrumchikЕщё раз спасибо. Ну и последний на сегоднюшнюю ночь вопрос. Саныч, пожалуйста напиши кусок кода, который бы создавал рабочую книгу Ексель, в ней рабочий лист и делал бы только что созданный рабочий лист активным.

Заранее благодарю.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
14.07.2004, 00:46:54
    #32602835
zrumchik
zrumchik
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
run-tin error '13' type mismatch
(c)VIG zrumchikЕщё раз спасибо. Ну и последний на сегоднюшнюю ночь вопрос. Саныч, пожалуйста напиши кусок кода, который бы создавал рабочую книгу Ексель, в ней рабочий лист и делал бы только что созданный рабочий лист активным.

Заранее благодарю.


Да я и так понимаю, что всех задолбал ;-)
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
14.07.2004, 09:29:52
    #32603014
Лифчик
Лифчик
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
run-tin error '13' type mismatch
Да, веселую видно ночку сегодня Саныч провел за кодингом До сих пор на форуме не появлялся
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
14.07.2004, 10:50:27
    #32603188
zrumchik
zrumchik
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
run-tin error '13' type mismatch
Так может кто-нибудь подскажет как сделать новый лист в книге?
Я правильно понимаю, что при выполнении CreateObject("Excel.Sheet") создатся новая книга с одним листом? Блин... чего-то я совсем запутался.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / run-tin error '13' type mismatch / 17 сообщений из 17, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение  
Полит. конфиден.  
созд. / загр.: 309ms
Закрыть
start [/forum/topic.php?fid=45&mobile=1&tid=1673224]:
 0ms
get settings:
 7ms
get forum list:
 15ms
check forum access:
 3ms
check topic access:
 3ms
track hit:
 31ms
get topic data:
 8ms
get forum data:
 2ms
get page messages:
 39ms
get tp. blocked users:
 1ms
others: 200ms
total:  309ms
x
x
Закрыть


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