28,402
社区成员
发帖
与我相关
我的任务
分享救命~~~~~~[急]ODBC 驱动程序管理器出错
Microsoft OLE DB Provider for ODBC Drivers 错误 '80004005'
[Microsoft][ODBC 驱动程序管理器] 驱动程序的 SQLAllocHandle on SQL_HANDLE_DBC 失败
/ys/file/add_invoice_detail.asp，行 503
Microsoft OLE DB Provider for ODBC Drivers 错误 '80004005'
[Microsoft][ODBC SQL Server Driver][DBNETLIB]SSL 安全错误
/ys/file/listbaoh_n.asp，行 80
有时还会显示是某些页“网页不存在或已删除”
[Microsoft][ODBC 驱动程序管理器] 驱动程序的 SQLAllocHandle on SQL_HANDLE_DBC 失败
/ys/file/add_invoice_detail.asp，行 503
Microsoft OLE DB Provider for ODBC Drivers 错误 '80004005'
[Microsoft][ODBC SQL Server Driver][DBNETLIB]SSL 安全错误
/ys/file/listbaoh_n.asp，行 80
有时还会显示是某些页“网页不存在或已删除”
...全文
请发表友善的回复…
发表回复
kakkuii 2006-04-25
- 打赏
- 举报
一天要重启N次
hzvoip 2006-04-21
- 打赏
- 举报
服务器重新启动!
jay_lishijie 2006-04-21
- 打赏
- 举报
看看这个http://support.microsoft.com/?kbid=306518
kakkuii 2006-04-21
- 打赏
- 举报
重装系统或换一台服务器也有同样问题
setcdq9801的专栏 2006-04-21
- 打赏
- 举报
一、IIS出问题了
二、重配置测试一下ODBC
三、在事件查看器里看看有什么错误提示没
二、重配置测试一下ODBC
三、在事件查看器里看看有什么错误提示没
kakkuii 2006-04-21
- 打赏
- 举报
更可笑的是服务器的其他站点也会跟着访问不了
kakkuii 2006-04-21
- 打赏
- 举报
Public Function GetConnStr() As String
GetConnStr = "Driver={SQL Server};Server=10.64.2.218;UID=sa;PWD=;Database=gz"
End Function
Public Function testsn(ByVal sn As String, ByVal name As String) As Boolean
Dim strSql As String
Dim Rst As New ADODB.Recordset
Dim Conn As New ADODB.Connection
Conn.Open GetConnStr()
Rst.CursorLocation = adUseClient
Set rs = Conn.Execute("select * from staff_need where who_need='" & name & "' and ie=0")
If Not rs.BOF And Not rs.EOF Then
ssn = CLng(Right(Trim(rs("start_sn")), 6))
esn = CLng(Right(Trim(rs("end_sn")), 6))
asn = CLng(Right(Trim(sn), 6))
If ssn <= asn <= esn Then
testsn = True
Else
testsn = False
End If
Else
testsn = False
End If
Set Rst = Nothing
End Function
这是其中的一些链接数据库和调用代码
以前运行很正常，可这段时间一直出错
GetConnStr = "Driver={SQL Server};Server=10.64.2.218;UID=sa;PWD=;Database=gz"
End Function
Public Function testsn(ByVal sn As String, ByVal name As String) As Boolean
Dim strSql As String
Dim Rst As New ADODB.Recordset
Dim Conn As New ADODB.Connection
Conn.Open GetConnStr()
Rst.CursorLocation = adUseClient
Set rs = Conn.Execute("select * from staff_need where who_need='" & name & "' and ie=0")
If Not rs.BOF And Not rs.EOF Then
ssn = CLng(Right(Trim(rs("start_sn")), 6))
esn = CLng(Right(Trim(rs("end_sn")), 6))
asn = CLng(Right(Trim(sn), 6))
If ssn <= asn <= esn Then
testsn = True
Else
testsn = False
End If
Else
testsn = False
End If
Set Rst = Nothing
End Function
这是其中的一些链接数据库和调用代码
以前运行很正常，可这段时间一直出错
kakkuii 2006-04-21
- 打赏
- 举报
那503行是调用dll语句来的，大部分代码我都封装在com里面了
moodboy1982 2006-04-21
- 打赏
- 举报
这是典型的连接数据库失败！请贴出你的代码。
------个性签名-----------
http;//www.esoftnow.com/bbs
技术论坛，你成功的起源地！
------个性签名-----------
http;//www.esoftnow.com/bbs
技术论坛，你成功的起源地！
kakkuii 2006-04-21
- 打赏
- 举报
但是重启后就正常，过一段时间又有问题
任亚军 2006-04-21
- 打赏
- 举报
SSL安全出错?
setcdq9801的专栏 2006-04-21
- 打赏
- 举报
把你的503行 和80行的代码贴出来看看
kakkuii 2006-04-21
- 打赏
- 举报
但是重启后就正常，过一段时间又有问题
