Visual Basic, .NET, ASP, VBScript
 

   
   
     

Форум - ASP и VBScript

Страница: 1 |

 

  Вопрос: Помогите! не работает строчка :rsAdd.Open "Spo... Добавлено: 18.02.04 17:23  

Автор вопроса:  Helen Chirkova

Всем привет!

Сайт ASP + VBSCript.

Разрабатываю элементарный опрос. Результаты должны помещаться в БД "Sport1" MS SQL 2000 SERVER.

файл Global.asa:

LANGUAGE=VBScript RUNAT=Server>

Sub Application_OnStart

Application.Lock

Conn.Open "Provider=SQLOLEDB.1;Persist Security Info=True;Password=itq;User ID=itq;Initial Catalog=OPROS;Data Source=Bab"

Application.Unlock

End Sub

Sub Application_OnEnd

Application.Lock

Conn.Close

Set Conn = Nothing

Application.Unlock

End Sub

Sub Session_OnStart

Session.Timeout = 30

End Sub

Результаты отправляются на страницу с кодом:

...

<>

...

Set rsAdd = Server.CreateObject("ADODB.Recordset")

rsAdd.Open "Sport1", Conn

rsAdd.AddNew

rsAdd.Fields("Q1") = Q1

rsAdd.Fields("Q2") = Q2

...

ВЫдает ошибку:

ADODB.Recordset error '800a0cb3'

Current Recordset does not support updating. This may be a limitation of the provider, or of the selected locktype.

Ответить

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

Номер ответа: 1
Автор ответа:
 Svetlana



ICQ: 262385618 

Вопросов: 43
Ответов: 205
 Профиль | | #1 Добавлено: 18.02.04 19:20

Похоже просто не разрешено изменения в базу вносить. Это ошибка была просто постоянной на лабораторных работах.

Попробуй перед открытием добавить:

rs.CursorType = adOpenDynamic

rs.LockType = adLockOptimistic
rs.open "Select... "

Ответить

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



Вопросов: 3
Ответов: 11
 Профиль | | #2 Добавлено: 19.02.04 10:04

Уже лучше, пишет, что не определено имя "adLockOptimistic"

' Microsoft VBScript runtime error '800a01f4'

Variable is undefined: 'adOpenDynamic'

 

Нашла в инете инфу о том, что нужно подключить константы, подключаю:

<%
METADATA NAME="Microsoft ActiveX Data Objects 2.5 Library" TYPE="TypeLib" UUID="{00000205-0000-0010-8000-00AA006D2EA4}"
%>

Опять ошибка:

Microsoft VBScript compilation error '800a0401'

Expected end of statement

/Include/Common.inc, line 2

METADATA NAME="Microsoft ActiveX Data Objects 2.5 Library" TYPE="TypeLib" UUID="{00000205-0000-0010-8000-00AA006D2EA4}"
Что это может быть за хрень?

Ответить

Номер ответа: 3
Автор ответа:
 Helen Chirkova



Вопросов: 3
Ответов: 11
 Профиль | | #3 Добавлено: 19.02.04 10:06

Уже лучше ... но, пишет, что неопределенное имя adLockOptimistic

Добавила строку:

<%
METADATA NAME="Microsoft ActiveX Data Objects 2.5 Library" TYPE="TypeLib" UUID="{00000205-0000-0010-8000-00AA006D2EA4}"
%>

Опять ошибка:

Microsoft VBScript compilation error '800a0401'

Expected end of statement

/Include/Common.inc, line 2

METADATA NAME="Microsoft ActiveX Data Objects 2.5 Library" TYPE="TypeLib" UUID="{00000205-0000-0010-8000-00AA006D2EA4}"

Ответить

Номер ответа: 4
Автор ответа:
 Helen Chirkova



Вопросов: 3
Ответов: 11
 Профиль | | #4 Добавлено: 19.02.04 10:07

Уже лучше ... но, пишет, что неопределенное имя adLockOptimistic

Добавила строку: <%
METADATA NAME="Microsoft ActiveX Data Objects 2.5 Library" TYPE="TypeLib" UUID="{00000205-0000-0010-8000-00AA006D2EA4}"%>

Опять ошибка: Microsoft VBScript compilation error '800a0401' Expected end of statement  METADATA NAME="Microsoft ActiveX Data Objects 2.5 Library" TYPE="TypeLib" UUID="{00000205-0000-0010-8000-00AA006D2EA4}"

Ответить

Номер ответа: 5
Автор ответа:
 Helen Chirkova



Вопросов: 3
Ответов: 11
 Профиль | | #5 Добавлено: 19.02.04 10:08

Добавила строку: <%METADATA NAME="Microsoft ActiveX Data Objects 2.5 Library" TYPE="TypeLib" UUID="{00000205-0000-0010-8000-00AA006D2EA4}"%>

Опять ошибка: Microsoft VBScript compilation error '800a0401' Expected end of statement  METADATA NAME="Microsoft ActiveX Data Objects 2.5 Library" TYPE="TypeLib" UUID="{00000205-0000-0010-8000-00AA006D2EA4}"

Ответить

Номер ответа: 6
Автор ответа:
 Helen Chirkova



Вопросов: 3
Ответов: 11
 Профиль | | #6 Добавлено: 19.02.04 10:09

Добавила строку: <%METADATA NAME="Microsoft ActiveX Data Objects 2.5 Library" TYPE="TypeLib" UUID="{00000205-0000-0010-8000-00AA006D2EA4}"%>

Опять ошибка: Microsoft VBScript compilation error '800a0401' Expected end of statement  .... указатель в ошибке ведет на  строку TYPE="TypeLib"

Что это может быть за хрень?

Ответить

Номер ответа: 7
Автор ответа:
 Helen Chirkova



Вопросов: 3
Ответов: 11
 Профиль | | #7 Добавлено: 19.02.04 10:11

Написала код, добавила подключение констант: <%
METADATA NAME="Microsoft ActiveX Data Objects 2.5 Library" TYPE="TypeLib" UUID="{00000205-0000-0010-8000-00AA006D2EA4}"
%> ... Все равно выдает ошибку, но уже новую:  Microsoft VBScript compilation error '800a0401' Expected end of statement ... 

Что это может быть за хрень? 

Ответить

Номер ответа: 8
Автор ответа:
 keg



Вопросов: 1
Ответов: 5
 Профиль | | #8 Добавлено: 27.02.04 16:24

Заметь, что строка заключена не в '<%.....%>'

Ответить

Номер ответа: 9
Автор ответа:
 Helen Chirkova



Вопросов: 3
Ответов: 11
 Профиль | | #9 Добавлено: 27.02.04 16:42
Спасибо, у меня уже все работает

Ответить

Номер ответа: 10
Автор ответа:
 keg



Вопросов: 1
Ответов: 5
 Профиль | | #10 Добавлено: 27.02.04 16:46

Ха, повырезали все нафиг.... цензоры...

Вместо <% поставь <!-- Meta.... -->

Ответить

Номер ответа: 11
Автор ответа:
 Helen Chirkova



Вопросов: 3
Ответов: 11
 Профиль | | #11 Добавлено: 27.02.04 17:01

Пасиб ... не знала, что нужно заключать в такие скобки

Ответить

Страница: 1 |

Поиск по форуму





© Copyright 2002-2011 VBNet.RU | Пишите нам