Bugün sizlerle paylaşacağım konu gayet basit bir RegEx uygulaması.
Bildiğiniz gibi sosyal ağların popülerliği arttıkça bu tarz sitelerden farklı fikirler ve kodlar kullanıldığını görüyoruz. Örneğin Twitter'ın başlattığı cevaplama mantığı (mentions) sonrası Facebook'ta kişileri durum bilgilerini güncellerken etiketleme özelliği kullanılabilirliğini aktif hale getirdi. (Örn: @AyberkAtasay)
Bende size bu tarz bir uygulamanın nasıl yapılabileceği ile ilgili küçük bir kod vermek istiyorum. Tabii ki bu kodu geliştirmek, daha basite indirgemek veya kullanım şeklini değiştirmek yine size kalmış. Örneğin yazılan metnin o üye varsa link halini alması gibi (;
Yine bu yöntemi kullanırken RegEx'ten faydalandım.
İşte kodlar:
<%
Public Function TaggedPerson(byVal Text)
Set objReg = New RegEXP
objReg.Global = True
objReg.IgnoreCase = True
objReg.Pattern = "@s*(.+?) "
Text = objReg.Replace(Text,"@<a
Hiç yorum yok:
Yorum Gönder
Sessiz Kalma Sende Yorum Yap !