selim topaloğlu » strreverse http://selim.topaloglu.net bir programcının günlüğü Fri, 06 Aug 2010 14:34:34 +0000 http://wordpress.org/?v=2.8.5 en hourly 1 ASP ile sayıyı virgülle ayırma http://selim.topaloglu.net/asp/asp-ile-sayiyi-virgulle-ayirma/ http://selim.topaloglu.net/asp/asp-ile-sayiyi-virgulle-ayirma/#comments Thu, 24 Jul 2008 14:18:34 +0000 Selim Topaloğlu http://selim.topaloglu.net/?p=135 Uzun zaman sonra, daha önce kullanmadığım birşeye ihtiyacım oldu… Uzun bir sayıyı 3 lü haneler şeklinde virgülle ayırmak. PHP sinide yayınlarım boş zamanımda.

Buyrun fonksiyona,

<%
Function Virgulle(Veri)
	Veri = Cstr(StrReverse(Veri))
	For i = 1 To Len(Veri)
		GeciciVeri = Mid(Veri,i,1) & GeciciVeri
		If i Mod 3 = 0 And Not i = Len(Veri) Then GeciciVeri = "," & GeciciVeri
	Next
	Virgulle = GeciciVeri
End Function
%>
]]> http://selim.topaloglu.net/asp/asp-ile-sayiyi-virgulle-ayirma/feed/ 2