将文本框值插入Oracle DB

LuckyLuke82 发表于 Dev

幸运卢克82

我从未在VB.NET中向Oracle完成INSERT语句，所以我需要一些帮助。执行任何操作后，我的代码不起作用-没有错误，也没有插入。这是什么问题，或者我在这里想念什么？（Field1和Field2只是表字段，而不是主键）。

Imports System.Data
Imports Oracle.DataAccess.Client ' ODP.NET Oracle managed provider
Imports Oracle.DataAccess.Types

Public Class Save_Records 

      Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click

     Const conn As String = "Data Source=MyDB;User Id=Lucky;Password=MyPassword;"

        Using cn As New OracleConnection(conn)

            cn.Open()

            Using cmd As New OracleCommand()
                cmd.CommandText = "INSERT into MyTable (Field1,Field2) values('" & TxtField1.Text & "','" & TxtField2.Text & "')"
                cmd.ExecuteNonQuery()

            End Using

        End Using

      End Sub

End Class

安德鲁·莫蒂默（Andrew Mortimer）

此方法是如何插入Oracle的起点

Private Function insertRow(connectionString As String) As Boolean

    Using cn As OracleConnection = New OracleConnection(connectionString)

        cn.Open()

        Using cmd As OracleCommand = New OracleCommand()

            Const sql As String = "Insert into test_table (val1, val2) values (:var1, :var2)"
            cmd.Connection = cn
            cmd.Parameters.Add(New OracleParameter("var1", TxtField1.Text))
            cmd.Parameters.Add(New OracleParameter("var2", TxtField2.Text))
            cmd.CommandText = sql
            cmd.ExecuteNonQuery()

        End Using

    End Using

End Function