البحث في الموقع
Showing results for tags 'shivan rekany'.
تم العثور علي 1 نتيجه
-
زيادة الكمية عند ادخال نفس الصنف في الفاتورة لقيت االكود المطلوب لكم مش عارف اطبقة بصراحة في كود اسهل من دا او طريقة اخري واكون شاكر لكم ودا الكود اللي لقيتة ومرفق لكم ايضا قاعدة البيانات المراد التطبيق عليها Private Sub Form_BeforeUpdate(Cancel As Integer) Dim sql As String If DCount("[ItemID]", "[InvoiceDetails Table]", "[InvoiceID]=" & Me.InvoiceID & "and [ItemID]=" & Me.ItemID) > 0 Then sql = "UPDATE [InvoiceDetails Table] SET [InvoiceDetails Table].Quantity = [InvoiceDetails Table]![Quantity]+[Forms]![Invoice Table]![InvoiceDetails Table Subform].[Form]![Quantity] WHERE ((([InvoiceDetails Table].InvoiceID)=[Forms]![Invoice Table]![InvoiceDetails Table Subform].[Form]![InvoiceID]) AND (([InvoiceDetails Table].ItemID)=[Forms]![Invoice Table]![InvoiceDetails Table Subform].[Form]![ItemID]));" DoCmd.SetWarnings (warningsoff) DoCmd.RunSQL (sql) Me.Undo DoCmd.SetWarnings (warningson) End If End Sub تجربة.rar ودا رابط الموضوع
