امتیاز موضوع:
  • 0 رأی - میانگین امتیازات: 0
  • 1
  • 2
  • 3
  • 4
  • 5
لطفا مرا راهنمايي كنيد فوري در مورد اكسس
نویسنده پیام
smhr53 آفلاین
تازه وارد

ارسال‌ها: 9
موضوع‌ها: 6
تاریخ عضویت: اردیبهشت ۱۳۸۵

تشکرها : 0
( 0 تشکر در 0 ارسال )
ارسال: #1
Smile  لطفا مرا راهنمايي كنيد فوري در مورد اكسس
با سلام
مي خواهم در فرمي كه ايجاد كرده ام در يك فيلد مثلا نام و نام خانوادگي اگر نام و نام خانوادگي مشابهي وارد شد برنامه به من اعلام كند كه اين نام و نام خانوادگي تكراري است و ليستي از نام و نام هاي خانوادگي مشابه را براي من ليست كند
اگر امكان اين كار هست لطفا به صورت كامل و با جزئيات توضيح دهيد
با تشكر
۱۹-اردیبهشت-۱۳۸۵, ۲۲:۳۶:۰۹
ارسال‌ها
پاسخ
nazaninzeinab آفلاین
تازه وارد

ارسال‌ها: 16
موضوع‌ها: 10
تاریخ عضویت: اسفند ۱۳۸۴

تشکرها : 0
( 0 تشکر در 0 ارسال )
ارسال: #2
RE: لطفا مرا راهنمايي كنيد فوري در مورد اكسس
سلام
فکر می کنم باید یک query ایجاد کنید از جدول مشخصات با این شرط که نام و نام خانوادگی در آن با نام و نام خانوادگی در فرم مربوطه یکسان باشد (در قسمت where کلیک راست کنید و build را بزنید و بعد در فرمها نام فرم مربوطه و فیلد مود نظر را انتخاب کنید)
و در رویداد close فیلد نام خانوادگی این query را صدا بزنید با دستور

docmd.openquery ("نامquery")
۲۰-اردیبهشت-۱۳۸۵, ۲۲:۲۸:۵۹
ارسال‌ها
پاسخ
nazaninzeinab آفلاین
تازه وارد

ارسال‌ها: 16
موضوع‌ها: 10
تاریخ عضویت: اسفند ۱۳۸۴

تشکرها : 0
( 0 تشکر در 0 ارسال )
ارسال: #3
RE: لطفا مرا راهنمايي كنيد فوري در مورد اكسس
سلام
فکر می کنم باید یک query ایجاد کنید از جدول مشخصات با این شرط که نام و نام خانوادگی در آن با نام و نام خانوادگی در فرم مربوطه یکسان باشد (در قسمت where کلیک راست کنید و build را بزنید و بعد در فرمها نام فرم مربوطه و فیلد مود نظر را انتخاب کنید)
و در رویداد close فیلد نام خانوادگی این query را صدا بزنید با دستور
docmd.openquery ("نامquery")
در مورد تشخیص نام تکراری نیز می توانید در محیط کدنویسی با دستوات خاصی به جدول مربوطه دسترسی پیدا کرده و شرط تساوی را آنجا بررسی کنید که نیاز به مطالعه در زمینه دسترسی به جدول از طریق کدنویسی دارد
چند خط را به عنوان نمونه برایتان می نویسم
dim db as database
dim rs as recordset
-----------------------------
sub form_load
set db=currentdb
set rs=db.openrecordset("نام جدول",opendbdynaset)
end sub
---------------------------------
با روش بالا به جدول دسترسی پیدا می کنید حالا باید حلقه ای بگذارید و داده های جدول را با فیلد مورد نظرتان در فرم مقایسه کنید
sub form_close
rs.movelast
rs.movefirst
for i=1 to rs.recordcount-1 do
if rs!name=textname then msgbox"find
else
rs.movenext
end if
next i
end sub
--------------------------------
rs!name اشاره دارد به فیلد نام در جدول
rs.recordcount تعداد رکوردهای جدول را نشان می دهد
۲۰-اردیبهشت-۱۳۸۵, ۲۳:۲۳:۵۷
ارسال‌ها
پاسخ
smhr53 آفلاین
تازه وارد

ارسال‌ها: 9
موضوع‌ها: 6
تاریخ عضویت: اردیبهشت ۱۳۸۵

تشکرها : 0
( 0 تشکر در 0 ارسال )
ارسال: #4
تشكر
با تشكر فراوان از پاسخ شما
اين شيوه جواب داد با اين تفاوت كه من كوري را در رويداد beforeupdate فراخوان كردم ولي يه مشكل است و اين اينكه اين كوري در هر صورت باز مي شه چه من در اين فيلد مشخصات تكراري وارد بكنم يا نه
۲۰-اردیبهشت-۱۳۸۵, ۲۳:۵۳:۰۳
ارسال‌ها
پاسخ


موضوعات مرتبط با این موضوع...
موضوع نویسنده پاسخ بازدید آخرین ارسال
  بكاپ گيري از اكسس در وي بي alexsoly 4 6,678 ۳۱-اردیبهشت-۱۳۹۳, ۱۱:۳۹:۵۸
آخرین ارسال: s.fallahi
  دیلیت اشتباه لطفا راهنمایی کنید alireza129 1 2,071 ۲۷-آبان-۱۳۹۲, ۲۰:۰۹:۳۸
آخرین ارسال: a.mehran
  درخواست راهنمايي mehdi578 1 2,147 ۲۷-شهریور-۱۳۹۲, ۱۳:۱۵:۲۸
آخرین ارسال: Ghoghnus
  لطفا راهنمایی نمایید. reza77 1 2,465 ۰۸-اسفند-۱۳۹۰, ۱۱:۲۲:۴۲
آخرین ارسال: Di Di
Toungue دوتا سوال دارم ترو خدا كمكم كنيد hamid85 16 11,611 ۰۵-دى-۱۳۹۰, ۲۲:۳۰:۰۸
آخرین ارسال: bahman@bp
  لطفا جوابمو بدين صبا جوادي 1 2,543 ۲۴-آبان-۱۳۸۹, ۱۲:۱۴:۴۱
آخرین ارسال: lord_viper
  كمكم كنيد mbehradfar 0 2,244 ۰۸-مهر-۱۳۸۹, ۱۰:۳۳:۵۶
آخرین ارسال: mbehradfar
  درخواست راهنمايي saba20 2 2,920 ۱۶-اردیبهشت-۱۳۸۹, ۰۸:۱۸:۳۱
آخرین ارسال: saba20
  در مورد كوئري در اكسس smhr53 4 6,332 ۳۱-اردیبهشت-۱۳۸۶, ۱۲:۳۱:۰۱
آخرین ارسال: sama15661
Exclamation مشكل با وارد كردن متن در اكسس jaber 2 3,474 ۰۷-دى-۱۳۸۵, ۰۲:۴۵:۳۸
آخرین ارسال: jaber

پرش به انجمن:


کاربرانِ درحال بازدید از این موضوع: 1 مهمان

صفحه‌ی تماس | IranVig | بازگشت به بالا | | بایگانی | پیوند سایتی RSS