%@ LANGUAGE="VBScript" %>
<% option explicit %>
<% if request.querystring("lang") = 2 then
session("LangType")=2
else
session("LangType")=1
end if
%>
<%
Dim CellColor
Dim FontColor
Dim OddCell
Dim CurrentNumber
Dim ItemNumber
Dim Amount
Dim ItemArray()
Dim ItemId
Dim ItemCode
Dim ItemAmount
Dim ItemDetail
Dim ItemThumb
Dim ItemPrice
Dim ItemTotal
Dim I
Dim J
Dim TheType
Dim SendName
Dim SendDate
Dim SendDate2
Dim SendCity
Dim SendMail
Dim SendWeb
Dim SendNote
Dim SendDetail
dim sendType
Dim SendPhone
Dim SendFax
Dim Subject
Dim SendMessage
Dim mailObj
function displaymessage(themessage)
response.write "
"
response.write "
" response.write themessage response.write " | " response.write "