كم كردن مقدار يك فيلد {كسر موجودي انبار}

[ehsanocx]

سلام.
چطوری می تونم مثلا 1000 تا جعبه توی انبار دارم. می خوام هر چند تا از این جعبه ها فروش رفت و ثبت شد . تعداد فروش رفته از تعداد کل که توی انبار کم بشه و توی text یا Label مقدار باقیمانده رو نشون بده. کسی می تونه راهنماییم کنه ؟
ممنون

[majjjj]

چرا نمیشه؟
شما یک فیلد اضافه کن و هربار که یک محصول فروش جلوی بارکد اون محصول یک تیک بزار و در نهایت
تعداد کل رو از تعدادی که تیک دارن کم کن

[ehsanocx]

من به کد نیاز دارم

[irprogramming]

دوستان بنده هم به این کد نیاز دارم لطفا راهنمایی کنید.

[ehsanocx]

کسی راهنمایی نمی کنه؟:(

[irprogramming]

من تا یک جاهایی پیش رفتم ولی نمیدونم چرا تو دیتا بیس اعمال نمیشه:

Dim a As Integer
Private Sub update_Click()
a = a - Form1.Text1.Text
adodc1.Recordset.update
adodc1.Recordset.filds!Meghdar = a
adodc1.Refresh
End Sub

[noorsoft]

من تا یک جاهایی پیش رفتم ولی نمیدونم چرا تو دیتا بیس اعمال نمیشه:

Dim a As Integer
Private Sub update_Click()
a = a - Form1.Text1.Text
adodc1.Recordset.update
adodc1.Recordset.filds!Meghdar = a
adodc1.Refresh
End Sub


باید اینجوری استفاده کنی



a=a-val(form1.text1.text
adodc1.recordset("meghdar")=a
adodc1.recordset.update


البته یک راه بهتر هم وجود داره که دیگه لازم نیست در دیتابیس خودت مقدارها را کم کنی چون اگه در برنامه شما کسی وارد دیتابیس بشه و این مقدارها را تغییر بده آمارهای شما همه بهم می خورن
راه بهتر استفاده از دستورات Sql برای بدست آوردن تعداد است

[irprogramming]

دوست عزیز اگر یک زحمتی بکشی کدSQL هم بزاری ازت ممنون میشم؟

[irprogramming]

دوست عزیز چه شد نمیزارید کد رو؟

[ehsanocx]

هیچکی بلد نیست:)؟ من به این سورس خیلی نیاز دارم

[irprogramming]

هیچکی بلد نیست:)؟ من به این سورس خیلی نیاز دارم

دوست عزیز ما طبق دیتا بیس در بالا توضیح دادیم الان منتظر دستورSQLهستیم که ذوستمون بزاره.

[majjjj]

SELECT COUNT(TEDAD) FROM TABLE1 WHERE شرایط
اگه امنیت برنامه براتون مهمه از SQL SERVER استفاده نمایید
اگر چه هیچ وقت امنیت مطلق نیست