Ver Mensaje Individual
  #17 (permalink)  
Antiguo 27/04/2005, 10:24
Avatar de ahoshy
ahoshy
 
Fecha de Ingreso: abril-2005
Mensajes: 17
Antigüedad: 21 años, 5 meses
Puntos: 0
Código PHP:

Private Sub btnAgregar_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnAgregar.Click

Dim col 
As DataColumn = temp.Columns.Add("CLAVE", Type.GetType("System.String"))
Dim col2 As DataColumn = temp.Columns.Add("DESCRIPCION", Type.GetType("System.String"))
Dim i1 As Integer = 0 

Dim i 
As Integer
Dim o 
As Integer
 
col
.AllowDBNull = False
col
.Unique = False
col2
.AllowDBNull = False
col2
.Unique = False
 
If ViewState("ban") = 1 Then
recupera
()
End If
 
For 
i1 = 0 To dgProductos.Items.Count - 1
If CType(dgProductos.Items(i1).Cells(0).Controls.Item(1), CheckBox).Checked Then
Try
o = dgCompra.Items.Count
dgCompra
.DataSource = temp
dgCompra
.DataBind()
Dim fila As DataRow = temp.NewRow
fila
(0) = dgProductos.Items(i).Cells(1).Text '***En esta parte ya intente 
fila(1) = dgProductos.Items(i).Cells(2).Text '
***poner la fila en la que se 
temp
.Rows.Add(fila)                                                    '***quedo. y marca la columna 1
                                                                                                '
***no existe. Pero al Pasar por  primera vez si ***funciona adecuadamente el probelma es cuando le quiero  agregar la filas despues de un postback.
Catch 
IOExcep As System.IO.IOException
 
End 
Try
End If
Next
 
Response
.Write(temp)
dgCompra.DataSource = temp
dgCompra
.DataBind()
btnEnviar.Visible = True
End Sub 
estos son los procedimientos que tengo para guardar y recuperar el valor del date table antes y despues del postback.
Código PHP:
Private Sub guarda_Sesion() '***Guarda el contenido de mi datatable con el 
Dim dt As DataTable            '
***que lleno el grid   
ViewState
("dt") = temp 
End Sub
Private Sub recupera()        '***Recupero el valor guardado

temp = CType(ViewState("dt"), DataTable)
'
dgCompra.DataSource = temp
'dgCompra.DataBind()        '****Aqui si lo tato de llenar me marca error.
End Sub 

El problema sigue en lo mismo necesito añadir registros de DataGrid a otro depues de seleccionar en un DropDownlist, necesito hacer un drop con todos los productos seleccionados para posteriormente imprimirlo. Si alguien por favor puede ayudarnos. Muchas gracias y un saludo a todo el foro.
__________________
Muchos hombres habrían sido sabios si no hubieran creído demasiado pronto que ya lo eran. El autógrafo más digno de un hombre es aquel que deja grabado con sus obras.