实现查询某人是否在数据库中？

Question

用SQL语句和rs（New ADODB.Recordset）实现查询某人是否在数据库中？

Answer 1

if exists(select 1 from 表 where 姓名 = '某人')
print '在'
else
print '不在'

Answer 2

Public Function FindPeople(strName as string) as string
   Dim rs As ADODB.Recordset
   Dim Cnn As ADODB.Connection   Cnn.Open  "Provider=sqloledb;" & _
      "Data Source=srv;Initial Catalog=pubs;User Id=sa;Password=; "   Set rs = New ADODB.Recordset
   rs.CursorLocation = adUseClient
   rs.CursorType = adOpenKeyset
   rs.LockType = adLockOptimistic   rs.Open "SELECT * FROM 表 " & _
      "WHERE 姓名='"& strName &"'", strCnn, , , adCmdText   if not rs.eof and not rs.bof then
      FindPeople="有"
   else
     FindPeople="无"
   end if   rs.CloseEnd function

Answer 3

楼主啊，你想干什么？select 在否 from yourtable where 姓名 = 某人

Answer 4

select name from xx表 where 姓名=某人