對文字進行如下cut()過程即可 <script language=vbscript runat=server> Function cut(str) length = Len(str) count = 1 Do While count <= length If strComp(Mid(str,count,1),"Z",1) > 0 Then length = length -1 End If count = count + 1 Loop cut = Left(str,Length) if session("Version")<>3 then '若為高版本asp則不需處理 cut = str end if End Function </script>
