ايران ويج

نسخه‌ی کامل: یه کد نوشتم جواب نمی دهد کسی می دونه مشکلش چیه؟
شما در حال مشاهده‌ی نسخه‌ی متنی این صفحه می‌باشید. مشاهده‌ی نسخه‌ی کامل با قالب بندی مناسب.
سلام
من یه فرم جستجو کتاب دارم که توش کتاب مورد نظرم رو جستجو می کنم وبعد تعداد درخواستی از کتاب رو وارد می کنم و با کلیک روی یک دکمه اون رو به سبد خرید اضافه می کنم شما فرض کنید 5 تا ویژوال بیسیک با 2 تا دلفی می خوام
حالا تو سبد خرید وقتی رو دکمه پرداخت کلیک می کنم باید تعداد درخواستی از هر کتاب از تعداد کلی اون کتاب در جدول کتاب ها کم شود
پایگاه داده ام sql server
این کد رو نوشتم جواب نمی دهد کسی میتونه به من کمک کنه؟؟؟
یا اگر شما روش دیگه ای بلدید بهم بگید!

Dim b As String
Dim a As Integer
While ado.Recordset.EOF = False
b = ado.Recordset!Name
a = ado.Recordset!Tedad Darkhadti
Adodc1.RecordSource = "SELECT * FROM books where
";('"+name='" + b)
Adodc1.Refresh
Adodc1.Recordset.Fields("tedad") = Adodc1.Recordset.Fields("tedad") - a
Adodc1.Recordset.Update
ado.Recordset.MoveNext
Wend