基于文本框的 SQL Server 删除/插入无法工作。- VS 2010

hjh93

我的 VS 2010 程序有一个 Datagridview,它从 SQL Server 数据库加载数据,现在我添加了几个文本框来添加新行和更新现有行。

这是按钮的子项:

Imports System.Configuration
Imports System.Data
Imports System.Data.SqlClient
Imports System.Data.SqlTypes
Imports System.IO


Public Class macmaster

'variables to be used'  
Dim myCmd As SqlCommand         'create SQL command'
Dim myReader As SqlDataReader   'pull data'
Dim dt As New DataTable         'store data'
Dim intResult As MsgBoxResult
Dim strSQL As String

 Private Sub MacSave_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MacSave.Click

    Dim myConn = New SqlConnection("server=server;database=SQL;uid=pro;pwd=abcd") 'form connection'

    Try 'alert user if any fields not filled in'

        If Me.MacNm.Text.Trim = "" Then

            '**this portion of code not relevant**'

        Else 'proceed next step if all fields ok.'

            intResult = MsgBox("Are you sure to Add/Update?", MsgBoxStyle.OkCancel)
            If intResult = MsgBoxResult.Ok Then

                'call connection (myConn)'
                myConn.Open()

                myCmd.CommandText = "DELETE FROM [SQL].[dbo].[Mac] WHERE Machine='" & MacNm.Text & "'"

                myCmd.CommandText = "INSERT INTO [SQL].[dbo].[Mac](Machine, PIC, Die) VALUES('" & MacNm.Text & "','" & MacPIC.Text & "','" & MacDie.Text & "')"

                MsgBox("Record Added!")

                myConn.Close()

            End If

        End If

    Catch ex As Exception
        MsgBox(ex.Message, MsgBoxStyle.Critical, "btnAdd_Click Exception")
    End Try

End Sub
End Class

在测试期间,我尝试了按钮。代码一直运行,直到我收到消息框说记录已添加。

但是检查 SQL Server 数据库,我看到数据甚至没有改变。2 部分 SQL 查询均未触发。我什至还在 SQL Server 上测试了这两个查询。工作正常。我是如何引用有问题的文本框的?

攻击力

您缺少 ExecuteNonQuery()。

myCmd = New SqlCommand()

myCmd.Connection= myConn

mnyCmd.CommandType= CommandType.Text

Dim commands As String
commands= "DELETE FROM [SQL].[dbo].[Mac] WHERE Machine='" & MacNm.Text & "';"&"INSERT INTO [SQL].[dbo].[Mac](Machine, PIC, Die) VALUES('" & MacNm.Text & "','" & MacPIC.Text & "','" & MacDie.Text & "')"

myCmd.CommandText = commands

myCmd.ExecuteNonQuery()

MsgBox("Record Added!")

本文收集自互联网,转载请注明来源。

如有侵权,请联系 [email protected] 删除。

编辑于
0

我来说两句

0 条评论
登录 后参与评论

相关文章

使用VS2010登录的SQL SERVER

SQL CLR问题VS2010 SQL Server 2012

SQL Server 2012的文本框优化

升级到 SQL 链接表后,Access 2010 无法在文本框中添加数据

使用 c# 从 SQL Server 检索新插入的 ID 列并显示在文本框字段中

简单的SQL Server插入-从文本框到一列的许多逗号分隔值

通过文本框插入sql命令

Excel 2010至Sql Server 2008插入语句

TF31002:无法连接到此Team Foundation Server VS2010- VS2013

链接文本框C#SQL Server

如何创建宏以在Word 2010中插入预先填充了文本的文本框?

Word 2010中的文本框无法打印到实际大小

如何在基于IF语句Access 2010的文本框中显示不同的值

从SQL检索电子邮件模板并在SQL Server中嵌入文本框

Sqoop导出到Sql Server中VS批量插入到SQL Server中

截断临时表Vs删除临时表SQL Server

将文本框中的日期转换为SQL Server中的日期

将asp.net与SQL Server嵌入以读取数据并更改文本框字段

如何通过存储过程在文本框中显示来自 SQL Server 的记录

仅当字段为空时,SQL Server报表构建器才会显示文本框

SQL Server:具有文本框值的数据库连接

将数据从SQL Server Compact 4.0检索到文本框

将数据从文本框保存到SQL Server表时出错

从 sql server 表加载数据并使用 dapper 填充文本框

SQL Server:删除列@variable无法正常工作

VS2010:C#:无法从VS工具箱中找到输入文本组件(以键入文本)

无法将C#SQL CLR数据库项目从Visual Studio 2010部署到SQL Server 2014

SQL到文本框

无法安装 Team Foundation Server 2010