4

亲爱的专家，当我尝试从记录集中获取值时出现以下问题，它显示查询错误

SSql = "select doj,dol,employeeid from m_employee where employeeid='" & Trim(RsCardNo!Code) & "'" rsCardRepl.Open SSql, Conn, adOpenDynamic, adLockOptimistic
If rsCardRepl.RecordCount > 0 Then Dim temp As Integer temp = Trim(rsCardRepl!employeeId) rsAddPunch!PAYCODE = temp End If

然后以下行给出错误

临时=修剪（rsCardRepl！employeeId）

错误编号=6 错误描述=溢出

请解释一下为什么会出现这个错误以及解决方案是什么

谢谢海军 Kishor Pandey

4

2 回答 2

2

尝试使用光标类型 adOpenForwardOnly 和锁定类型 adLockReadOnly

于 2010-10-08T14:39:53.053 回答
0

也许你需要这样temp定义Dim temp As Long

简单来说，溢出错误意味着该值不适合变量。

  • VB6 的Integer取值范围为 -32,768 到 32,767
  • ALong可以取值从 -2,147,483,648 到 2,147,483,647
于 2010-10-01T08:40:26.973 回答