CLASSIC ASP: ВСТАВКА ЗАПИСИ

Question

Сначала извиняюсь за мой бедный английский. Я пытаюсь вставить новую запись в таблице (tblComentarios)

Это код, я использую

conn.Provider = "Microsoft.Jet.OLEDB.4.0" 

conn.Open "C:\Users\VilaNova\Documents\aspirador\guestbook.mdb" 

sql = "INSERT INTO tblComentarios (nome,comentario) " 

sql = sql & "VALUES ('john', 'good job');" 

on error resume next 

conn.Execute sql, recaffected 

if error <> 0 then 

    response.write "No permissions!" 

else 

    response.write "added record!" 

end if 

Когда я выполнить код я не получаю никаких ошибок и я получаю сообщение «добавлен запись " Но, когда я открываю базу данных и вижу содержимое таблицы, нет запись со значениями« john »и« good job »

Спасибо за любую помощь.

Answer 1

Попробуйте заменить error с Err.Number:

If Err.Number <> 0 Then 

Я предполагаю, что у вас нет Option Explicit включен, так error неявно создается в качестве новой переменной с ее значением, установленным в Empty. Empty преобразуется в 0 для сравнения, поэтому ошибки не возникает.

(Кстати, если мое предположение верно, то вы действительно должны включать в себя Option Explicit в качестве первой строки каждого скрипта, который вы пишете, и получить в привычку явно объявить переменные с Dim.)