اصلاح اطلاعات در فرم

[masoud1345]

دوستان من در فرم ورود كدها كد حساب ونام حساب را در بانك وارد ميكنم و يك گريد هم در همين فرم دارم كه كد حساب ونام حساب را نمايش ميدهد حال من ميخواهم وقتي يكي از كدهارا انتخاب كنم و نام ان را اصلاح كنم ولي چون قبلا كد كنترل گذاشته ام كه اگر كد من تكراري باشد پيام بدهد كه اينكد تكراري ميباشد سوال من اين است كه چگونه با انتخاب يكي از رديفهاي گريد كد ونام ان را اصلاح كنم كد كالا با نان فيلد kokkو نام كالا بافيلد nank اگر محبت كنيد ودستورات را برايم بنويسيد متشكر ميشوم من دستورات زير را نوشته ام ولي خطا ميدهد در لود فرم re_=0 ودر دگمه اصلاح _ecnom()=re
LOCATE FOR allt(kodk)=allt(thisform.pageframe1.page1.text1.Va lue ) AND recno() <> re_.thisform.pageframe1.page1.text1.value

[gh_khajehzade]

چه پيام خطايي ميده؟

[masoud1345]

فقط ميگه اين كد تكراري است

[masoud1345]

يكي از دوستان محبت كند وبه سوال اين جانب پاسخ دهد متشكرم

[gh_khajehzade]

لطفا فايل فرم به همراه dbf مربوطه (اگه ديتابيس هم داره با ديتابيس) رو اينجا بذار.كل dbf نياز نيست چند تا ركورد كافيه.

[masoud1345]

اين هم فايل لطفا دكمه اصلاح كد برايم گذاريد

[masoud1345]

اين هم فايل لطفا دكمه اصلاح كد را برايم بگذاريد

[masoud1345]

لطفا دكمه اصلاح اطلاعات يك كد را برايم بگذاريد متشكرم

[masoud1345]

لطفا دكمه اصلاح كد را برايم بگذاريد متشكرم

[gh_khajehzade]

در click دكمه 'ثبت' اين خط فرمان:
LOCATE FOR kodk=thisform.pageframe1.page1.text1.Value
به جاي text1 بايد text2 قرار بگيرد.چون نام را تغيير داده اي ولي بجاي اينكه نام جديد را جستجو كني كه تكراري هست يا نه ,كد كالا را جستجو ميكني كه طبيعتا چون كدرا تغيير ندادي آن را پيدا ميكند.
توصيه ميكنم براي ايجاد فرم از wizard خود فاكس استفاده كني هم سريعتر هست و هم راحتتر.يك كم تمرين كني خودت متوجه ميشي.
همچنين اگر از ديتابيس استفاده كني بسيار بهتر است .مثلا همين جلوگيري از تكراري بودن يك فيلد بدون كد نويسي براحتي امكانپذير هست.