ورود

View Full Version : انصراف از ثبت اطلاعات دربانک



fanavar
پنج شنبه 27 خرداد 1389, 23:29 عصر
سلام
درفرمی که مستقیماًبه بانک متصله یعنی unboand نیست درصورتیکه اطلاعات ردیف او ل راواردکردم وسپس درردیف دوم شروع به واردکردن اطلاعات می کنم قبل ازاینکه دکمه ثبت نهایی روبزنم می خوام از ثبت اطلاعات در بانک انصراف بدم در اینچنین فرمی چطور می تونم این دستور رااحراکنم
باتشکر

uniservice
جمعه 28 خرداد 1389, 14:07 عصر
منظورتون اینه که وقتی داده ها رو وارد می کنید داده ها در دینتا بیس ثبت می شن اگه منظورتون اینه می تونید با گذاشتن یک دکمه انصراف روی فرمتون و نوشتن query خذف داده تازه وارد شده این داده ها رو پاک کنید
ویا اگه منظورتون این نیست که دکمه ضرب بالای فرمتون رو بزنید :لبخند:

fazl11
جمعه 28 خرداد 1389, 19:50 عصر
مي تونيد يك فيلد توي جدول بذاريد و required اون فيلد رو yes بذار و روي فرم نيز اگر تمام فيلدها پر شد به اون فيلد مقدار دهي بشه در غير اينصورت خالي باشه در نتيجه بعلت خالي بودن اون فيلد ركورد ذخيره نميشه

fanavar
شنبه 29 خرداد 1389, 09:16 صبح
سلام
دوست عزیز می تونی یه مثال بزنی
باتشکر

id1385
یک شنبه 30 خرداد 1389, 16:59 عصر
با سلام
شما چرا از روش ورود به صورت زیر استفاده نمی کنید ؟



Dim db As Database
Dim rst As Recordset
Set db = CurrentDb
Set rst = db.OpenRecordset("moshtari")
rst.AddNew
'saving to fileds
rst.Fields("tarikh") = date1.Value
rst.Fields("id") = Text11.Value
rst.Fields("moshtari1") = Text3.Value

If Text5.Value <> "" Then
rst.Fields("tel") = Text5.Value
Else
rst.Fields("tel") = " --- "
End If


If Text9.Value <> "" Then
rst.Fields("addr") = Text9.Value
Else
rst.Fields("addr") = " --- "
End If

rst.Update
rst.Close

MsgBoxFa Space(40) & "اطلاعات مشتري جديد با موفقيت ذخيره شد" & Space(55), vbOKOnly + vbInformation, "ثبت مشتري"
date1.Value = Null
Text11.Value = Null
Text3.Value = Null
Text5.Value = Null
Text9.Value = Null
Text3.Requery



تو این روش شما می تونید کد رو توی یه کامند باتن بذارید و قبل از ورود داده ها می تونید خیلی راحت داده ها رو بررسی کنید و بعدش وارد دیتابیس بکنید.
از این لینک برای دانلود نمونه استفاده کنید .
http://yek-ashena.persiangig.com/00index/edition-89-03-03.zip


موفق باشید.

fanavar
سه شنبه 15 تیر 1389, 16:27 عصر
آیا در فرمهای که بصورت unboand ایجاد می کنیم می شه درآنها دکمه پیمایش براساس جدول اصلی گذاشت که در صورت پیمایش اطلاعات رواز جدول اصلی بخونه ودرفرم مذکور نمایش بده