asignar dato a datarow

[arcus]

saludos:

el problema q tengo es que quiero asignar un dato a un datarow de la siguiente manera

mydatarow(0)= textbox1.text

pero solo me funciona cuando le asigno un dato inmediatamente y no cuando lo paso por variable como en el ejemplo anterior,, es decir solo me funciona de esta manera:

mydatarow(0)="hola"

q puedo hacer??

[HenrydeSousa]

prueba con mydatarow.item(0)= textbox1.text

[arcus]

saludos:

no pasa nada

gracias de todos modos

[HenrydeSousa]

Aca te dejo un ejemplo de como cargo una fila con variables.

Public Function CrearDatosEquipo(ByVal ID_Equipo As String, _
ByVal Descripcion As String, _
ByVal ID_Usuario As String, _
ByVal Fecha As DateTime, _
ByRef Ds As DatosEquipos) As Boolean
Dim fila As DataRow
Dim resul As Boolean
Dim oReglas As New Reglas.Reglas(DatosEquipos.TABLA_EQUIPOS, NomBd)
'
' Crea una fila nueva
'
Ds = New DatosEquipos
fila = Ds.Tables(DatosEquipos.TABLA_EQUIPOS).NewRow
'
' Cargamos la fila con los datos nuevos
'
With fila
.Item(Ds.CAMPO_CID_EQUIPO) = ID_Equipo
.Item(Ds.CAMPO_CDESCRIPCI) = Descripcion
.Item(Ds.CAMPO_CID_USUARI) = ID_Usuario
.Item(Ds.CAMPO_DFECHA_ACT) = Fecha
End With
'
' agregamos la fila a la tabla
'
Ds.Tables(DatosEquipos.TABLA_EQUIPOS).Rows.Add(fil a)
'
' inserta el equipo en el dataset usando las reglas
'
With New Reglas.Reglas(DatosEquipos.TABLA_EQUIPOS, NomBd)
Try
resul = .Insertar(CType(Ds, DataSet))
If resul = False Then
Pexcep = .DevolverErrorReglas
End If
Catch ex As Exception
MsgBox(ex.Message)
End Try
End With
Return resul
End Function

Espero te sirva.

[arcus]

saludos:

gracias por tu respuesta, pero mi problema es otro

este es el codigo de aspx

Private Sub Page_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load

Dim actualiza As Prueba.manipUserDB = New Prueba.manipUserDB()
Dim Id As String = Request.Cookies("nombre").Value
ds = actualiza.getDetallesUsuario(Id)

TextBox4.Text = ds.Tables(0).Rows.Item(0).Item(0)
TextBox3.Text = ds.Tables(0).Rows.Item(0).Item(1)



End Sub

e el de la funcion de la clase manipUserDB es:

Public Function updateUser(ByVal cad As String, ByVal cade As String, ByVal dss As DataSet) As String
conectar()
Dim da As New SqlDataAdapter()
da.UpdateCommand = New SqlCommand("Update ib_usuarios set email= @mail ", conn)




da.UpdateCommand.Parameters.Add("@mail", SqlDbType.Char, 70, "email")



Dim fila As DataRow = dss.Tables(0).Rows(0)



fila(1) = cade



da.Update(dss, "tabla0")
Return cade

End Function

too funciona bien si asigno directamente a la fila de esta manera fila(1)= "cualquiercosa"
pero por lo probado me di cuenta q el conflicto lo hacia los textbox del aspx en los cuales mostraba datos del dataset,,ya q al eliminarlos del codigo todo fuinciona bien,,,pero por otra parte necesito q muestre los datos,,es necesario,,, asi q no se q hacer

gracias

[Maurishio]

es lo que necesitaba gracias.