case "ru-mo"
strlcid = 2073 ' russian(moldavia)
case "sz"
strlcid = 1083 ' sami(lappish)
case "sr"
strlcid = 3098 ' serbian(cyrillic)
case "sr"
strlcid = 2074 ' serbian(latin)
case "sk"
strlcid = 1051 ' slovak
case "s"
strlcid = 1060 ' slovenian
case "sb"
strlcid = 1070 ' sorbian
case "es"
strlcid = 1034 ' spanish(spain - traditional sort)
case "es-mx"
strlcid = 2058 ' spanish(mexican)
case "es"
strlcid = 3082 ' spanish(spain - modern sort)
case "es-gt"
strlcid = 4106 ' spanish(guatemala)
case "es-cr"
strlcid = 5130 ' spanish(costa rica)
case "es-pa"
strlcid = 6154 ' spanish(panama)
case "es-do"
strlcid = 7178 ' spanish(dominican republic)
case "es-ve"
strlcid = 8202 ' spanish(venezuela)
case "es-co"
strlcid = 9226 ' spanish(colombia)
case "es-pe"
strlcid = 10250 ' spanish(peru)
case "es-ar"
strlcid = 11274 ' spanish(argentina)
case "es-ec"
strlcid = 12298 ' spanish(ecuador)
case "es-c"
strlcid = 13322 ' spanish(chile)
case "es-uy"
strlcid = 14346 ' spanish(uruguay)
case "es-py"
strlcid = 15370 ' spanish(paraguay)
case "es-bo"
strlcid = 16394 ' spanish(bolivia)
case "es-sv"
strlcid = 17418 ' spanish(el salvador)
case "es-hn"
strlcid = 18442 ' spanish(honduras)
case "es-ni"
strlcid = 19466 ' spanish(nicaragua)
case "es-pr"
strlcid = 20490 ' spanish(puerto rico)
case "sx"
strlcid = 1072 ' sutu
case "sv"
strlcid = 1053 ' swedish
case "sv-fi"
strlcid = 2077 ' swedish(finland)
case "th"
strlcid = 1054 ' thai
case "ts"
strlcid = 1073 ' tsonga
case "tn"
strlcid = 1074 ' tswana
case "tr"
strlcid = 1055 ' turkish
case "uk"
strlcid = 1058 ' ukrainian
case "ur"
strlcid = 1056 ' urdu
case "ve"
strlcid = 1075 ' venda
case "vi"
strlcid = 1066 ' vietnamese
case "xh"
strlcid = 1076 ' xhosa
case "ji"
strlcid = 1085 ' yiddish
case "zu"
strlcid = 1077 ' zulu
case else
strlcid = 2048 ' default
end select
session.lcid = strlcid
end sub
</script>
sample asp page
---------------
以下的asp程式展示locale 的變搎，請在瀏覽器中的internet 選項，改變誾言詏定。再refresh 這個 asp page。
note: the setlcid() 副程式請include在檔案setlcid.inc.
<%@ language=vbscript %>
<html>
<body>
<!--#include file=setlcid.inc -->
<%
setlcid 'set the locale id per the browser
response.write "date/time formats"
response.write "<p>date = " & date()
response.write "<br>month = " & month(date())
response.write "<br>day = " & day(date())
response.write "<br>year = " & year(date())
response.write "<br>time = " & time()
response.write "<p>currency formats"
response.write "<p>" & formatcurrency(1.05, 2)
response.write "<br>" & formatnumber(1000000,2)
response.write "<br>" & formatnumber(-1000000,2)
%>
</body>
