VBNet - Форум - ЛЮДИ! ПОМОГИТЕ! ПЛИИИЗ!

Вопрос: ЛЮДИ! ПОМОГИТЕ! ПЛИИИЗ! Добавлено: 31.05.04 14:56

Автор вопроса: Yeputons | ICQ: 278444762

В общем дело такое. Хочу сделать на сайте регистратуру. По идее пользователь должен добавлятся в базу данных. Пытаюсь это реализовать с помощию ADODB и - СТОП! Говорит:
ADODB.Recordset error '800a0cb3'
Object or provider is not capable of performing requested operation.
/regok.asp, line 43

что делать?

Кому надо могу код странички кинуть. Заранее спасибо.

Ответить

Ответы Всего ответов: 9

Номер ответа: 1 Автор ответа: User Unknown Вечный Юзер! ICQ: uu@jabber.cz Вопросов: 120 Ответов: 3302	Профиль \| \| #1	Добавлено: 31.05.04 14:59
	Сюда выложи код, каким ты открываешь базу и добавляешь пользователя... Ответить

Номер ответа: 2
Автор ответа:

Yeputons

ICQ: 278444762

Вопросов: 71
Ответов: 179

Профиль | | #2

Добавлено: 31.05.04 16:28

Базу данных открываю следующим образом:

Dim Conn, RS

Set Conn = Server.CreateObject("ADODB.Connection")
Set RS = Server.CreateObject("ADODB.Recordset")

Conn.Open "Provider=Microsoft.Jet.OLEDB.4.0ata Source=" & Server.MapPath("cookery.mdb")
RS.Open "Select * From Users", Conn

Пользователя добавляю следующим образом:

RS.AddNew 'Тут происходит ошибка
RS.Fields("UserCode").Value = RS.RecordCount
RS.Fields("UserLogin").Value = Request.QueryString.Item(1)
RS.Fields("UserPassword").Value = Request.QueryString.Item(2)
RS.Fields("UserName").Value = Request.QueryString.Item(4)
RS.Fields("UserDescription").Value = Request.QueryString.Item(5)
RS.Fields("UserICQ").Value = Request.QueryString.Item(6)
RS.Fields("UserEMail").Value = Request.QueryString.Item(7)
RS.Fields("UserWebSite").Value = Request.QueryString.Item(8)RS.Update

Ответить

Номер ответа: 3 Автор ответа: User Unknown Вечный Юзер! ICQ: uu@jabber.cz Вопросов: 120 Ответов: 3302	Профиль \| \| #3	Добавлено: 31.05.04 16:42
	Попробуй поставить поменьше версию драйвера... Ответить

Номер ответа: 4 Автор ответа: Yeputons ICQ: 278444762 Вопросов: 71 Ответов: 179	Профиль \| \| #4	Добавлено: 31.05.04 16:59
	Поставил. Все равно - ноль внимания. Ответить

Номер ответа: 5 Автор ответа: SERV_ERROR Вопросов: 2 Ответов: 10	Профиль \| \| #5	Добавлено: 02.07.04 03:19
	Мб стоит сначала заполнить поля, а потом уже вызывать метод RS.AddNew? Ответить

Номер ответа: 6 Автор ответа: Yeputons ICQ: 278444762 Вопросов: 71 Ответов: 179	Профиль \| \| #6	Добавлено: 12.07.04 16:41
	Вряд ли. Я-то это по книге обучения Access делал. Хотя кто знает? Приеду домой, попробую. Ответить

Номер ответа: 7 Автор ответа: Swift Вопросов: 5 Ответов: 43	Профиль \| \| #7	Добавлено: 12.07.04 20:52
	при открытии рекордсета нужно указать: 1. Тип курсора: adOpenDynamic (2) 2. Тип блокировки: adLockOptimistic (3) Причём желательно указывать числовые значения, а не имена констант. Ответить

Номер ответа: 8 Автор ответа: manj18 Вопросов: 5 Ответов: 6	Профиль \| \| #8	Добавлено: 07.10.04 00:36
	Dim Conn, RS Set Conn = Server.CreateObject("ADODB.Connection" Set RS = Server.CreateObject("ADODB.Recordset" Conn.Open "Provider=Microsoft.Jet.OLEDB.4.0ata Source=" & Server.MapPath("cookery.mdb" Conn.Execute"insert into Users UserCode,...,...,...) values ("&Request.QueryString.Item(1) &","&...&...) Надеюсь вы понимаете что находится за ... Ответить

Номер ответа: 9 Автор ответа: manj18 Вопросов: 5 Ответов: 6	Профиль \| \| #9	Добавлено: 07.10.04 00:37
	простите я ковычки в конце забыл Ответить

Страница: 1 |