OLEDB问题

2004-04-08 11:32:30 87 阅读 AI 写同款 · GEO 优化AI 选题数据监测一键分发 ›

基于任务的功能磁共振成像的连接性分析虽然这种方法通过减少偶然只选择特异性代表的可能性来改善可推广性，但类别内和类别间的变异性变得更难控制（例如，"鸟类"可能是一个比"车辆"更加/不那么同质的类别），并且可能会出现关于这些预定义类别是否是现实世界实体的有意义划分的担忧——尽管这个限制在某种程度上可以通过表征相似性分析来解决。特别是，海马单变量激活和语义认知区域（左下额回）中语义信息的表征强度之间的交互预测了项目的概念记忆，而海马单变量激活和视觉处理区域（腹内侧枕叶皮层）中视觉属性的表征强度之间的交互预测了图像样本的知觉记忆。阅读详情

产生如下错误：

实时错误：‘2147217887(80040e21)' :
多步OLE DB 操作产生错误。如果可能，请检查每个OLE DB状态值。没有工作被完成

出错代码：
Private Sub Chk()
Rec Rs, "select * from code Where id=" & ID
If Not (Rs.EOF And Rs.BOF) Then
Text1.Text = Rs(2) ’报这里出错
Text2.Text = Rs(1)
Text3.Text = Rs(0)
Text4.Text = Rs(4)
Rec li, "select * from [type]"
Combo1.Clear
While Not li.EOF
Combo1.AddItem li(0)
li.MoveNext
Wend
Combo1.Text = Rs(3)
Combo2.Text = Rs(5)
Else
MsgBox "没有次记录！", vbOKOnly, "记录未找到"
End If
End Sub

连接代码：
"Provider=SQLOLEDB.1;Persist Security Info=False;Server=10.1.1.190;UID=sa;PWD=www.zhi.net;database=code;"

上面代码用到的自定义函数 Rec ‘生产记录集
Public Function Rec(Rs, SQL As String)
On Error Resume Next
Set Rs = CreateObject("ADODB.Recordset")
Rs.ActiveConnection = Conn
Rs.Source = SQL
Rs.CursorLocation = 1
Rs.CursorType = 3
Rs.LockType = 1
Rs.Open
If Err.Number > 0 Then
T = MsgBox("请检查数据库连接是否正确！" & Chr(10) & "SQL语句：" & Chr(10) & SQL, vbOKOnly, "数据库创建失败！")
Dialog.Show
End If
End Function

...全文

南京工业大学高性能计算平台基础使用指南高性能计算平台基础使用指南前言什么高性能计算南京工业大学高性能计算平台如何登录如何进行文件传输进行任务提交(本文以提交MATLAB任务为例)环境变量的配置（推荐）使用Environment Modules进行环境变量管理Modules 指令自定义MODULEFILE常见软件任务脚本前言第一次接触使用学校的高性能平台是在今年上半年进行毕业设计的时候，当时有大量的数据需要在Matab中进行模型运算，便向学校申请了账号，使用了HPC平台。计算速度确实比个人电脑快了太多太多。近期，有很多初次想使用高性能计算阅读详情

iloveyaner

VB基础类 7,788 成员 197,583 内容

+ 关注 + 加入社区

OLEDB问题

相关推荐