PDA

View Full Version : دادن شماره ردیف به یک رکورد بطور خودکار



mahtabi
سه شنبه 22 فروردین 1385, 20:12 عصر
سلام چگونه می توان در یک تیبل یا فرم برای یک رکورد فیلدی را قرار داد که شماره آن به طور خودکار از یک عدد دلخواه مثلا 221،یک شماره یک شماره بالا رود ( احتمالا غیر از اتو نامبر) ببینید در یک رپورت می شود این کار را با =1 و .... انجام دارد در تیبل یا فرم چطور؟
من یه تازه کارم لطفا به صورت ساده برام توضیح دهید متشکرم

mahtabi
جمعه 25 فروردین 1385, 09:36 صبح
من در این مورد واقعا مشکل دارم یعنی ضمن این که نباید از اتو نامبر استفاده کنم باید شماره ردیف به یک رکورد بدهم

ممنونم

مجتبی جوادی
شنبه 26 فروردین 1385, 23:21 عصر
در قسمت BeforeInsert فرم باید کد زیر را تایپ کنی

Dim tmp As Variant
tmp = DMax("نام فیلد", "نام جدول", "")
If IsNull(tmp) Then
tmp = 1
Else
tmp = tmp + 1
End If
me!نام فیلد=tmp

mahtabi
جمعه 01 اردیبهشت 1385, 16:08 عصر
آیا منظور بی فور آپدیت است؟

mahtabi
پنج شنبه 18 آبان 1385, 23:14 عصر
متشکر از راه نمایی شما

mohsenna30ri
شنبه 20 آبان 1385, 07:29 صبح
5658
یک نمونه با استفاده از کد آقای مجتبی جوادی تقدیم می گردد