asp:qota_word
- 1
'文字長短
Function txtLengthRangs(txt,lenVal)
retxt = ""
IF txt<>"" THEN
IF len(txt)>lenVal THEN
retxt = LEFT(txt,lenVal) & ".."
ELSE
retxt = txt
END IF
END IF
txtLengthRangs = retxt
End Function
asp/qota_word.txt · 上一次變更: 2013/07/06 01:28 (外部編輯)