| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 827 人关注过本帖
标题:急!!!急!!!Microsoft JET Database Engine 错误 '80040e09'
取消只看楼主 加入收藏
hebei_lilei
Rank: 1
等 级:新手上路
帖 子:4
专家分:0
注 册:2010-4-21
结帖率:100%
收藏
已结贴  问题点数:20 回复次数:2 
急!!!急!!!Microsoft JET Database Engine 错误 '80040e09'
我在本地浏览的没有错误啊!我一上传了,就是不行了,提示是这样的

Microsoft JET Database Engine 错误 '80040e09'

不能更新。数据库或对象为只读。

/tp/Bm_do.asp,行 26

请教高手帮忙!谢谢了!

对了,我也用FTP工具,把权限改了,可写入!

页面代码是这样的,

<!-- #include file="Inc/Conn.asp" -->
<!-- #include file="Inc/Function.asp" -->
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.
<html xmlns="http://www.
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312" />
<title></title>
<link href="Style/Style.css" rel="stylesheet" type="text/css" />
</head>

<body>




<%
If Trim(Request.Form("ValidCode"))=Empty Or Trim(Session("))<>Trim(Request.Form("ValidCode")) Then
    Response.write("<script language='javascript'>alert('验证码错误!');history.back();</script>")
    Response.end()
End if


sql="Select * from Vote where id=null"
Set rs=Server.CreateObject("ADODB.Recordset")
rs.Open sql,conn,1,3
rs.Addnew
putallrs(rs)
rs.Update
rs.Close
Set rs=Nothing
%>
<!-- #include file="Top.asp" -->
<table width="1000" border="0" align="center" cellpadding="0" cellspacing="0" bgcolor="#FFFFFF">
  <tr>
    <td><table width="1000" border="0" cellspacing="0" cellpadding="0">
      <tr>
        <td height="5"></td>
      </tr>
    </table>
        <table width="1000" border="0" align="center" cellpadding="5" cellspacing="1" bgcolor="#ff0198" class="border_pink">
          <tbody>
            <tr>
              <td bgcolor="#feddf0" class="title">报名成功</td>
            </tr>
            <tr>
              <td height="300" align="center" valign="middle" bgcolor="#FFFFFF" style="line-height:30px;"><p>报名成功,我们会将您的报名审查结果发送到您的邮箱。<br />
                <br />
              您的信息将在审核后才能显示在投票列表中!</p>
              </td>
            </tr>
          </tbody>
      </table></td>
  </tr>
</table>

<!-- #include file="Bottom.asp" -->
</body>
</html>


[ 本帖最后由 hebei_lilei 于 2010-4-21 13:25 编辑 ]
搜索更多相关主题的帖子: JET Database Engine Microsoft 
2010-04-21 13:15
hebei_lilei
Rank: 1
等 级:新手上路
帖 子:4
专家分:0
注 册:2010-4-21
收藏
得分:0 
这个是conn.asp

<!-- #include file="sql.asp" -->
<%
   dim connstr,datapath,conn
   datapath="DataBase/Db.mdb"
   connstr="Provider=Microsoft.JET.OLEDB.4.0;Data Source=" & Server.mappath(datapath)
   Set conn=Server.CreateObject("ADODB.Connection")
   conn.open connstr


function geturl()
url=url&"http://"&request.ServerVariables("Server_NAME")&request.ServerVariables("SCRIPT_NAME")

if(len(trim(request.ServerVariables("QUERY_STRING")))>0) then
    url=url & "?" & request.ServerVariables("QUERY_STRING")
end if

geturl=url
end function

function getp(ps)
sql="Select count(id) from Vote where ps>"&ps
Set ts=conn.execute(sql)
getp=ts(0)+1
end function

%>
2010-04-21 14:43
hebei_lilei
Rank: 1
等 级:新手上路
帖 子:4
专家分:0
注 册:2010-4-21
收藏
得分:0 
这个路径应该不错吧
2010-04-21 15:04
快速回复:急!!!急!!!Microsoft JET Database Engine 错误 '80040e09'
数据加载中...
 
   



关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.034801 second(s), 8 queries.
Copyright©2004-2024, BCCN.NET, All Rights Reserved