Please send your comments 

Message/Comment:

Your Name:

Your Email:

Please, donīt forget to include your name and email if you want it accredited to our website [if you donīt no problem]. 
Good wind & good waveīs !!!

<% Dim temp Dim pos Dim strOriginal Dim strOldChar Dim strNewChar temp = "" strOriginal= FP_FieldVal(fp_rs,"Texto") strOldChar = Chr(13)& Chr(10) strNewChar = "
" pos = InStr(1, strOriginal, strOldChar) While pos > 0 temp = temp & Mid(strOriginal, 1, pos - 1) & strNewChar strOriginal = Right(strOriginal, Len(strOriginal) - pos - Len(strOldChar) + 1) pos = InStr(1, strOriginal, strOldChar) Wend ChangeStr = temp & strOriginal Response.Write ChangeStr %>