一般情況下asp可以正常運(yùn)行，但只要連接數(shù)據(jù)庫(kù)就提示：Microsoft JET Database Engine 錯(cuò)誤'80004005'

 

我的電腦因?yàn)橛门幚砬謇砦募?，所以不能運(yùn)行了：
1.查看數(shù)據(jù)庫(kù)連接語(yǔ)句沒(méi)有發(fā)現(xiàn)錯(cuò)誤；
2.查看文件夾的權(quán)限已經(jīng)全部給了everyone；
3.打開(kāi)數(shù)據(jù)庫(kù)的同時(shí)，系統(tǒng)會(huì)在臨時(shí)文件夾 %SystemRoot%/temp/ 下創(chuàng)建臨時(shí)文件，而 %SystemRoot%/temp/ 的權(quán)限不夠
解決：%SystemRoot%/temp/ 的權(quán)限加上(IUSER_電腦名的讀寫)

2、如果一般未指定的錯(cuò)誤，還有個(gè)辦法，其實(shí)只要很簡(jiǎn)單的幾步：
開(kāi)始。。。運(yùn)行。。。regsvr32 jscript.dll
開(kāi)始。。。運(yùn)行。。。regsvr32 vbscript.dll
開(kāi)始。。。運(yùn)行。。。iisreset


Microsoft JET Database Engine (0x80004005)未指定的錯(cuò)誤解決
1、系統(tǒng)可能沒(méi)有注冊(cè)msjetoledb40.dll，解決辦法是
點(diǎn) 開(kāi)始--->運(yùn)行， 輸入 regsvr32 msjetoledb40.dll， 回車即可；

2、數(shù)據(jù)庫(kù)所在文件夾權(quán)限
打開(kāi)辦法是：打開(kāi)我的電腦，然后點(diǎn)菜單上的“文件夾選項(xiàng)”--->查看，然后把“使用簡(jiǎn)單文件夾共享(推薦)”前面的鉤去掉，然后點(diǎn)“確認(rèn)”；接下來(lái)回到需要打開(kāi)權(quán)限的文件夾（數(shù)據(jù)庫(kù)存放的文件夾），右鍵---> 屬性--->安全,然后點(diǎn)“添加”--->"高級(jí)"--->立即查找--->然后在下面的地方選擇“everyone”--->確定--->點(diǎn)剛才加入的"everyone"，然后在下面的大框編輯everyone 權(quán)限為完全控制，保存即可。


3、需要打開(kāi)guest用戶
打開(kāi)方法:我的電腦--->控制面板--->管理工具---->計(jì)算機(jī)管理--->本地用戶和組---用戶---找到"guest"，雙擊，然后把彈出來(lái)的狂上的“帳戶已停用”前的鉤去掉，保存即可。


4、temp（臨時(shí)文件夾）權(quán)限
打開(kāi)辦法：windows--->temp，單擊右鍵選擇-屬性，你就會(huì)看到一個(gè)叫做“安全”的選項(xiàng)，添加一個(gè)everyone,權(quán)限設(shè)置為完全控制，再將你正在使用windows的用戶也設(shè)置為完全控制（文件夾權(quán)限）；

打開(kāi)辦法是：打開(kāi)我的電腦，然后點(diǎn)菜單上的“文件夾選項(xiàng)”--->查看，然后把“使用簡(jiǎn)單文件夾共享(推薦)”前面的鉤去掉，然后點(diǎn)“確認(rèn)”；接下來(lái)回到需要打開(kāi)權(quán)限的文件夾（數(shù)據(jù)庫(kù)存放的文件夾），右鍵---> 屬性--->安全,然后點(diǎn)“添加”--->"高級(jí)"--->立即查找--->然后在下面的地方選擇“everyone”--->確定--->點(diǎn)剛才加入的"everyone"，然后在下面的大框編輯everyone權(quán)限為完全控制，保存即可。


本人要用ASP批量導(dǎo)入excel數(shù)據(jù)到sql數(shù)據(jù)庫(kù)去，借用了zhanghongwen(流氓蚊子) 的代碼，如下

：
...
...
...
<%
server.scripttimeout=100000000
sub dataIntoSqlServer_ceritificate(strFileName,strSheetName,myConn)
'定義
dim myConnection
dim strName
dim rsXsl,rsSql
dim str_Xsl,str_Sql
dim myConn_Xsl
dim cmd
dim i,j
dim maxId

strName=strFileName
set myConnection=server.createobject("adodb.connection")
set rsXsl=Server.Createobject("ADODB.Recordset")
set rsSql=Server.CreateObject("ADODB.Recordset")
set cmd=Server.CreateObject("ADODB.Command")
cmd.ActiveConnection=myConn



myConn_Xsl="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & strName

& ";Extended Properties=Excel 8.0"


'打開(kāi)連接
myConnection.open myConn_Xsl

'打開(kāi)表
str_Xsl="select * from ["& strSheetName &"$]"
rsXsl.open str_Xsl,myConnection,1,1
j=1
Do While not rsXsl.eof
'取出最大值
str_Sql="select Max(id) as maxId from fubiao"
rsSql.open str_Sql,myConn,1,3
If Not rsSql.Eof Then
If not isNull(rsSql("maxId")) Then
maxId=Clng(rsSql("maxId"))+1
Else
maxId=1
End if
else
maxId=1
End if
rsSql.close'//關(guān)閉對(duì)象
'加入數(shù)據(jù)庫(kù)
str_Sql="insert into fubiao values("&maxId&",'"&rsXsl(1)&"','"&rsXsl(3)

&"','"&rsXsl(4)&"','"&rsXsl(5)&"','"&rsXsl(6)&"','"&rsXsl(7)&"','"&rsXsl(8)

&"','"&rsXsl(9)&"','"&rsXsl(10)&"','"&rsXsl(11)&"','"&rsXsl(12)&"','"&rsXsl(13)

&"','"&rsXsl(14)&"','"&rsXsl(15)&"','"&rsXsl(16)&"','"&rsXsl(17)&"','"&rsXsl(18)

&"','"&rsXsl(19)&"','"&rsXsl(20)&"','"&rsXsl(21)&"','"&rsXsl(22)&"','"&rsXsl(23)

&"','"&rsXsl(24)&"','"&rsXsl(25)&"','"&rsXsl(26)&"','"&rsXsl(27)&"')"
cmd.CommandText=str_Sql
cmd.Execute()


''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''

'''
j=j+1
rsXsl.movenext
Loop

response.write "共導(dǎo)入<font color='red'>" & j-1 & "</font>條記錄

.<br/>"
response.write "<a href=javascript:history.back()>確定</a>"
set rsXsl=nothing
set rsSql=nothing
set myconnection=nothing
set cmd=nothing
end sub
...
...
...
file1=request.form("filename2")
strtj=mid(request.form("filename2"),instrrev(file1,"\")+1,(instrrev(file1,".")-

instrrev(file1,"\")-1))
if file1="" then
response.write "請(qǐng)選擇您要導(dǎo)入的Excel表!<p></p>"
%>
<a href=javascript:history.back()>上一頁(yè)</a>
<%
response.end
end if
myconn="DRIVER={SQL SERVER};SERVER=(local);uid=sa;pwd=sa;DATABASE=qjgsj_data"
call dataIntoSqlServer_ceritificate file1,""&strtj&"",myconn
...
...
%>
在打開(kāi)連接時(shí)：
myConnection.open myConn_Xsl

出現(xiàn)：HTTP　500.100_內(nèi)部服務(wù)器錯(cuò)誤＿ASP錯(cuò)誤
錯(cuò)誤類型：
Microsoft Jet Database Engine(0x80004005)
\..\..\aa.asp xx行
是什么問(wèn)題呢？
此連接句有問(wèn)題嗎？
myConn_Xsl="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & strName &

";Extended Properties=Excel 8.0"

我服務(wù)器系統(tǒng)DSN已給SQL數(shù)據(jù)庫(kù)建立了數(shù)據(jù)源，用ASP批量導(dǎo)入EXCEL數(shù)據(jù)，還需在系統(tǒng)DSN給

EXCEL設(shè)置驅(qū)動(dòng)程序嗎？
zhanghongwen(流氓蚊子)在嗎？ 問(wèn)題點(diǎn)數(shù)：80、回復(fù)次數(shù)：4Top

1 樓VeryOldMan（無(wú)頭蒼蠅（www.gzmeishi.com））回復(fù)于 2006-01-27 14:53:46 得分

80myConn_Xsl="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath

("/yourexcel.xls") _
& ";Extended Properties=""Excel 8.0;HDR=Yes;"";"
SQL Command: "Select * From [yourSheetname$]"

在我自己的網(wǎng)站：www.gzmeishi.com上測(cè)試通過(guò)！Top

2 樓zcxc（知春小草）回復(fù)于 2006-02-05 14:18:59 得分 0 還是不行。
Microsoft.Jet.OLEDB.4.0在服務(wù)器上需要配置嗎？Top

3 樓zcxc（知春小草）回復(fù)于 2006-02-05 18:36:27 得分 0 郁悶?。?！
請(qǐng)高手相助?。?！
我服務(wù)器配置為windows server 2000,iis 5.0,sql server 2000。
用myConn_Xsl="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & strName &

";Extended Properties=Excel 8.0"
或myConn_Xsl="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath

("strName ") _
& ";Extended Properties=""Excel 8.0;HDR=Yes;"";" 語(yǔ)句
打開(kāi)該連接時(shí)出現(xiàn)錯(cuò)誤：
Microsoft Jet Database Engine(0x80004005)
/../../aa.asp xx行

用myconn_Xsl="driver={microsoft excel driver(*.xls)};dbq="&server.mappath

("strName")
來(lái)連接時(shí)打開(kāi)則出現(xiàn)錯(cuò)誤：
microsoft ole db provider for odbc drivers(0x80004005)
/../../aa.asp xx行

請(qǐng)問(wèn)：
用myconn_Xsl="driver={microsoft excel driver(*.xls)};dbq="&server.mappath

("strName")語(yǔ)句來(lái)連接時(shí)，服務(wù)器該如何配置？
用myConn_Xsl="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & strName &

";Extended Properties=Excel 8.0"
或myConn_Xsl="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath

("strName ") _
& ";Extended Properties=""Excel 8.0;HDR=Yes;"";"
來(lái)連接，服務(wù)器又該如何配置？
出現(xiàn)上述問(wèn)題，是什么原因？是服務(wù)器缺少什么配置或其他什么的？
請(qǐng)高手指點(diǎn)一下。

用dreamweaver連接數(shù)據(jù)庫(kù)時(shí)錯(cuò)誤通常都在第8行。并且問(wèn)題一會(huì)有，一會(huì)兒無(wú)。通常開(kāi)始運(yùn)行正常,但是一刷新,將有如下問(wèn)題的出現(xiàn):
HTTP 錯(cuò)誤 500.100 - 內(nèi)部服務(wù)器錯(cuò)誤 - ASP 錯(cuò)誤
Internet 信息服務(wù)
--------------------------------------------------------------------------------
技術(shù)信息（用于支持人員）
錯(cuò)誤類型：
Provider (0x80004005)
未指定的錯(cuò)誤
/xxxxxx.asp, 第8行
瀏覽器類型：
Mozilla/4.0 (compatible; MSIE 6.0; Windows NT 5.1)
網(wǎng)頁(yè)：
GET /main.asp
問(wèn)題原因:
連接數(shù)據(jù)庫(kù)代碼不規(guī)范所造成的.代碼有漏缺情況.
解決方安:
找到產(chǎn)生連接數(shù)據(jù)庫(kù)的那段代碼為 MM_XXXXXX_STRING 付值的語(yǔ)句, 添加UID=;PWD=
(此段代碼一般是在站點(diǎn)的CONNECTIONS文件下)
例如: 　　
　　錯(cuò)誤前：MM_XXXXX_STRING = "dsn=YYYY;"
　　　　改正后：MM_XXXX_STRING = "dsn=YYYY;UID=;PWD=;"
現(xiàn)在自己馬上試一下吧!

該文章在 2014/2/21 11:00:38 編輯過(guò)