کنتورانداختن [بایگانی]

fanavar

دوشنبه 07 آبان 1386, 13:05 عصر

سلام :
آیا این امکان وجودداره که دریک فیلد مقداراولیه روخودم بدم مثلا 1 ودستوری بنویسم که شماره های بعدی روخود سیستم بیاندازه

مهدی قربانی

سه شنبه 08 آبان 1386, 07:56 صبح

سلام
راههای متعددی هست یکیش کد زیر
این کد رو در رخداد مثلاً After Update یکی از فیلدها بنویسید
TxtRowNum فیلدی که باید شماره مورد نظر در اون ثبت بشه
FieldName هم نام فیلد موردنظری که کد زیر در رخداد After Update اون نوشته میشه

Private Sub FieldName_AfterUpdate()
Dim rs As Object

Set rs = Me.Recordset.Clone

Me.TxtRowNum.Value = Me.CurrentRecord

End Sub

fanavar

چهارشنبه 09 آبان 1386, 13:41 عصر

اگه من فیلدتاریخ روازیک جدول وفیلدی روکه می خوام باواردکردن هربارتاریخ ازجدول دیگه انتخاب کنم چطوری دیتادرجدول فیلدشماره واردمی شه به نمونه که ضمیمه کردم نگاهی بیاندازید

مهدی قربانی

چهارشنبه 09 آبان 1386, 15:45 عصر

در این نمونه بعد از ثبت تاریخ فیلد number آپدیت میشه .

fanavar

چهارشنبه 09 آبان 1386, 16:50 عصر

آفرین mehdi-gh جان خودشه فقط یکه ایرادکوچولوداره واون اینه که وقتی شماره درفیلدnumber ثبت شدوخواستم به رکوردبعدی برم فوکوس اون ازثبت قبلی هنوزپابرجاست آیامیشه برطرف کرد؟

مهدی قربانی

چهارشنبه 09 آبان 1386, 17:00 عصر

یا در رخداد on open form و یا رخداد after update فیلد تاریخ این کد رو بنویسید :

DoCmd.GoToRecord , , acNewRec

fanavar

چهارشنبه 09 آبان 1386, 17:07 عصر

دوست من برای اینکه فوکوس شماره قبلی درایجادرکوردجدیدازبین بره بایدیکبارفرم روببندم ودوباره بازکنم چرا؟امتحان کنیدازطریق رکوردست رکوردجدیدروانتخاب کنید!

مهدی قربانی

چهارشنبه 09 آبان 1386, 17:15 عصر

عذر می خوام نمونه یه اشکالاتی داشت برطرف و مجدداً آپلود شد . پست4#