Что случилось с подсчетом

Question

Я бы хотел перенаправить администратора, если в таблице нет записи в таблице, но я делаю что-то не так в своем коде, но я не могу найти. Не могли бы вы мне помочь?

Private Sub frmlogin_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load 
    Dim cmd As SqlCeCommand 
    Dim namecount As String 
    Dim con1 As SqlCeConnection 
    con1 = New SqlCeConnection("Persist Security Info=False;Data Source=.\database.sdf;Password=***********;File Mode=shared read") 
    con1.Open() 
    namecount = "SELECT COUNT(Name) WHERE namecount FROM Users" 
    cmd = New SqlCeCommand("SELECT COUNT(Name) WHERE namecount FROM Users", con1) 

    Dim reader1 As SqlCeDataReader = cmd.ExecuteReader() 
    While (reader1.Read()) 
     If reader1(namecount) > 0 Then 
      'Redirect to Admin Form 
      Me.Hide() 
      frmadmin.Show() 
     Else 
      Me.Show() 
     End If 
    End While 
End Sub 

Answer 1

Вы имели в виду использовать псевдоним:

SELECT COUNT(Name) AS namecount FROM Users 

вместо

SELECT COUNT(Name) WHERE namecount FROM Users 

И:

reader1("namecount") 

вместо:

reader1(namecount) 

Answer 2

должен быть

SELECT COUNT(Name) AS namecount FROM Users 

не

SELECT COUNT(Name) WHERE namecount FROM Users