如何从Visual Basic中的本地SQL数据库中读取数据?该数据库是在Visual Studio中创建的

时间:2017-01-11 12:48:18

标签: sql-server vba visual-studio-2012

我在Visual Basic中从本地sql server读取数据时遇到了一些问题。我创建了数据库并将其作为数据源连接但由于某种原因,我的数据源连接和初始目录必须不正确。这是我的代码:

 Private Sub Button1_Click(sender As Object, e As EventArgs) Handles btnLogin.Click
        Dim con As New SqlConnection
        Dim cmd As New SqlCommand
        Dim rd As SqlDataReader

        con.ConnectionString = ("Data Source = localhost; Initial Catalog=Database1Dataset; Integrated security=true ")
        cmd.Connection = con
        con.Open()
        cmd.CommandText = "select login, password from Table where login = '" & tboxUname.Text & "' and password = '" & tboxPword.Text & "' "
        rd = cmd.ExecuteReader
        If rd.HasRows Then
            frmProperties.Show()
        Else
            MsgBox("Incorrect Login") 'Else, display a message saying "incorrect login".
            Tries += 1
            If Tries = 3 Then
                MsgBox("Closing Program")
                Close()
            End If
        End If

    End Sub

我的数据库名为Database1,该表名为Table。谢谢你的帮助。

0 个答案:

没有答案