尝试在vb.net中的SQL Server 2005数据库中添加数据

Question

有人可以帮助我吗，我只是一个初学者，想学习使用 vb.net 操作 SQL Server 数据。我已经体验过在 ms access 中操作数据。所以我只是回收了我在这里使用的代码。但不幸的是我得到了这个错误：

Object reference not set to an instance of an object.

另一个问题是，我不确定我在 SqlConnection 中输入的内容是否与 SQL Server 中的内容相匹配。这是 sql server Management Studio Express 的屏幕截图：

[http://screencast.com/t /Y2Q0NWRhYTA][1]

Imports system.data.sqlclient

'declarations
 Dim idnum As String
    Dim lname As String
    Dim fname As String
    Dim skul As String

    Dim sqlcon As SqlConnection
    Dim sqlcom As SqlCommand  

idnum = TextBox1.Text
        lname = TextBox2.Text
        fname = TextBox3.Text
        skul = TextBox4.Text

sqlcon.open

            sqlcon = New SqlConnection("Data Source=SENBONZAKURA\SQLEXPRESS;Initial Catalog=testing;User ID=SenbonZakura/Rew;")
            sqlcom = New SqlCommand("select * from [student]", sqlcon)

            Dim strsql As String = "insert into [student]([ID], [LASTNAME], [FIRSTNAME], [SCHOOL]) values('" + idnum + "','" + lname + "','" + fname + "','" + skul + "')"


            sqlcom.ExecuteNonQuery()

Answer 1

您正在调用：

sqlcon.open

before：

sqlcon = New SqlConnection("Data Source=SENBONZAKURA\SQLEXPRESS;Initial Catalog=testing;User ID=SenbonZakura/Rew;")

这就是您的空引用的来源。在调用 open 之前，您需要“new”sqlcon。

尝试一下：

sqlcon = New SqlConnection("Data Source=SENBONZAKURA\SQLEXPRESS;Initial Catalog=testing;User ID=SenbonZakura/Rew;")

sqlcon.open

sqlcom = New SqlCommand("select * from [student]", sqlcon)

Dim strsql As String = "insert into [student]([ID], [LASTNAME], [FIRSTNAME], [SCHOOL]) values('" + idnum + "','" + lname + "','" + fname + "','" + skul + "')"


sqlcom.ExecuteNonQuery()

由于我们不了解您的环境，因此很难帮助您处理连接字符串。但这里有一个很棒参考的链接：http://connectionstrings.com/

Answer 2

Paul 是对的，但除了 Paul 的回答之外，由于 SqlConnection 实现了 IDisposable 接口，我建议您将其包含在 using 语句中。在这篇文章中查看有关使用的更多

信息重要的建议是使用参数将值传递给您的查询。它为您提供安全性，代码更简单...

完整的代码如下所示：

Using sqlcon As New SqlConnection("Data Source=SENBONZAKURA\SQLEXPRESS;Initial Catalog=testing;User ID=SenbonZakura/Rew;")

    sqlcon.Open()
    Dim sqlcom As New SqlCommand()
    sqlcom.Connection = sqlcon

    sqlcom.CommandText = "INSERT INTO [student](ID, LASTNAME, FIRSTNAME, SCHOOL) VALUES (@ParameterID, @ParameterLastName, @ParameterFirstName, @ParameterSchool)"

    sqlcom.Parameters.AddWithValue("@ParameterID", TextBox1.Text)
    sqlcom.Parameters.AddWithValue("@ParameterLastName", TextBox2.Text)
    sqlcom.Parameters.AddWithValue("@ParameterFirstName", TextBox3.Text)
    sqlcom.Parameters.AddWithValue("@ParameterSchool", TextBox4.Text)

    sqlcom.ExecuteNonQuery()

End Using

• 编辑

请注意，我省略了“select * from [student]” ，您没有使用此查询！