lang_functionlang.asp

来自「网站整站程序,适合个人网站制作,不适合商业用途」· ASP 代码 · 共 23 行

<%
function cClienteng(strcj,tClient)
  select case tClient
  case 2
    cClienteng=clang(strcj)
  case 4
    cClienteng=replace(strcj,",","×")
  case 5
    cClienteng="2<sup>" & strcj & "</sup> Colors"
  case 6
    cClienteng="Visit for " & strcj & " times"
  case 8
    cClienteng="View " & strcj & " Pages/Visitor"
  case else
    cClienteng=strcj
  end select
end function


function cLangeng(Langj)
  clangeng=langj
end function
%>