Ver Mensaje Individual
  #36 (permalink)  
Antiguo 04/05/2011, 15:58
guillebomtrasmiti
 
Fecha de Ingreso: noviembre-2010
Ubicación: madrid
Mensajes: 478
Antigüedad: 14 años, 1 mes
Puntos: 5
Respuesta: suma la cantidad solo 1º celda

ARREGLADO AMIGO PONGO EL CÓDIGO PARA QUIEN LE SIRVA

Dim adapt As New OleDbDataAdapter
Dim setda As New DataSet
Dim com = conexion.CreateCommand

com.CommandType = CommandType.Text
com.CommandText = "UPDATE IntroduccionDeVentasAhora SET Pts =ROUND (Pts / (" & TxtPorcentaje.Text & "/100),2) where NombreFormaPago <> ('TARJETA CREDITO') and Fecha BETWEEN @FI AND @FF"
'Where NombreFormaPago <> ('TARJETA CREDITO')"
'com.Parameters.AddWithValue("@Pts", DgTotales.Columns.Item("Pts").Index.ToString)
com.Parameters.AddWithValue("@FI", Fecha1.Value.Date.ToString("dd/MM/yyyy"))
com.Parameters.AddWithValue("@FF", Fecha2.Value.Date.ToString("dd/MM/yyyy"))
'For Each row As DataGridViewRow In DgTotales.Rows
'com.Parameters.AddWithValue("@Pts", row.Cells(2).Value)
' Next
adapt.SelectCommand = com

conexion.Open()
com.ExecuteNonQuery()
'Convert.ToDecimal(CInt(com.ExecuteNonQuery()))
DgTotales.Rows.Remove(DgTotales.CurrentRow)
conexion.Close()

JAJAJAJAJAJA ARREGLADO..SUPER AQUAAAAAAAAAA TE QUIEROOOOO