<%
Function UpZero(val,n)
If Len(val) < n then
Zero = ""
For jLoop = 1 To n-Len(val)
Zero = Zero & "0"
Next
UpZero = Zero & val
Else
UpZero = val
End if
End function
%>
เอาไว้เติม 0 ข้างหน้าครับ
โดย Val คือ ข้อมูลที่เข้ามาครับ อาจเป็น Interger หรือ Charactor ก็ได้
ส่วน n คือความยาวที่ต้องการครับ
ลองนำไปประยุกต์ใช้ดูนะครับ ..
วันที่สร้าง : 21 พฤษภาคม 2551 เวลา 12:23
จำนวนคนอ่าน : 3,024