错误代码如下．请帮我改正．．
<% Option Explicit %>
<%
if request.form("biaoti") <> "" and request.form("text") <> "" then
dim db
set db=Server.CreateObject("ADODB.Connection")
db.Open "link_new"
Dim strSql,sqla,sqlb, var_headline, var_text, var_time
var_headline=request.form("biaoti")
var_text=request.form("text")
var_time=request.form("time")
sqla="Insert Into news(headline,text"
sqlb=" values('" & var_headline & "','" & var_text &"' ,'" & var_time &"'"
if var_time<>"" then
sqla=sqla & ",time"
sqlb=sqlb & ",'" & var_time & "'"
end if
strSql=sqla & ")" & sqlb & ")"
db.Execute(strSql)
response.redirect "index_edit.htm"
else
response.write "请将所有信息填写完整，"
response.write "<a href='add_form.asp'>重新添加</a>"
end if
%>

提示什么错误？

还有个问题请帮我改正．用delete删除记录．
错误类型：
Microsoft OLE DB Provider for ODBC Drivers (0x80004005)
[Microsoft][ODBC Microsoft Access Driver] 无法从指定的数据表中删除。
/ncgc/Web_Edit/delete.asp, 第 10 行

错误代码好下：
<% Option Explicit %>
<%
Response.buffer=true
dim db
set db=Server.CreateObject("ADODB.Connection")
db.Open "link_dongtai"
Dim strSql,var_id
var_id=request.QueryString("id")
strSql="Delete from dongtai where id=" & var_id
db.execute(strSql)
request.redirect "udit_dt.asp"

%>

第一条代码提示：
错误类型：
Microsoft OLE DB Provider for ODBC Drivers (0x80040E14)
[Microsoft][ODBC Microsoft Access Driver] INSERT INTO 语句的语法错误。
/ncgc/Web_Edit/add.asp, 第 18 行

按上面这样改了一下还是不行,不知道对数据库要不要怎么进行设置??????

如果是2000的NT系统，把数据库的属性改成Everyone都可以操作，具体的到论坛找

我用的是XP系统.

显示数据是正常的?但是在删除和添加数据时会出错?