OleDbCommand的参数如何加？

Question

对的！
不过你也可以用@field来占位 好记忆
我在access下试过
?和@都可以的
但书占位符的顺序一定要对应

Answer 1

Public Function GetKosyou(ByVal kosyouValue As String) As String
        Dim ConnectionString As String
        Dim kosyouAdapter As OracleDataAdapter
        Dim kosyouConnection As OracleConnection
        Dim kosyouDataSet As DataSet
        Dim kosyouCommand As OracleCommand
        Dim kosyouSelect As String        ConnectionString = ConfigurationSettings.AppSettings("ConnectionString")
        kosyouSelect = "select distinct 呼称名 from TB呼称 where 標準名=:standName"
        kosyouConnection = New OracleConnection
        kosyouDataSet = New DataSet
        kosyouConnection = New OracleConnection
        kosyouAdapter = New OracleDataAdapter
        kosyouCommand = New OracleCommand(kosyouSelect)        kosyouConnection.ConnectionString = ConnectionString
        kosyouCommand.Connection = kosyouConnection
        kosyouCommand.Parameters.Add(":standName", OracleType.VarChar, 10)
        kosyouCommand.Parameters(":standName").Value = CType(kosyouValue, String)        Try
            kosyouAdapter.SelectCommand = kosyouCommand
            kosyouAdapter.Fill(kosyouDataSet)
            Return RTrim(kosyouDataSet.Tables(0).Rows(0)(0).ToString())
        Catch ex As Exception
            Return String.Empty
        Finally
            kosyouDataSet.Dispose()
        End Try
    End Function