` | `ParamArray` bindValues() As `Variant` | `RowSet` | | ## Method descriptions

---------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------

forsearch

OracleSQLPreparedStatement.Bind **Bind**(index As `Integer`, value As `Variant`) Binds a value and its type for the prepared statement. Use `Database.Prepare` to set up the bind. This example creates a SQLite prepared statement to retrieve data from a *Customers* table. It then displays the data in a Listbox: ``` xojo Var stmt As SQLitePreparedStatement ' note in a prepared statement you DO NOT put in the quotes stmt = SQLitePreparedStatement(db.Prepare("SELECT * FROM Customers WHERE FirstName like ? ")) ' have to tell sqlite what types the items being bound are so it does the right thing stmt.BindType(0, SQLitePreparedStatement.SQLITE_TEXT) stmt.Bind(0, TextField1.Text) ' perform the search Var rs As RowSet = stmt.SQLSelect ListBox1.RemoveAllRows ListBox1.ColumnCount = rs.ColumnCount ListBox1.HasHeader = True Var hasHeadings As Boolean While rs.AfterLastRow <> True ListBox1.AddRow("") For i As Integer = 0 To rs.ColumnCount-1 If Not hasHeadings Then ListBox1.HeaderAt(i) = rs.ColumnAt(i+1).Name ListBox1.CellTextAt(ListBox1.LastAddedRowIndex, i) = rs.ColumnAt(i+1).StringValue Next rs.MoveToNextRow hasHeadings = True Wend ```

forsearch

OracleSQLPreparedStatement.BindType **BindType**(index As `Integer`, type As `Integer`) Specify types for multiple bind values. Each Database plug-in will have its own values.

forsearch

OracleSQLPreparedStatement.ExecuteSQL **ExecuteSQL**(`ParamArray` bindValues() As `Variant`) Same as SelectSQL but does not return a result set. Executes and returns the result set of the prepared statement. BindValues is optional and is intended for convenience only. If bindValues is not empty, ExecuteSQL will use the passed in values instead of the ones specified by calling Bind.

forsearch

OracleSQLPreparedStatement.SelectSQL **SelectSQL**(`ParamArray` bindValues() As `Variant`) As `RowSet` Executes and returns the result set of the prepared statement. The bindValues parameter is optional and is intended for convenience only. If bindValues is not empty SelectSQL will use the passed in values instead of the ones specified by calling Bind. ## Interfaces **OracleSQLPreparedStatement** implements the `PreparedSQLStatement` interface. ## Notes

Note

The use of the prepared statement classes is rare because `Database.SelectSQL` and `Database.ExecuteSQL` utilize them automatically. See `PreparedSQLStatement` for information on cases where using prepared statement classes is appropriate.

Oracle prepared statements use the leading colons as markers in the prepared statement, i.e.: ``` SQL SELECT * FROM Persons WHERE Name = :name ``` All parameters must have their type specified. These are the constants to use with the BindType method: | Constant | |------------------| | SQL_TYPE_CLOB | | SQL_TYPE_DATE | | SQL_TYPE_FLOAT | | SQL_TYPE_INTEGER | | SQL_TYPE_NULL | | SQL_TYPE_STRING | ## Sample code This code shows how to use database binding. ``` xojo ' "db" is an OracleDatabase object Var ps As OracleSQLPreparedStatement ps = OracleSQLPreparedStatement(db.Prepare("SELECT * FROM Persons WHERE Name = :name AND Age >= :age")) ps.BindType(0, OracleSQLPreparedStatement.SQL_TYPE_STRING) ps.BindType(1, OracleSQLPreparedStatement.SQL_TYPE_INTEGER) ps.Bind(0, "John") ps.Bind(1, 20) Try Var rs As RecordSet = ps.SelectSQL ' Use RecordSet as usual Catch error As DatabaseException MessageBox(db.ErrorMessage) Return End Try ``` ## Compatibility All project types on all supported operating systems. ## See also `Object` parent class; `Database`, `OracleDatabase`, `PreparedSQLStatement` classes.