Vb.net 2010 连接到 SQL Server 2008

Question

我正在尝试连接到 MS SQL SERVER 2008 数据库（学生），我想确保：

1）我制作的连接字符串是否正常

Dim connectionString As New SqlConnection("server=X86ONX64; database=students; Integrated Security=True")

2）如何检查数据集是否产生任何结果？

代码：

Public Class Form1

'Connection String + DataAdaptor + DataSet
'Declared Outside Any Subroutines/Functions

Dim connectionString As New SqlConnection("server=X86ONX64; database=students; Integrated Security=True")
Dim dataAdaptor As New SqlDataAdapter()
Dim objdataSet As New DataSet()


Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load

    dataAdaptor.SelectCommand = New SqlCommand()
    dataAdaptor.SelectCommand.Connection = connectionString
    dataAdaptor.SelectCommand.CommandText = "select * from basic_info;"
    dataAdaptor.SelectCommand.CommandType = CommandType.Text

    connectionString.Open()

    dataAdaptor.Fill(objdataSet, "StudentInfo")

    connectionString.Close()

    grd.AutoGenerateColumns = True
    grd.DataSource = objdataSet
    grd.DataMember = "basic_info"




    dataAdaptor = Nothing
    connectionString = Nothing


End Sub

Answer 1

关于你的第一个问题， 如果我创建的连接字符串没问题

如果您没有遇到任何异常，则您已成功连接到数据库。

关于你的第二个问题。

你可以做两件事。

1. 调试方式错误。 （不过确实有效）

   MsgBox(objdataSet.Tables[0].Rows.Count);

2. 学习和调试正确的方法。

   阅读这些文章

   调试基础知识
   Visual Studio 调试
   调试基础知识：断点

无论如何，学习一下如何正确使用调试器、设置断点、在监视窗口中分析 objdataSet 对象并查看是否存在任何结果。

Answer 2

1) 如果我制作的连接字符串没问题

验证连接字符串的简单方法是使用 Visual Studio 中的“服务器资源管理器”进行连接。一旦获得良好的连接，右键单击该连接并获取“连接字符串”属性。

2）如何检查数据集是否产生任何结果？

MsgBox(objdataSet.GetXML)

GetXML 将以 XML 格式返回数据集中的所有数据。

另外，如果不需要，请不要全局声明变量。
声明它们更接近，或者根本不，就像这样......

Dim objdataSet As New Data.DataSet()

Using connectionString As New Data.SqlClient.SqlConnection("server=X86ONX64; database=students; Integrated Security=True")

    With New Data.SqlClient.SqlDataAdapter()
        .SelectCommand = connectionString.CreateCommand
        .SelectCommand.CommandText = "select * from basic_info;"
        .SelectCommand.CommandType = Data.CommandType.Text

        .Fill(objdataSet, "StudentInfo")
    End With

    MsgBox(objdataSet.GetXML)
End Using

'Now put it in your dataset...'

希望这有帮助。