Hola, cómo les va?, yo pidiendo ayuda.....programé un botón Vender, y no funciona pero tampoco me da Error....
Debiera cargar Por cada linea de Grid View, un registro en Base de datos access..
Hay un objeto dateTimePicker.....
Dejo Bloque de código por si Ustedes pueden encontrar el problema y me ayudan...
Agradezco muchísimo, disculpen las molestias....
Debiera cargar Por cada linea de Grid View, un registro en Base de datos access..
Hay un objeto dateTimePicker.....
Dejo Bloque de código por si Ustedes pueden encontrar el problema y me ayudan...
Agradezco muchísimo, disculpen las molestias....
Código (cpp) [Seleccionar]
private: System::Void buttonVender_Click(System::Object^ sender, System::EventArgs^ e) {
OleDbConnection^ connection = gcnew OleDbConnection("Provider=Microsoft.ACE.OLEDB.12.0;Data Source=C:\\Users\\Guillermo\\Documents\\Visual Studio 2008\\Projects\\VtaInsumosPc\\VaInsumosPc.accdb;");
OleDbCommand^ command = connection->CreateCommand();
command->CommandText = "INSERT INTO Venta (Id_Usu, Id_Prod, Fecha, Descripción, Precio, Cantidad, Total) VALUES (@Id_Usu, @Id_Prod, @Fecha, @Descrip, @Precio, @Cantidad, @Total)";
for each (DataGridViewRow^ row in dataGridView1->Rows)
{
command->Parameters->Clear();
command->Parameters->AddWithValue("@Id_Usu", Convert::ToInt32(row->Cells["Vend"]->Value));
command->Parameters->AddWithValue("@Id_Prod", Convert::ToInt32(row->Cells["CódProd"]->Value));
command->Parameters->AddWithValue("@Fecha", dateTimePicker1->Value);
command->Parameters->AddWithValue("@Descrip", Convert::ToString(row->Cells["Descripción"]->Value));
command->Parameters->AddWithValue("@Precio", Convert::ToInt32(row->Cells["Precio"]->Value));
command->Parameters->AddWithValue("@Cantidad", Convert::ToInt32(row->Cells["Cantidad"]->Value));
command->Parameters->AddWithValue("@Total", Convert::ToInt32(row->Cells["Total"]->Value));
connection->Open();
command->ExecuteNonQuery();
connection->Close();
MessageBox::Show("Venta registrada con éxito...");
}