rs.recordcout问题！

Question

rs.recordcount？？请明确问题。
你可以这样判断：select count(*) from table

Answer 1

Public Function HaveStaff(ByVal strcnn As String, ByVal Id As Integer) As Boolean  '判断有无员工
On Error GoTo err_trap:
    Dim rs As New ADODB.Recordset
    Dim strsql As String
    strsql = "select * from Staff where DeptId =" & Id
    rs.Open strsql, strcnn
    If rs.Fields("StaffId").Value > 0 Then
       HaveStaff = True
    Else
       HaveStaff = False
    End If
    Set rs = Nothing
    Exit Function
err_trap:
    HaveStaff = False
    Set rs = Nothing
End Function
然后，这样怎样引用可以呢?是rs.cout还是rs.fields("cout").value,提示完马上给分！

Answer 2

Public Function HaveStaff(ByVal strcnn As String, ByVal Id As Integer) As Boolean  '判断有无员工
On Error GoTo err_trap:
    Dim rs As New ADODB.Recordset
    Dim strsql As String
    strsql = "select * from Staff where DeptId =" & Id
    rs.Open strsql, strcnn
    If not (rs.eof and rs.bof)  Then
       HaveStaff = True
    Else
       HaveStaff = False
    End If
    Set rs = Nothing
    Exit Function
err_trap:
    HaveStaff = False
    Set rs = Nothing
End Function

Answer 3

这个就可以：not (rs.eof and rs.bof)

Answer 4

If rs.recordcount<>0  Then
       HaveStaff = True
    Else
       HaveStaff = False
    End Ifrs.recordcount为记录集中记录的条数。