关于SqlDataSource1数据操作的问题

请问各位大侠以下代码有问题吗 为什么老是在   If dv.Count = 0 Then  这一句报错呢

        Dim w As Date = Calendar1.TodaysDate
        Dim ins As String
        SqlDataSource1.SelectCommand = "SELECT ID, 站点号, 栏目名, 用户名, 使用状况, 登机时间, 日期 FROM 宽泰机房用机状况 where 日期='" & Today & "'"
        Dim dv As New DataView
        dv = SqlDataSource1.Select(DataSourceSelectArguments.Empty)
        If dv.Count = 0 Then
            ins = "INSERT INTO 宽泰机房用机状况(栏目名, 用户名, 使用状况, 站点号, 登机时间, 日期) VALUES (?, ?, ?, ?, ?,'" & Today & "')"
            SqlDataSource1.InsertCommand = ins
            SqlDataSource1.Insert()
        End If