Consulta parametrizada

en tu instrucción Select debes utilizar el parametro como "?", es decir

dsHorario = New DataSet()
da = New OleDb.OleDbDataAdapter("Select tipo_periodo, num_periodo From
horario Where tipo_periodo = ?", cadenaConexion)
Dim myParam As OleDb.OleDbParameter = da.SelectCommand.Parameters.Add(New
OleDb.OleDbParameter("TipoPeriodo", OleDbType.TinyInt, 1))
myParam.Value = vtp
da.Fill(dsHorario)


Saludos
Carlos Durán


"Solitario" escribió en el mensaje
news:

Por que me manda este error:

Must declare the variable '@tp'.

En la siguiente consulta:
dsHorario = New DataSet()
da = New OleDb.OleDbDataAdapter("Select tipo_periodo, num_periodo From
horario Where tipo_periodo = @tp ", cadenaConexion)
Dim myParam As OleDb.OleDbParameter = da.SelectCommand.Parameters.Add(New
OleDb.OleDbParameter("@tp", OleDbType.TinyInt, 1))
myParam.Value = vtp
da.Fill(dsHorario)

Si se supone que lo estoy declarando con add