Ver Mensaje Individual
  #1 (permalink)  
Antiguo 06/06/2008, 01:07
Busy
 
Fecha de Ingreso: mayo-2008
Mensajes: 24
Antigüedad: 16 años, 10 meses
Puntos: 0
Error "El objeto debe implementar IConvertible"

Hola!

Necesito guardar datos en una BD de SQL 2000 de tipo nvarchar, char, image e int pero no encuentro la manera de conseguirlo. Después de solucionar varios errores, me encuentro atascado con error Iconvertible, exactamente...

"El objeto debe implementar IConvertible"

Éste es el código del procedimiento:

...

Implements IConvertible

...

Private Sub Button5_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button5.Click

' Creo una nueva conexion SQL y le asigno la cadena de conexion
Dim SQLCnn As New SqlConnection(sCnn)

' Creo el comando a llevar a cabo (insertar en la tabla)
Dim SQLCmm As New SqlCommand

With SQLCmm

SQLCmm.Connection = SQLCnn

If .Parameters.Count = 0 Then
.CommandText = "INSERT INTO USO_VEHICULOS VALUES(@PEN_ID, @PEN_FECHA, @PEN_MAIL, @PEN_USUARIO, @DATO_IDA, @DATO_VUELTA, @DATO_USERID, @DATO_COMPI, @DATO_VEHICULO, @DATO_SOLRED, @DATO_VIAT, @DATO_FIRMA, @DATO_DESTINO, @DATO_OBSERVACIONES, @DATO_PGC)"
.Parameters.Add("@PEN_ID", System.Data.SqlDbType.NVarChar, 16)
.Parameters.Add("@PEN_FECHA", System.Data.SqlDbType.NVarChar, 16)
.Parameters.Add("@PEN_MAIL", System.Data.SqlDbType.NVarChar, 150)
.Parameters.Add("@PEN_USUARIO", System.Data.SqlDbType.Char, 25)
.Parameters.Add("@DATO_IDA", System.Data.SqlDbType.Image)
.Parameters.Add("@DATO_VUELTA", System.Data.SqlDbType.Image)
.Parameters.Add("@DATO_USERID", System.Data.SqlDbType.Int, 4)
.Parameters.Add("@DATO_COMPI", System.Data.SqlDbType.NVarChar, 9)
.Parameters.Add("@DATO_VEHICULO", System.Data.SqlDbType.Int, 4)
.Parameters.Add("@DATO_SOLRED", System.Data.SqlDbType.NVarChar, 1)
.Parameters.Add("@DATO_VIAT", System.Data.SqlDbType.NVarChar, 1)
.Parameters.Add("@DATO_FIRMA", System.Data.SqlDbType.Image)
.Parameters.Add("@DATO_DESTINO", System.Data.SqlDbType.Image)
.Parameters.Add("@DATO_OBSERVACIONES", System.Data.SqlDbType.Image)
.Parameters.Add("@DATO_PGC", System.Data.SqlDbType.NVarChar, 150)
End If
.Parameters("@PEN_ID").Value = pen_id.Text
.Parameters("@PEN_FECHA").Value = pen_fecha.Text
.Parameters("@PEN_MAIL").Value = pen_fecha.Text
.Parameters("@PEN_USUARIO").Value = pen_usuario.Text
.Parameters("@DATO_IDA").Value = dato_ida
.Parameters("@DATO_VUELTA").Value = dato_vuelta
.Parameters("@DATO_USERID").Value = var_userid.Text
.Parameters("@DATO_COMPI").Value = array_compi.Text
.Parameters("@DATO_VEHICULO").Value = var_vehiculo.Text
.Parameters("@DATO_SOLRED").Value = var_solred.Text
.Parameters("@DATO_VIAT").Value = var_viat.Text
.Parameters("@DATO_FIRMA").Value = dato_firma
.Parameters("@DATO_DESTINO").Value = dato_destino
.Parameters("@DATO_OBSERVACIONES").Value = dato_observaciones
.Parameters("@DATO_PGC").Value = dato_pgc.Text
SQLCnn.Open()
.ExecuteNonQuery()
SQLCnn.Close()

End With
End Sub


Al añadir el "Implements IConvertible" me crea varios procedimientos de conversión que están sin rellenar y que tampoco se si hay que rellenarlos. Alguien podría ayudarme a solucionar este problema? Me estoy desesperando.

Un saludo y gracias.