Codigo Correcto para CargarParametros

[blackshadow]

señores buen dia tengo este procedimiento de un viejo curso de Vb net de
Daniel Seara con una famosa clase gDatos y una que la hereda llamada
DatosSQLServer el caso es que este codigo segun indica Daniel Seara en su
link esta errado y eh estado tratando de
buscar el codigo corregido pero no le encuentro por ningun lado, talvez algun
de ustedes lo tenga entre sus librerias, agradeceria me pudieran ayudar con
esto ya que tengo un proyecto en el que me gustaria usar esta libreria...

Gracias

Protected Overrides Sub CargarParametros(ByVal Comando As
System.Data.IDbCommand, ByVal Args() As Object)
Dim i As Integer
With Comando
For i = 0 To Args.GetUpperBound(0)
.Parameters(i + 1).Value = Args(i)
Next
End With
End Sub