关于Server.CreateObject 失败

2010-01-05 03:18:32 544 阅读 AI 写同款 · GEO 优化AI 选题数据监测一键分发 ›

在Ansys Mechanical中对磨损进行建模在有限元分析中，磨损是通过移动接触表面上的节点来复制材料侵蚀来建模的。仿真迭代更新几何，并在每次更新后重新计算平衡，使过程成为非线性的。Ansys使用将压力、相对运动和材料阻力与表面损失联系起来的经验定律来处理连续介质尺度的磨损。要在Ansys Mechanical中激活磨损建模，必须使用TB，WEAR命令定义专用材料模型。该命令与 TBDATA 相结合，允许用户输入与磨损相关的材料常数，以控制磨损的计算方式以及在接触表面上的应用方式。阅读详情

问题：
Server 对象错误 'ASP 0177 : 800401f3'

Server.CreateObject 失败

/inc/conn.asp，行 9

800401f3

出错语句：
代码：



<%

session.timeout=60

dim conn

dim connstr

dim db

db="/database/tsinghuavc.mdb" '数据库文件位置

ConnStr = "Provider = Microsoft.Jet.OLEDB.4.0;Data Source = " & Server.MapPath(db)

'On Error Resume Next

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

conn.open ConnStr

If Err Then

	err.Clear

	Set Conn = Nothing

	Response.Write "数据库连接出错，请检查连接字串。"'注释，需要把这几个字翻译成英文。

	Response.End

End If

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

这一句报错。
服务器上WINDOWS 2003
IIS6
知道的告知一声。在线等，
谢谢

...全文

医学影像AI的幻觉问题与CCD解决方案医学影像AI在辅助诊断中面临的核心挑战是幻觉现象，即模型生成不符合实际影像的虚假诊断。这种现象源于多模态大语言模型(MLLMs)在视觉-语言对齐上的技术局限，可能导致假阳性或假阴性的临床风险。通过临床对比解码(CCD)框架，结合症状锚定和专家引导的双阶段校准机制，可有效提升模型输出的可靠性。该技术在CheXpert和MIMIC-CXR等标准数据集上验证，显著改善了肺不张、胸腔积液等关键指标的检测准确率。对于医疗AI落地场景，这种即插即用的解决方案既规避了数据隐私合规问题，又降低了基层医院的部署门槛，为AI辅阅读详情

liyufu86

ASP 28,401 成员 356,940 内容

+ 关注 + 加入社区

切换为时间正序

hebhd 2010-01-06

打赏
举报

oledb 连接不上
有可能是Temp目录的权限不够.
先放开windows Temp目录的权限及iis目录的所有权限

liyufu86 2010-01-06

打赏
举报

还是没解决...
oledb 始终连接不上

hebhd 2010-01-06

打赏
举报

不管你用哪种连接方式 oledb 还是 access 因为是在本地调试。建议先用odbc 测试连接

ender129 2010-01-06

打赏
举报

改很多？不用改很多啊我这个在xp 2003 2008 下都没问题
因为天天都在用这个是个单独的文件conn.asp
我要用的时候就是改一下数据库位置别的都不改
如果index.asp要用我直接
这样就可以了啊

liyufu86 2010-01-06

打赏
举报

但是服务器有很多系统
用你这个得改很多的。
不知道用原来的连接方式出错的原因

mdac版本不对？

ender129 2010-01-06

打赏
举报

如果用我的代码好使证明 iis 和系统都没问题
其他的就是改代码了这样缩小范围也好办
一点点排查问题

liyufu86 2010-01-06

打赏
举报

[Quote=引用 31 楼 ender129 的回复:]
引用 30 楼 liyufu86 的回复:
谢谢楼上的
我重新注册了下adodb的组件貌似好了
但是现在有新问题

报：ADODB.Connection 错误 '800a0e7a'

未找到提供程序。该程序可能未正确安装。

/inc/conn.asp，行 10

是什么原因？

conn.open ConnStr
这句报错

现在好使了是不是那么你现在用我给你的代码执行一下看看
这是我昨天给你的代码
HTML code<%'session.timeout=60 我个人不是很喜欢用这个dim conn,dbdim connstr
db="../database/tsinghuavc.mdb"'数据库文件位置 ../是上级文件夹的意思我的都没有这些建议看一下路径是否是上一级onerrorresumenext
connstr="DBQ="+server.mappath(""&db&"")+";DefaultDir=;DRIVER={Microsoft Access Driver (*.mdb)};"set conn=server.createobject("ADODB.CONNECTION")if errthen
err.clearelse
conn.open connstrendifsub CloseConn()
conn.closeset conn=nothing

Response.Write"Database connection error, please check the connection string"'你是这个意思吗变成英文 Response.Endend sub%>
[/Quote]

你这句是可以。但是访问数据表好像有问题。
为什么用Microsoft.Jet.OLEDB.4.0;的方式不行

wxb0903 2010-01-06

打赏
举报

这类问题的确是很多的!
这个IIS问题很是麻烦的!但不要泄气啊!
有问题就有解决问题的办法!!
好好努力!!!!!!!!!!!!!!!
加油!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!

hebhd 2010-01-06

打赏
举报

如果不行。重装iis

hebhd 2010-01-06

打赏
举报

晕.从网上下载 MDAC2.5 或更高版本~~~

ender129 2010-01-06

打赏
举报

[Quote=引用 30 楼 liyufu86 的回复:]
谢谢楼上的
我重新注册了下adodb的组件貌似好了
但是现在有新问题

报：ADODB.Connection 错误 '800a0e7a'

未找到提供程序。该程序可能未正确安装。

/inc/conn.asp，行 10

是什么原因？

conn.open ConnStr
这句报错
[/Quote]
现在好使了是不是那么你现在用我给你的代码执行一下看看
这是我昨天给你的代码



<%

'session.timeout=60        我个人不是很喜欢用这个  

dim conn,db

dim connstr

db="../database/tsinghuavc.mdb" 

'数据库文件位置  ../是上级文件夹的意思 我的都没有这些 建议看一下路径 是否是上一级

on error resume next

connstr="DBQ="+server.mappath(""&db&"")+";DefaultDir=;DRIVER={Microsoft Access Driver (*.mdb)};"

set conn=server.createobject("ADODB.CONNECTION")

if err then

err.clear

else

conn.open connstr

end if

sub CloseConn()

    conn.close

    set conn=nothing



Response.Write "Database connection error, please check the connection string"

'你是这个意思吗 变成英文 

    Response.End



end sub

%>

liyufu86 2010-01-06

打赏
举报

谢谢楼上的
我重新注册了下adodb的组件貌似好了
但是现在有新问题

报：ADODB.Connection 错误 '800a0e7a'

未找到提供程序。该程序可能未正确安装。

/inc/conn.asp，行 10

是什么原因？

conn.open ConnStr
这句报错

ender129 2010-01-06

打赏
举报

你先安装access试试我上班呢公司不让上QQ 我们都是内部rtx通讯
安装之后用我的那个代码试试代码里面数据库路径你修改一下就行了
看出不出错误我的那个数据库语句天天用应该没问题

ender129 2010-01-06

打赏
举报

不过 2003 有个很有意思的问题就是如果你的服务器装的是2003 那么你不用安装access 你写的asp语句调用数据库都好使就是没有图形化的可视窗口很奇怪所以你不好使的话还是先安装一个 access 试试吧再不好使你再说话帮你找找问题我也是新手解决难题就是给自己提高

liyufu86 2010-01-06

打赏
举报



<%

session.timeout=60

dim conn

dim connstr

dim db

db="../database/tsinghuavc.mdb" '数据库文件位置

ConnStr = "Provider = Microsoft.Jet.OLEDB.4.0;Data Source = " & Server.MapPath(db)

'On Error Resume Next

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

conn.open ConnStr

If Err Then

	err.Clear

	Set Conn = Nothing

	Response.Write "数据库连接出错，请检查连接字串。"'注释，需要把这几个字翻译成英文。

	Response.End

End If

这是全部语句
貌似没有用ACCESS的驱动去连接

liyufu86 2010-01-06

打赏
举报

楼上的，能加我下QQ吗？
我感觉应该就是这个问题！怎么安装？
急...
感试了一段语句
<%
set fs=Server.CreateObject("Scripting.FileSystemObject")---1
Set conn = Server.CreateObject("ADODB.Connection")---------2
%>
1句没问题，就第2句报错。应该就是这个组件的问题了。

ender129 2010-01-06

打赏
举报

connstr="DBQ="+server.mappath(""&db&"")+";DefaultDir=;DRIVER={Microsoft Access Driver (*.mdb)};"
set conn=server.createobject("ADODB.CONNECTION")
这句话看见了吗这就是要用到access的意思你机器没有access 怎么打开数据库怎么写入呢是不是

liyufu86 2010-01-06

打赏
举报

路径已更换
还是包那个错误
<%
session.timeout=60
dim conn
dim connstr
dim db
db="../database/tsinghuavc.mdb" '数据库文件位置

liyufu86 2010-01-06

打赏
举报

access
是否安装时什么意思？
还要安装ACCESS?

ender129 2010-01-06

打赏
举报

我的代码在6楼你先排查代码是不是有错误然后尤其数据库位置
如果都没问题你检查一下你机器里面 iis 和 access 都是否安装和运转正常
如果出现问题我们也是这么排查确定一个地方没问题就查另一个位置一点点来

加载更多回复（24）

关于Server.CreateObject 失败

相关推荐