ذخيره كردن در بانك اطلاعاتي

[رهسپار]

يا عرض سلام و خسته نباشيد

چطوري ميتونم اطلاعاتي رو كه نوشتم در بانك اطلاعاتي vb اونو حفظ كنه

مثلا مثل برنامه بيمارستان ها كه با دادن اسم و نام خانوادگي اونو پيدا ميكنه؟؟؟؟؟؟؟:متفکر:

[programming70]

درود بر تو دوست برنامه نویس من;

اگر جست و جو میکردی در این باره بسیار موضوع پیدا میکردی دوست من;

شما باید اول یک بانک با رکورد هایی که نیاز داری بسازی;
مثالی که دارم به شما میگم یک مثال از بانک اکسس هست;
وقتی که بانک خود را ساختید آن را ذخیره کنید;
بر روی فرم شیء زیر را انتخاب کنید;

http://barnamenevis.org/forum/attachment.php?attachmentid=60783&stc=1&d=1290587206
این شیء با نام Data در روی ابزار های برنامه موجود میباشد;
سپس شیء با شکل زیر در فرم ظاهر میشود;

http://barnamenevis.org/forum/attachment.php?attachmentid=60784&stc=1&d=1290587303
خوب حالا باید در قسمت Peroperties برنامه دو کار رو انجام بدی;
اول باید آدرس بانک اکسس خودت رو تو قسمت Databasename وارد کنی ، به شکل زیر;

http://barnamenevis.org/forum/attachment.php?attachmentid=60786&stc=1&d=1290588234
وقتی آدرس بانک رو دادی باید جدولی رو که ساخته اید رو هم در قسمت Recordsource انتخاب کنی ، شکل زیر رو هم نگاه کن;

http://barnamenevis.org/forum/attachment.php?attachmentid=60785&stc=1&d=1290588185
خوب حالا کنترل Data رو با بانک اطلاعاتی و جدول مورد نظر ارتباط دادی ، حال مونده برنامه نویسیش;
برای اضافه کردن یک رکورد به بانک اطلاعاتی از دستور زیر استفاده کن;

data1.Recordset.AddNew
data1.Recordset.Fields!shomare = 12345
data1.Recordset.Fields!esm = "programming70"
data1.Recordset.Fields!laghab = "karbare jadid"
data1.Recordset.Update

برای حذف کردن از دستور زیر استفاده کن;

Data1.Recordset.Delete
data1.Refresh

برای تغییر دادن از دستور زیر استفاده کن;

Data1.Recordset.Edit
Data1.Refresh

برای رفتن به رکورد بعدی از دستور زیر استفاده کن;

Data1.Recordset.MoveNext

برای رفتن به رکورد قبلی از دستور زیر استفاده کن;

Data1.Recordset.MovePrevious

برای رفتن به اولین رکورد از دستور زیر استفاده کن;

Data1.Recordset.MoveFirst

برای رفتن به رکورد آخر از دستور زیر استفاده کن;

Data1.Recordset.MoveLast

اگر سوالی دیگه راجع به این بانک و دستورات اون داشتی بپرس و تا جواب بدم;

[رهسپار]

ممنون :لبخندساده: