Ver Mensaje Individual
  #1 (permalink)  
Antiguo 23/04/2009, 11:11
estlui
 
Fecha de Ingreso: noviembre-2003
Mensajes: 209
Antigüedad: 21 años, 2 meses
Puntos: 0
Variable session a DB

Buenas, gracias por toda la ayuda que me otorgan...

Tengo una especie de carrito de compras, la diferencia es que el usuario captura en unos textbox lo que requiere, mas bien es una orden de compra .....

Con la ayuda de este foro me recomendaron usar variables de session para ir mostrando en un gridview lo que el usuario va capturando (como partidas en un formato), lo que no se como hacer es: como enviar a una tabla de la base de datos todo el contenido de la variables de session, puede ser desde una fila hasta N filas, para que se guarde la informacion de lo que esta requiriendo.


Esta es mi funcion para crear el carrito:

Código:
Function carrito()
        objDT = New System.Data.DataTable("myCarrito")
        'objDT.Columns.Add("ID", GetType(Integer))
        'objDT.Columns("ID").AutoIncrement = True
        'objDT.Columns("ID").AutoIncrementSeed = 1
        objDT.Columns.Add("numero_carrito", GetType(String))
        objDT.Columns.Add("descripcion", GetType(String))
        objDT.Columns.Add("unidad_medida", GetType(String))
        objDT.Columns.Add("cantidad", GetType(Integer))
        objDT.Columns.Add("precio_unitario", GetType(Double))
        objDT.Columns.Add("total_mx", GetType(Double))
        objDT.Columns.Add("total_us", GetType(Double))
        objDT.Columns.Add("centro_costos", GetType(String))
        objDT.Columns.Add("cuenta_gl", GetType(String))
        objDT.Columns.Add("cuenta", GetType(String))
        Session("myCarrito") = objDT
    End Function
Y este es mi codigo para ir agregando al datatable lo que el usuario requiere:

Código:
Protected Sub btn_agregar_Click(ByVal sender As Object, ByVal e As System.Web.UI.ImageClickEventArgs) Handles btn_agregar.Click
        objDT = Session("myCarrito")
        objDR = objDT.NewRow
        objDR("numero_carrito") = Me.lb_carrito.Text
        objDR("descripcion") = Me.tb_desc.Text
        objDR("unidad_medida") = Me.ddl_unidad.SelectedValue
        objDR("cantidad") = Me.tb_cantidad.Text
        objDR("precio_unitario") = Decimal.Parse(Me.tb_precio.Text)
        objDR("total_mx") = Decimal.Parse(Me.lb_totalMX.Text)
        objDR("total_us") = Decimal.Parse(Me.lb_totalUS.Text)
        objDR("centro_costos") = Me.ddl_centrocostos.SelectedValue
        objDR("cuenta_gl") = Me.ddl_cuentaGL.SelectedValue
        objDR("cuenta") = Me.lb_cuenta.Text
        objDT.Rows.Add(objDR)
        Session("myCarrito") = objDT
        Me.GV_carrito.DataSource = objDT
        Me.GV_carrito.DataBind()
        Me.lb_ODC_pesos.Text = "$" & total_mx()
        Me.lb_ODC_dolares.Text = "$" & total_dlls()
        Me.tb_desc.Text = ""
        Me.ddl_unidad.SelectedIndex = 0
        Me.tb_cantidad.Text = ""
        Me.tb_precio.Text = ""
        Me.lb_totalMX.Text = ""
        Me.lb_totalUS.Text = ""
        Me.ddl_centrocostos.SelectedIndex = 0
        Me.ddl_cuentaGL.SelectedIndex = 0
        Me.tb_desc.Focus()
    End Sub

Muchisimas gracias a todos!!!