[Microsoft][ODBC Microsoft Access Driver] 操作必须使用一个可更新的查询。
MicrosoftOLEDBProviderforODBCDrivers错误'80004005'[Microsoft][ODBCMicrosoftAccessDriver...
Microsoft OLE DB Provider for ODBC Drivers 错误 '80004005'
[Microsoft][ODBC Microsoft Access Driver] 操作必须使用一个可更新的查询。
/down/hnjavasoftdown.asp,行 5
<!--#include file="conn.asp"-->
<%
set rs=server.createobject("adodb.recordset")
sql="update down set xzcs=xzcs+1 where id="&request("id")
rs.open sql,conn,1,3
links=trim(request("link"))
set rs1=server.createobject("adodb.recordset")
sql1="select * from down where id="&request("id")
rs1.open sql1,conn,1,3
if links=1 then
link=rs1("link1")
end if
if links=2 then
link=rs1("link2")
end if
if links=3 then
link=rs1("link3")
end if
From_url = Cstr(Request.ServerVariables("HTTP_REFERER"))
Serv_url = Cstr(Request.ServerVariables("SERVER_NAME"))
if mid(From_url,8,len(Serv_url)) <> Serv_url then
response.Write("<meta http-equiv='Refresh' content='3; url=http://www.hnjava.com/down'>")
response.Write("<table width=""760"" height=""160"" border=""0"" cellpadding=""0"" cellspacing=""0"">")
response.Write("<tr><td style=""font-size:10pt"" width=""760"" height=""16""><div align=""center"">")
response.Write("3秒后将自动跳转,如不能跳转!请点击<a href='http://www.hnjava.com/down'><font style=""font-size:10pt;TEXT-DECORATION:none;color:#ff6600"">[进入]</font></a>")
response.Write("</div></td></tr></table>")
response.end()
end if
response.Redirect(link)
%>
这是什么情况啊 数据库是 access ,文件是用FTP上传到虚拟空间的,是网页的下载功能,以前可以用,现在不行了。在网上也看了相关问题,我在本地修改过权限,然后上传到虚拟空间,但还是不能实现下载功能。请个位大侠帮帮忙吧,小弟在这谢过了! 展开
[Microsoft][ODBC Microsoft Access Driver] 操作必须使用一个可更新的查询。
/down/hnjavasoftdown.asp,行 5
<!--#include file="conn.asp"-->
<%
set rs=server.createobject("adodb.recordset")
sql="update down set xzcs=xzcs+1 where id="&request("id")
rs.open sql,conn,1,3
links=trim(request("link"))
set rs1=server.createobject("adodb.recordset")
sql1="select * from down where id="&request("id")
rs1.open sql1,conn,1,3
if links=1 then
link=rs1("link1")
end if
if links=2 then
link=rs1("link2")
end if
if links=3 then
link=rs1("link3")
end if
From_url = Cstr(Request.ServerVariables("HTTP_REFERER"))
Serv_url = Cstr(Request.ServerVariables("SERVER_NAME"))
if mid(From_url,8,len(Serv_url)) <> Serv_url then
response.Write("<meta http-equiv='Refresh' content='3; url=http://www.hnjava.com/down'>")
response.Write("<table width=""760"" height=""160"" border=""0"" cellpadding=""0"" cellspacing=""0"">")
response.Write("<tr><td style=""font-size:10pt"" width=""760"" height=""16""><div align=""center"">")
response.Write("3秒后将自动跳转,如不能跳转!请点击<a href='http://www.hnjava.com/down'><font style=""font-size:10pt;TEXT-DECORATION:none;color:#ff6600"">[进入]</font></a>")
response.Write("</div></td></tr></table>")
response.end()
end if
response.Redirect(link)
%>
这是什么情况啊 数据库是 access ,文件是用FTP上传到虚拟空间的,是网页的下载功能,以前可以用,现在不行了。在网上也看了相关问题,我在本地修改过权限,然后上传到虚拟空间,但还是不能实现下载功能。请个位大侠帮帮忙吧,小弟在这谢过了! 展开
1个回答
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询