کمک فوری

[hkhanzadeh]

سلام دوستان
من یک فرم با درست کردم که داخلش 4 تا textbox داره وقتی توی این فرمها علامت ( ' ) میگذارم پیغام خطا میده که نمیشه از این کاراکتر استفاده کرده اگر بخوام ( ' ) را با ( " ) عوض کنم و در DB ذخیره کنم چیکار باید بکنم؟

 

[m1pfard]

شما می تونید از کد کاراکتر استفاده کنید. مثلا به جای " از " استفاده کنید

 

[hkhanzadeh]

دوست عزیز
مرسی از راهنامایی ولی کلا با چه کدی چک کنم که اگر کاربر داخل textbox1 از علامت ( ' ) استفاده کرد اون رو با علامت ( " ) جایگزین کنه!!!!
ممنون میشم اگر جواب ابن رو هم بهم بگید.

 

[m1pfard]

شما می تونید از دستور زیر برای جایگزینی متن استفاده کنید:
[LTR]

tmptext = Replace(tmptext, "’", "'", 1, -1, 1)

[/LTR]
در این دستور تمام کاراکترهای ' را با کد آن یعنی ’ عوض می کند.

 

[m1pfard]

ببخشید ولی برنامه اینجا اجازه نداد که کد درست نشون داده بشه.
کد باید مثل این تصویر باشه:

 

[hkhanzadeh]

ببخشید که من خیلی خنگ هستم
یعنی اسم Textbox رو کجای این خط کد بنویسم که بره محتوای texbox رو چک کنه؟

 

[m1pfard]

اول باید محتویات textbox رو توی متغییرتون بریزید:
[LTR]

tmptext = Request.Form ("your_text_box")

[/LTR]
بعد از اون متغییر استفاده کنید.

 

[m1pfard]

در ضمن بلد بودن یا نبودن یک مطلب ربطی به خنگ بودن ندارد!

 

[hkhanzadeh]

مرسی از credite
الان این کار رو کردم یعنی :
Additional = Request.Form("Additional")
حالا کد شما رو چطوری بنویسم که کار بکنه؟

 

[m1pfard]

این کد متن موجود در textbox رو می گیره و تمام ' را به کدشون تبدیل می کنه:

 

[hkhanzadeh]

تغییرات رو انجام دادم ولی باز هم پیغام خطا میده. میشه کد صفحه رو بدم شما چک کنید؟ ):

 

[m1pfard]

خواهش میشه. اگه تونستید همین جا بیارید تا از بقیه هم کمک بگیریم.

 

[hkhanzadeh]

دوست عزیز دیروز خیلی زحمت کشیدید و بالاخره مشکل من حل شد.
برای اطلاع بقیه دوستان توضیح میدم که:
در این فرم 4 تا Textbox بود که وقتی داخلشون علامت ( ' ) میگذاشتم پیغام خطا میداد و مجبور بودم که اون رو replace کنم و در نهایت کدی مثل کد زیر درست شد برای هر 4 تا textbox
tmptext = Request.Form("Additional")
tmptext = Replace(tmptext, "’"," ")
tmptext = Replace(tmptext, "'"," ")

tmptext1 = Request.Form("Abstract")
tmptext1 = Replace(tmptext1, "’"," ")
tmptext1 = Replace(tmptext1, "'"," ")

tmptext2 = Request.Form("Outline")
tmptext2 = Replace(tmptext2, "’"," ")
tmptext2 = Replace(tmptext2, "'"," ")

tmptext3 = Request.Form("Biography")
tmptext3 = Replace(tmptext3, "’"," ")
tmptext3 = Replace(tmptext3, "'"," ")

همگی موفق باشید.

 

[m1pfard]

شکر.
شما هم همینطور