PDA

View Full Version : ثبت شماره سریالهای چک



reza_1199
پنج شنبه 03 بهمن 1392, 10:25 صبح
با عرض سلام خدمت دوستان و مدیران سایت و خسته نباشید
از مدیران و اساتید محترم سوالی دارم که در صورت جواب دادن ممنون میشم من اگر بخوام شماره سریالهای یک دسته چک ( 100 برگی ) رو ثبت کنم و بعد از تمام شدن این دسته چک دسته چک جدید رو که میگیری باز بشه ثبت کرد چیکار باید کنم یعنی باید 100 تا فیلد تعریف کنم اگر دوستان ایده یا فکری به نظرشون میرسه بگن ممنون میشم

mehran6764
پنج شنبه 03 بهمن 1392, 11:05 صبح
http://up.p30parsi.com/out.php/i192012_cheak.jpg (http://up.p30parsi.com)

reza_1199
پنج شنبه 03 بهمن 1392, 13:19 عصر
دوست عزیز جناب آقای مهران من چیزی از این عکس نفهمیدم میشه واضح تر بیان کنید ممنون

mehran6764
پنج شنبه 03 بهمن 1392, 16:15 عصر
دوست عزیز جناب آقای مهران من چیزی از این عکس نفهمیدم میشه واضح تر بیان کنید ممنون

چشم ! من به جاي اينكه بيام صد فيلد تعريف كنم دو فيلد تعريف كردم
يك فيلد براي دسته چك هايي كه هست
و فليد ديگر براي شماره برگه ها مثلا" تو جدول بالا دسته چك 1 برگه هاي 1001 ، 1002 و 1003 رو داره ..

hasanhzd
پنج شنبه 03 بهمن 1392, 18:51 عصر
درود
اگه میخواهید دستی وارد کنید که جدول رو پر کنید کارتون درسته
وگرنه باید حلقه بنویسید و رکورد هارو اضافه کنید فکر کنم مشکلتون اینجاست که نمیخواهید دونه دونه واردکنید درسته؟

reza_1199
پنج شنبه 03 بهمن 1392, 22:13 عصر
دوست عزیز آفرین به هوشتون درست اشاره کردی به اون نقطه حساس ولی موندم چیکار کنم اگر بتونی کمک کنی ممنون میشم

hasanhzd
جمعه 04 بهمن 1392, 11:14 صبح
درود
متن زیررو از help اکسس کپی کردم . چیزیه که به کارت میاد
فقط باید 3 تا باکس رو فرمت بزاری

box1 که باید بهش مقدار کمترین شماره چک روبدی
box2 هم بیشترین مقدار شماره چک هست
box3 شماره دسته چک هست که یه مقدار بهش میدی
یه کوئری هم بساز که در هر تکرار یک رکورد به جدولت اضافه کنه
Sub ok_click()
Do While box1 >= box2

Do cmd.openquery "apprecord"
Box1= box1 + 1
Loop
MsgBox "تمام"
End Sub

reza_1199
جمعه 04 بهمن 1392, 20:12 عصر
دوست عزیز دستت درد نکنه بخاطر کمکت کاملا کدت رو متوجه شدم ولی متاسفانه نتونستم اون کویری مد نطرت رو درست کنم اگر امکان داده یه نمونه کوچیک برام قرار بدی ازت ممنون میشم از قبل ازت تشکر می کنم

hasanhzd
جمعه 04 بهمن 1392, 22:31 عصر
درود
یک اپند کوئری بساز
البته ازجدولی نمیخونه
3تافیلد میخای
تو قسمت فیلد کوئری بنویس فرض
Expr1: [Forms]![to]![to]
ودر قسمت append to فیلد مورد نظر تو جدولتوبزار

reza_1199
شنبه 05 بهمن 1392, 09:38 صبح
استاد گرامی جناب آقای حسن متاسفانه من نتونستم کاری از پیش ببرم اگر امکان داره من یه نمونه بزارم اون رو برای من اصلاح بفرمائید ازتون تشکر می کنم

reza_1199
شنبه 05 بهمن 1392, 19:03 عصر
از دوستان علی الخصوص اساتید محترم تقاضای کمک دارم

hasanhzd
شنبه 05 بهمن 1392, 21:27 عصر
درود

ولی طراحی که درمورد جدول تو عکس نشون دادین درست بود

این جدول منطقی نداشت!!

reza_1199
شنبه 05 بهمن 1392, 22:18 عصر
دوست عزیز از وقتی که گذاشتین تشکر می کنم دستتون درد نکنه

hasanhzd
یک شنبه 06 بهمن 1392, 21:24 عصر
درود
البته در عمل 2 فیلد شماره حساب و بانک هم باید داشته باشید