asp+access 数据库连接有关问题 老报错

asp+access 数据库连接问题 老报错
dataPath="database/Test.accdb"

Set conn = Server.CreateObject("ADODB.Connection")

conn.Open "Provider=Microsoft.ACE.OLEDB.12.0; Data Source=" & Server.MapPath(dataPath)

id=1
conntent="测试数据"

sql="insert into newtable(ID,Content) values('"&id&"','"&conntent&"')"

conn.Execute(sql)

conn.close
set conn= nothing


页面错误
  Microsoft JScript 编译错误 错误 '800a03ec'

  缺少 ';'

  /index.asp，行 14

  Set conn = Server.CreateObject("ADODB.Connection")
  ----^

我access 是 2010 版本






[解决办法]

VBScript code

<%response.buffer=true '启用缓冲处理dim conn,dbdim connstrdb="database/test.mdb"'数据库链接路径connstr="DBQ="+server.mappath(""&db&"")+";DefaultDir=;DRIVER={Microsoft Access Driver (*.mdb)};"set conn=server.createobject("ADODB.CONNECTION")conn.open connstrIf Err Thenerr.ClearSet Conn = NothingResponse.Write "数据库连接出错，请检查数据库连接文件中的数据库参数设置。"Response.EndEnd If id=1conntent="测试数据"sql="insert into newtable(ID,Content) values('"&id&"','"&conntent&"')"conn.Execute(sql)%>