recordcount 不能大于2
时间:2011-08-07
来源:互联网
用excel读取Access,单无论有多少记录,recordcount 都是1
For rowexcel = 2 To lastrow '数据从第三行开始
'If rowexcel = 103 Then Stop
'rs1.Open "select * from T_individual_addressbook where T_individual_addressbook.PersonalName='" & Cells(rowexcel, 2) & "'", conn, 1, 3
rs1.Open "select * from T_individual_addressbook where '" & Cells(rowexcel, 2) & "' like T_individual_addressbook.PersonalName ", conn, 1, 3
If rs1.RecordCount >= 2 Then '判断该值是否重复
errorsign = 1
End If
Set rs1 = Nothing
'rs1.Close
Next rowexcel
我用2003office
请那位可以回答
For rowexcel = 2 To lastrow '数据从第三行开始
'If rowexcel = 103 Then Stop
'rs1.Open "select * from T_individual_addressbook where T_individual_addressbook.PersonalName='" & Cells(rowexcel, 2) & "'", conn, 1, 3
rs1.Open "select * from T_individual_addressbook where '" & Cells(rowexcel, 2) & "' like T_individual_addressbook.PersonalName ", conn, 1, 3
If rs1.RecordCount >= 2 Then '判断该值是否重复
errorsign = 1
End If
Set rs1 = Nothing
'rs1.Close
Next rowexcel
我用2003office
请那位可以回答
作者: charliemailbox 发布时间: 2011-08-07
条件好像写反了:
rs1.Open "select * from T_individual_addressbook where T_individual_addressbook.PersonalName like '" & Cells(rowexcel, 2) & "'", conn, 1, 3
rs1.Open "select * from T_individual_addressbook where T_individual_addressbook.PersonalName like '" & Cells(rowexcel, 2) & "'", conn, 1, 3
作者: zhaogang1960 发布时间: 2011-08-07
相关阅读 更多
热门阅读
-
office 2019专业增强版最新2021版激活秘钥/序列号/激活码推荐 附激活工具
阅读:74
-
如何安装mysql8.0
阅读:31
-
Word快速设置标题样式步骤详解
阅读:28
-
20+道必知必会的Vue面试题(附答案解析)
阅读:37
-
HTML如何制作表单
阅读:22
-
百词斩可以改天数吗?当然可以,4个步骤轻松修改天数!
阅读:31
-
ET文件格式和XLS格式文件之间如何转化?
阅读:24
-
react和vue的区别及优缺点是什么
阅读:121
-
支付宝人脸识别如何关闭?
阅读:21
-
腾讯微云怎么修改照片或视频备份路径?
阅读:28