Metinler için alt satıra geçme - ASP Webmaster bilgi bankası, knowledge base Webmaster Araçları

AnaSayfa > ASP > Metinler için alt satıra geçme
Kategori: ASP
Gönderen: Admin
Tarih: 2008-07-24
Puan: 10   Puan:10 | Katılımcı:1 | Katılımcı : 1
Okunma: 6750
  
 
1 puan 2 puan 3 puan 4 puan 5 puan 6 puan 7 puan 8 puan 9 puan 10 puan

<%

Function SatirAtla(byVal Veri)
If Veri = "" Then Exit Function
Veri = Replace(Veri, vbCrLf, "<br />", 1, -1, 1)
Veri = Replace(Veri, Chr(13), "<br />", 1, -1, 1)
SatirAtla = Veri
End Function

'//-- Örnek Kullanımı:
Response.Write SatirAtla(Request.Form("Mesaj"))

%>



Yorumlar
Henüz Kimse Yorum Yapmamış, ilk yorumu siz ekleyin!
Yorum Ekleme Aparatı
Yorum Eklemek için lütfen sol menuden giris yapınız..
Toplam 0 yorum listelendi.