[firebase-br] ASP.NET - Firebird

[Alexandre Murta]

 estou criando uma classe para manutencao de dados e estou com o seguinte
codigo, mas esta dando erro na linha do ExecuteNonQuery,

achei que era problema de tipo de parametro, entao tirei todos parametros da
query, mas continua dando erro na execucao.




Public Sub ManutencaoDados(ByVal sProcedure As String, ByVal vParametros()
As FirebirdSql.Data.FirebirdClient.FbParameter)
Dim pParametro As FirebirdSql.Data.FirebirdClient.FbParameter
Dim cmdComando As New FirebirdSql.Data.FirebirdClient.FbCommand
Dim banco As New FirebirdSql.Data.FirebirdClient.FbConnection

banco.ConnectionString =
"User=SYSDBA;Password=masterkey;Database=basedados;DataSource=localhost;Port=3050;Dialect=3;"

banco.Open()

cmdComando.Connection = banco

cmdComando.CommandType = Data.CommandType.StoredProcedure

cmdComando.CommandText = "EXECUTE PROCEDURE" & sProcedure

cmdComando.Parameters.Clear()

If Not IsNothing(vParametros) Then

For Each pParametro In vParametros

cmdComando.Parameters.Add(pParametro)

Next

End If

cmdComando.ExecuteNonQuery()

banco.Close()

End Sub