help

[mjesus20]

tengo la siguiente instruccion

Dim iddeinventario As Integer = CType(e.Item.Cells(2).Controls(0), TextBox).Text

pero al momento de ejecutarlo me arroga un error de conversion me dice que idinventario es de tipo int32 alguien me podria decir donde esta el error ya que las otras lineas por ejemplo las tengo de la siguiente forma

Dim item As String = CType(e.Item.Cells(3).Controls(0), TextBox).Text

y me funcionan perfectamente pero cuando agrego esa me deja de funcionar.

[popopo]

hace asi

Dim iddeinventario As Int32 = val(CType(e.Item.Cells(2).Controls(0), TextBox).Text)

o

Dim iddeinventario As Integer = convert.int32(val(CType(e.Item.Cells(2).Controls(0 ), TextBox).Text))

[Jose_minglein2]

Prueba a poner:

Asegurate de que:
e.Item.Cells(2).Controls(0)
es un textbox

y asegurate de que (si sí lo es) en dicho textbox estás escribiendo un número, puedes hacerlo ejecutando paso a paso, o haciendo esto:

Dim iddeinventario As Integer
try
CType(e.Item.Cells(2).Controls(0), TextBox)
try
iddeinventario= CType(e.Item.Cells(2).Controls(0), TextBox).Text
Catch ex2 As Exception
REsponse.write("No has introducido un número en el campo")
end try
Catch ex As Exception
Response.write("Eso no es un textbox")
end try

[mjesus20]

ok gracias

[RootK]

Solo para evitar el try catch y hacerlo mas limpio podría ser así:

Dim iddeinventario As Integer

If e.Item.Cells(2).Controls(0).GetType.Name.ToLower = "textbox" Then
Dim sValue As String = CType(CType(e.Item.Cells(2).Controls(0), TextBox).Text
sValue = IIf(IsNumeric(sValue), sValue, 0)
iddeinventario = CType(sValue,Integer)
Else
Response.write("Eso no es un textbox")
End If

Pero en fin... como siempre lo hemos dicho.. cada quien lo puede hacer como mejor lo crea conveniente

Salu2