求教:"Microsoft OLE DB Provider for ODBC Drivers 错误 '80004005' ,[Microsoft][ODBC 驱动程序管理器] 未发现数据源名称并且未指定默
我把代码贴一下,放在服务器上运行,IE提示上述的错误。
<%
set oConn=server.CreateObject("adodb.connection")
oConn.Open "Dirver={sql server};server=mlirdtry;database=rdtry;uid=zhang fang;pwd=zf"
set sConn=server.CreateObject("adodb.connection")
sConn.Open "Driver={Microsoft Excel Driver (*.xls)};Dbq="&server.mappath("../a/a.xls")
set sRs=server.CreateObject("adodb.recordset")
sRs.Open "select * from sheet1$",sConn,1,1
set oRs=server.CreateObject("adodb.recordset")
oRs.Open "select * from packreturn",oConn,3,3
j=1
Do While Not sRs.Eof
oRs.AddNew
oRs(0)=j
for i=0 to sRs.Fields.Count-1
oRs(i)=Trim(sRs(i))
Next
oRs.Update
sRs.MoveNext
j=j+1
Loop
sRs.Close
oRs.Close
cConn.Close
sConn.Close
Set oRs=nothing
Set oConn=nothing
%>
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<meta name="GENERATOR" content="Microsoft FrontPage 4.0">
<meta name="ProgId" content="FrontPage.Editor.Document">
<title>New Page 4</title>
</head>
<body>
<form method="POST" action="--WEBBOT-SELF--">
<!--webbot bot="SaveResults" startspan U-File="_private/form_results.txt"
S-Format="TEXT/CSV" S-Label-Fields="TRUE" --><strong>[FrontPage 保存结果 组件]</strong><!--webbot
bot="SaveResults" endspan -->
<p><input type="button" value="按钮" name="B3"><input type="submit" value="提交" name="B1"><input type="reset" value="全部重写" name="B2"></p>
</form>
</body>
</html>