שלום!
מישהו יודע איך אני מונע גלישת שורות?
זאת אומרת שאם הגולש כתב יותר מ X תווים בשדה,
אז זה ירד שורה?
או לחלופין שהשליפה מהמסד תהיה ,X תווים לשורה?
תודה
HELLOMANAGER

תעשה לולאה שתחתוך (mid) את הטקסט ל X תווים ואז תדפיס אותה ו BR עד שהטקסט יגמר

אם יש לך שאלות או משהו לא מובן אז אשמח לעזור לך..

[התמונה הבאה מגיעה מקישור שלא מתחיל ב https ולכן לא הוטמעה בדף כדי לשמור על https תקין: http://fresh.clanteam.com/list.png]

[התמונה הבאה מגיעה מקישור שלא מתחיל ב https ולכן לא הוטמעה בדף כדי לשמור על https תקין: http://fresh.clanteam.com/?https://2010-uploaded.fresh.co.il/2010/09/21/52868411.gif,http://www.boredpanda.com/blog/wp-content/themes/mimbo2.2/images/subscribe-panda-605px.png]

אפשר בבקשה דוגמה?
תודה
HELLOMANGER

זה לא טוב זה ישבור לו את המילים באמצע משפט...

גם אני מתעניין בזה, אין משהו לעשות בטבלה שבסך הכל יגרום לזה לרדת שורה ברגע שזה מגיע לקצה שהוגדר בהתחלה ברוחב שלה?

לקחתי את ההערה של LBY והוספתי לקוד תחביר שיתחשב במילה ולא יחתוך אותו באמצע
ואז חשבתי שאם המילה ארוכה מהגודל של התווים שהקצבנו אז עשיתי שיחתוך את המילה ובשורה הבאה יוסיף לה -, אך לעולם לא יהיה מצב שאורך שורה תהיה גדולה יותר מהאורך שהוקצב (X)

קוד:

 
function brrrr(text, length)
 if len(text) > length then
  if mid(text, length+1, length+1)=" " then
   j=length+1
  else
  j=length
  WHILE mid(text, j, j)<>" " and j>0 do
   j=j-1
  else
   j=length+1
   text=mid(text, 1, j-1) & "-" & mid(text, j, length)
  WEND
  end if
  brrrr =  mid(text, 1, j-1) & "<br />" & brrrr(mid(TRIM(text), j+1, len(text)), length)
 else
  brrrr = text
 end if
end function
 

עוד לא בדקתי, נראה לי מעט זקוק לשיפור.
תבדקו ותגידו לי אם עובד

[התמונה הבאה מגיעה מקישור שלא מתחיל ב https ולכן לא הוטמעה בדף כדי לשמור על https תקין: http://fresh.clanteam.com/list.png]

[התמונה הבאה מגיעה מקישור שלא מתחיל ב https ולכן לא הוטמעה בדף כדי לשמור על https תקין: http://fresh.clanteam.com/?https://2010-uploaded.fresh.co.il/2010/09/21/52868411.gif,http://www.boredpanda.com/blog/wp-content/themes/mimbo2.2/images/subscribe-panda-605px.png]

שניתי את הקוד לקוד הבא:

קוד:

		   function brrrr(RepBody, 60)
 if len(RepBody) > 60 then
  if mid(RepBody, 60+1, 60+1)=" " then
   j=60+1
  else
  j=60
  end if
 Do While  mid(RepBody, j, j)<>" " and j>0  
   j=j-1
   j=60+1
  RepBody=mid(RepBody, 1, j-1) & "-" & mid(RepBody, j, 60)
   rs.movenext
loop
  end if
  brrrr =  mid(RepBody, 1, j-1) & "<br />" & brrrr(mid(TRIM(RepBody), j+1, len(RepBody)), 60)
  brrrr = RepBody
end function
response.write(RepBody)

זאת בשל כך שהייתה בעיה עם משפטי התנאי,
קיבלתי אחרי השינוי את השגיאה הבאה:
Microsoft VBScript compilation error '800a03f2'

Expected identifier

/hellonet/forums/view_msg.asp, line 87

function brrrr(RepBody, 60)

שורה87 : function brrrr(RepBody, 60)

מה עושים?
תודה
HELLOMANAGER

יש מספר אפשרויות לקרוא לפונקציה.
אחת מהן היא להכניס את התוצאה לתוך משתנה.

קוד:

<%
a="this is a very very very very very very very very vyer vyer yvyer yevryverv ervy long text"
brText=brrrr(a,10)
response.write brText
%>

[התמונה הבאה מגיעה מקישור שלא מתחיל ב https ולכן לא הוטמעה בדף כדי לשמור על https תקין: http://fresh.clanteam.com/list.png]

[התמונה הבאה מגיעה מקישור שלא מתחיל ב https ולכן לא הוטמעה בדף כדי לשמור על https תקין: http://fresh.clanteam.com/?https://2010-uploaded.fresh.co.il/2010/09/21/52868411.gif,http://www.boredpanda.com/blog/wp-content/themes/mimbo2.2/images/subscribe-panda-605px.png]

ניסיתי את מה שהצעת בהודעה הראשונה:
וקיבלתי את השגיאה הבאה:
Microsoft VBScript compilation error '800a03fb'

Expected 'Loop'

/forums/b.asp, line 22

else

^ זה מה שכתבתי

קוד:

function brrrr(text, length)
 if len(text) > length then
  if mid(text, length+1, length+1)=" " then
   j=length+1
  else
  j=length
  WHILE mid(text, j, j)<>" " and j>0 do
   j=j-1
  else
   j=length+1
   text=mid(text, 1, j-1) & "-" & mid(text, j, length)
  WEND
  end if
  brrrr =  mid(text, 1, j-1) & "<br />" & brrrr(mid(TRIM(text), j+1, len(text)), length)
 else
  brrrr = text
 end if
end function 

אח"כ ניסיתי לכתוב את מה שהצעת לי בהודעה האחרונה ,
וקיבלתי את השגיאה:
Microsoft VBScript runtime error '800a000d'

Type mismatch: 'brrrr'

/forums/b.asp, line 15


מה עושים?
המון תודה על העזרה
HELLOMANAGER

היה לי כמה שגיאות בתחביר

קוד:

 
<%
<%
function brrrr(text, length)
'------------------
' ~ made by Eran ~
'------------------
 if len(text)>length and length>0 then
  if mid(text, length+1, 1)=" " then
   j=length+1
  else
   j=length
   WHILE mid(text, j, 1)<>" " and j>1
	j=j-1
   WEND
   t=""
   if j=1 then
	j=length
	t="-"
   end if
  end if
  brrrr = mid(text, 1, j) & "<br />" & t & brrrr(mid(text, j+1, len(text)), length)
 else
  brrrr = text
 end if
end function
a="this is a very very very very very very very very vyer vyer yvyer yevryverv ervy long text"
brText=brrrr(a,10)
response.write brText
%>

%>
 

הפונקציה תחתוך את המחרוזת a לשורות בעלי אורך x
הפונקציה תשמור על המילים שלמות.
במידה באם אחת המילים ארוכה מן האורך x שהוגדר מראש אז הפונקציה תחתוך את אותה מילה ובשורה הבאה יתווסף - לציון החיתוך שנעשה

made by Eran
עכשיו זה בדוק ופועל!

מי שרוצה ליעל את הפונקציה (אני חושב שיש מקום לשיפור) אז חופשי

[התמונה הבאה מגיעה מקישור שלא מתחיל ב https ולכן לא הוטמעה בדף כדי לשמור על https תקין: http://fresh.clanteam.com/list.png]

[התמונה הבאה מגיעה מקישור שלא מתחיל ב https ולכן לא הוטמעה בדף כדי לשמור על https תקין: http://fresh.clanteam.com/?https://2010-uploaded.fresh.co.il/2010/09/21/52868411.gif,http://www.boredpanda.com/blog/wp-content/themes/mimbo2.2/images/subscribe-panda-605px.png]

תודה ערן ,זה עבד.
תגיד,אתה ערן מסטאפ?
יום טוב
ושוב תודה
HELLOMANAGER