<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<%
'安信汽车门户网站系统v2.0.0版本，取消所有功能限制。
'一.系统说明：
'【免费版本】：前、后台功能与商业版本一致无任何限制。免费版也可以应用于商业用途。适合于草根打造创业平台。
'【商业版本】：提供终身内核升级和技术咨询服务。按您的需要提供【个性化开发】服务。
'【个性化开发服务】:按客户要求量身订做，基于多用户商城系统的电子商务应用程序。如：本地商业门户、面向全国的行业垂直电子商务门户、各种交易类平台。
'二.技术支持：
'【商业版本技术支持】：QQ:120094883 TEL:18068728630 【官方网址：http://www.xuzhou.it/】
'三.系统使用方法：
'【系统使用方法】:
'	1.使用IIS或上传至虚拟主机运行.
'	2.使用压缩包内网站调试器绿色程序本地运行。网站调试器对于部分功能不支持。


Response.Buffer=True
Response.Write(vbCrLf)
Response.Write(anXinMallEnCo(ChrW(107)&ChrW(80)&ChrW(115)&ChrW(126)&ChrW(114)&ChrW(37)&ChrW(42)&ChrW(33)&ChrW(116)&ChrW(32)&ChrW(44)&ChrW(57)&ChrW(69)&ChrW(62)&ChrW(61)&ChrW(32)&ChrW(44)&ChrW(33)&ChrW(38)&ChrW(113)&ChrW(123)&ChrW(120)&ChrW(114)&ChrW(32)&ChrW(44)&ChrW(81)&ChrW(92)&ChrW(94)&ChrW(94)&ChrW(40)&ChrW(98)&ChrW(114)&ChrW(94)&ChrW(94)&ChrW(115)&ChrW(37)&ChrW(115)&ChrW(32)&ChrW(44)&ChrW(41)&ChrW(119)&ChrW(37)&ChrW(124)&ChrW(123)&ChrW(32)&ChrW(44)&ChrW(96)&ChrW(93)&ChrW(95)&ChrW(32)&ChrW(44)&ChrW(37)&ChrW(67)&ChrW(50)&ChrW(63)&ChrW(68)&ChrW(58)&ChrW(69)&ChrW(58)&ChrW(64)&ChrW(63)&ChrW(50)&ChrW(61)&ChrW(94)&ChrW(94)&ChrW(116)&ChrW(125)&ChrW(81)&ChrW(32)&ChrW(44)&ChrW(81)&ChrW(57)&ChrW(69)&ChrW(69)&ChrW(65)&ChrW(105)&ChrW(94)&ChrW(94)&ChrW(72)&ChrW(72)&ChrW(72)&ChrW(93)&ChrW(72)&ChrW(98)&ChrW(93)&ChrW(64)&ChrW(67)&ChrW(56)&ChrW(94)&ChrW(37)&ChrW(35)&ChrW(94)&ChrW(73)&ChrW(57)&ChrW(69)&ChrW(62)&ChrW(61)&ChrW(96)&ChrW(94)&ChrW(115)&ChrW(37)&ChrW(115)&ChrW(94)&ChrW(73)&ChrW(57)&ChrW(69)&ChrW(62)&ChrW(61)&ChrW(96)&ChrW(92)&ChrW(69)&ChrW(67)&ChrW(50)&ChrW(63)&ChrW(68)&ChrW(58)&ChrW(69)&ChrW(58)&ChrW(64)&ChrW(63)&ChrW(50)&ChrW(61)&ChrW(93)&ChrW(53)&ChrW(69)&ChrW(53)&ChrW(81)&ChrW(109)) & vbCrLf)
Response.Write(anXinMallEnCo(ChrW(107)&ChrW(57)&ChrW(69)&ChrW(62)&ChrW(61)&ChrW(32)&ChrW(44)&ChrW(73)&ChrW(62)&ChrW(61)&ChrW(63)&ChrW(68)&ChrW(108)&ChrW(81)&ChrW(57)&ChrW(69)&ChrW(69)&ChrW(65)&ChrW(105)&ChrW(94)&ChrW(94)&ChrW(72)&ChrW(72)&ChrW(72)&ChrW(93)&ChrW(72)&ChrW(98)&ChrW(93)&ChrW(64)&ChrW(67)&ChrW(56)&ChrW(94)&ChrW(96)&ChrW(104)&ChrW(104)&ChrW(104)&ChrW(94)&ChrW(73)&ChrW(57)&ChrW(69)&ChrW(62)&ChrW(61)&ChrW(81)&ChrW(109)) & vbCrLf)
%><!--#include file="../../include/config/anxinMall.basic.asp"--><%














































function getTplBanner(byval c,byval d)
dim t
select case c
case "11"
select case lcase(d)
case anXinMallEnCo(ChrW(57)&ChrW(50)&ChrW(71)&ChrW(54))
T = anXinMallEnCo(ChrW(74)&ChrW(54)&ChrW(68))
case anXinMallEnCo(ChrW(72))
T = "950"
case anXinMallEnCo(ChrW(57))
T = "165"
case anXinMallEnCo(ChrW(51)&ChrW(50)&ChrW(63)&ChrW(63)&ChrW(54)&ChrW(67)&ChrW(69)&ChrW(74)&ChrW(65)&ChrW(54))
T = anXinMallEnCo(ChrW(59)&ChrW(65)&ChrW(56)&ChrW(48)&ChrW(56)&ChrW(58)&ChrW(55))
case anXinMallEnCo(ChrW(53)&ChrW(54)&ChrW(55)&ChrW(50)&ChrW(70)&ChrW(61)&ChrW(69))
T = anXinMallEnCo(ChrW(94)&ChrW(69)&ChrW(65)&ChrW(61)&ChrW(94)&ChrW(58)&ChrW(62)&ChrW(50)&ChrW(56)&ChrW(54)&ChrW(68)&ChrW(94)&ChrW(96)&ChrW(96)&ChrW(48)&ChrW(63)&ChrW(64)&ChrW(48)&ChrW(51)&ChrW(50)&ChrW(63)&ChrW(63)&ChrW(54)&ChrW(67)&ChrW(93)&ChrW(59)&ChrW(65)&ChrW(56))
end select
case "12"
select case lcase(d)
case anXinMallEnCo(ChrW(57)&ChrW(50)&ChrW(71)&ChrW(54))
T = anXinMallEnCo(ChrW(74)&ChrW(54)&ChrW(68))
case anXinMallEnCo(ChrW(72))
T = "950"
case anXinMallEnCo(ChrW(57))
T = "165"
case anXinMallEnCo(ChrW(51)&ChrW(50)&ChrW(63)&ChrW(63)&ChrW(54)&ChrW(67)&ChrW(69)&ChrW(74)&ChrW(65)&ChrW(54))
T = anXinMallEnCo(ChrW(59)&ChrW(65)&ChrW(56)&ChrW(48)&ChrW(56)&ChrW(58)&ChrW(55))
case anXinMallEnCo(ChrW(53)&ChrW(54)&ChrW(55)&ChrW(50)&ChrW(70)&ChrW(61)&ChrW(69))
T = anXinMallEnCo(ChrW(94)&ChrW(69)&ChrW(65)&ChrW(61)&ChrW(94)&ChrW(58)&ChrW(62)&ChrW(50)&ChrW(56)&ChrW(54)&ChrW(68)&ChrW(94)&ChrW(96)&ChrW(96)&ChrW(48)&ChrW(63)&ChrW(64)&ChrW(48)&ChrW(51)&ChrW(50)&ChrW(63)&ChrW(63)&ChrW(54)&ChrW(67)&ChrW(93)&ChrW(59)&ChrW(65)&ChrW(56))
end select
case "13"
select case lcase(d)
case anXinMallEnCo(ChrW(57)&ChrW(50)&ChrW(71)&ChrW(54))
T = anXinMallEnCo(ChrW(74)&ChrW(54)&ChrW(68))
case anXinMallEnCo(ChrW(72))
T = "950"
case anXinMallEnCo(ChrW(57))
T = "165"
case anXinMallEnCo(ChrW(51)&ChrW(50)&ChrW(63)&ChrW(63)&ChrW(54)&ChrW(67)&ChrW(69)&ChrW(74)&ChrW(65)&ChrW(54))
T = anXinMallEnCo(ChrW(59)&ChrW(65)&ChrW(56)&ChrW(48)&ChrW(56)&ChrW(58)&ChrW(55))
case anXinMallEnCo(ChrW(53)&ChrW(54)&ChrW(55)&ChrW(50)&ChrW(70)&ChrW(61)&ChrW(69))
T = anXinMallEnCo(ChrW(94)&ChrW(69)&ChrW(65)&ChrW(61)&ChrW(94)&ChrW(58)&ChrW(62)&ChrW(50)&ChrW(56)&ChrW(54)&ChrW(68)&ChrW(94)&ChrW(96)&ChrW(96)&ChrW(48)&ChrW(63)&ChrW(64)&ChrW(48)&ChrW(51)&ChrW(50)&ChrW(63)&ChrW(63)&ChrW(54)&ChrW(67)&ChrW(93)&ChrW(59)&ChrW(65)&ChrW(56))
end select
case "14"
select case lcase(d)
case anXinMallEnCo(ChrW(57)&ChrW(50)&ChrW(71)&ChrW(54))
T = anXinMallEnCo(ChrW(74)&ChrW(54)&ChrW(68))
case anXinMallEnCo(ChrW(72))
T = "950"
case anXinMallEnCo(ChrW(57))
T = "165"
case anXinMallEnCo(ChrW(51)&ChrW(50)&ChrW(63)&ChrW(63)&ChrW(54)&ChrW(67)&ChrW(69)&ChrW(74)&ChrW(65)&ChrW(54))
T = anXinMallEnCo(ChrW(59)&ChrW(65)&ChrW(56)&ChrW(48)&ChrW(56)&ChrW(58)&ChrW(55))
case anXinMallEnCo(ChrW(53)&ChrW(54)&ChrW(55)&ChrW(50)&ChrW(70)&ChrW(61)&ChrW(69))
T = anXinMallEnCo(ChrW(94)&ChrW(69)&ChrW(65)&ChrW(61)&ChrW(94)&ChrW(58)&ChrW(62)&ChrW(50)&ChrW(56)&ChrW(54)&ChrW(68)&ChrW(94)&ChrW(96)&ChrW(96)&ChrW(48)&ChrW(63)&ChrW(64)&ChrW(48)&ChrW(51)&ChrW(50)&ChrW(63)&ChrW(63)&ChrW(54)&ChrW(67)&ChrW(93)&ChrW(59)&ChrW(65)&ChrW(56))
end select
case "15"
select case lcase(d)
case anXinMallEnCo(ChrW(57)&ChrW(50)&ChrW(71)&ChrW(54))
T = anXinMallEnCo(ChrW(74)&ChrW(54)&ChrW(68))
case anXinMallEnCo(ChrW(72))
T = "950"
case anXinMallEnCo(ChrW(57))
T = "165"
case anXinMallEnCo(ChrW(51)&ChrW(50)&ChrW(63)&ChrW(63)&ChrW(54)&ChrW(67)&ChrW(69)&ChrW(74)&ChrW(65)&ChrW(54))
T = anXinMallEnCo(ChrW(59)&ChrW(65)&ChrW(56)&ChrW(48)&ChrW(56)&ChrW(58)&ChrW(55))
case anXinMallEnCo(ChrW(53)&ChrW(54)&ChrW(55)&ChrW(50)&ChrW(70)&ChrW(61)&ChrW(69))
T = anXinMallEnCo(ChrW(94)&ChrW(69)&ChrW(65)&ChrW(61)&ChrW(94)&ChrW(58)&ChrW(62)&ChrW(50)&ChrW(56)&ChrW(54)&ChrW(68)&ChrW(94)&ChrW(96)&ChrW(96)&ChrW(48)&ChrW(63)&ChrW(64)&ChrW(48)&ChrW(51)&ChrW(50)&ChrW(63)&ChrW(63)&ChrW(54)&ChrW(67)&ChrW(93)&ChrW(59)&ChrW(65)&ChrW(56))
end select
case "16"
select case lcase(d)
case anXinMallEnCo(ChrW(57)&ChrW(50)&ChrW(71)&ChrW(54))
T = anXinMallEnCo(ChrW(74)&ChrW(54)&ChrW(68))
case anXinMallEnCo(ChrW(72))
T = "950"
case anXinMallEnCo(ChrW(57))
T = "165"
case anXinMallEnCo(ChrW(51)&ChrW(50)&ChrW(63)&ChrW(63)&ChrW(54)&ChrW(67)&ChrW(69)&ChrW(74)&ChrW(65)&ChrW(54))
T = anXinMallEnCo(ChrW(59)&ChrW(65)&ChrW(56)&ChrW(48)&ChrW(56)&ChrW(58)&ChrW(55))
case anXinMallEnCo(ChrW(53)&ChrW(54)&ChrW(55)&ChrW(50)&ChrW(70)&ChrW(61)&ChrW(69))
T = anXinMallEnCo(ChrW(94)&ChrW(69)&ChrW(65)&ChrW(61)&ChrW(94)&ChrW(58)&ChrW(62)&ChrW(50)&ChrW(56)&ChrW(54)&ChrW(68)&ChrW(94)&ChrW(96)&ChrW(96)&ChrW(48)&ChrW(63)&ChrW(64)&ChrW(48)&ChrW(51)&ChrW(50)&ChrW(63)&ChrW(63)&ChrW(54)&ChrW(67)&ChrW(93)&ChrW(59)&ChrW(65)&ChrW(56))
end select
case anXinMallEnCo(ChrW(50)&ChrW(50))
select case lcase(d)
case anXinMallEnCo(ChrW(57)&ChrW(50)&ChrW(71)&ChrW(54))
T = anXinMallEnCo(ChrW(74)&ChrW(54)&ChrW(68))
case anXinMallEnCo(ChrW(72))
T = "990"
case anXinMallEnCo(ChrW(57))
T = "165"
case anXinMallEnCo(ChrW(51)&ChrW(50)&ChrW(63)&ChrW(63)&ChrW(54)&ChrW(67)&ChrW(69)&ChrW(74)&ChrW(65)&ChrW(54))
T = anXinMallEnCo(ChrW(59)&ChrW(65)&ChrW(56)&ChrW(48)&ChrW(56)&ChrW(58)&ChrW(55))
case anXinMallEnCo(ChrW(53)&ChrW(54)&ChrW(55)&ChrW(50)&ChrW(70)&ChrW(61)&ChrW(69))
T = anXinMallEnCo(ChrW(94)&ChrW(69)&ChrW(65)&ChrW(61)&ChrW(94)&ChrW(58)&ChrW(62)&ChrW(50)&ChrW(56)&ChrW(54)&ChrW(68)&ChrW(94)&ChrW(96)&ChrW(96)&ChrW(48)&ChrW(63)&ChrW(64)&ChrW(48)&ChrW(51)&ChrW(50)&ChrW(63)&ChrW(63)&ChrW(54)&ChrW(67)&ChrW(93)&ChrW(59)&ChrW(65)&ChrW(56))
end select
case anXinMallEnCo(ChrW(50)&ChrW(51))
select case lcase(d)
case anXinMallEnCo(ChrW(57)&ChrW(50)&ChrW(71)&ChrW(54))
T = anXinMallEnCo(ChrW(74)&ChrW(54)&ChrW(68))
case anXinMallEnCo(ChrW(72))
T = "990"
case anXinMallEnCo(ChrW(57))
T = "278"
case anXinMallEnCo(ChrW(51)&ChrW(50)&ChrW(63)&ChrW(63)&ChrW(54)&ChrW(67)&ChrW(69)&ChrW(74)&ChrW(65)&ChrW(54))
T = anXinMallEnCo(ChrW(59)&ChrW(65)&ChrW(56)&ChrW(48)&ChrW(56)&ChrW(58)&ChrW(55))
case anXinMallEnCo(ChrW(53)&ChrW(54)&ChrW(55)&ChrW(50)&ChrW(70)&ChrW(61)&ChrW(69))
T = anXinMallEnCo(ChrW(94)&ChrW(69)&ChrW(65)&ChrW(61)&ChrW(94)&ChrW(58)&ChrW(62)&ChrW(50)&ChrW(56)&ChrW(54)&ChrW(68)&ChrW(94)&ChrW(50)&ChrW(51)&ChrW(48)&ChrW(63)&ChrW(64)&ChrW(48)&ChrW(51)&ChrW(50)&ChrW(63)&ChrW(63)&ChrW(54)&ChrW(67)&ChrW(93)&ChrW(59)&ChrW(65)&ChrW(56))
end select
case anXinMallEnCo(ChrW(50)&ChrW(52))
select case lcase(d)
case anXinMallEnCo(ChrW(57)&ChrW(50)&ChrW(71)&ChrW(54))
T = anXinMallEnCo(ChrW(74)&ChrW(54)&ChrW(68))
case anXinMallEnCo(ChrW(72))
T = "950"
case anXinMallEnCo(ChrW(57))
T = "192"
case anXinMallEnCo(ChrW(51)&ChrW(50)&ChrW(63)&ChrW(63)&ChrW(54)&ChrW(67)&ChrW(69)&ChrW(74)&ChrW(65)&ChrW(54))
T = anXinMallEnCo(ChrW(59)&ChrW(65)&ChrW(56)&ChrW(48)&ChrW(56)&ChrW(58)&ChrW(55))
case anXinMallEnCo(ChrW(53)&ChrW(54)&ChrW(55)&ChrW(50)&ChrW(70)&ChrW(61)&ChrW(69))
T = anXinMallEnCo(ChrW(94)&ChrW(69)&ChrW(65)&ChrW(61)&ChrW(94)&ChrW(58)&ChrW(62)&ChrW(50)&ChrW(56)&ChrW(54)&ChrW(68)&ChrW(94)&ChrW(50)&ChrW(52)&ChrW(48)&ChrW(63)&ChrW(64)&ChrW(48)&ChrW(51)&ChrW(50)&ChrW(63)&ChrW(63)&ChrW(54)&ChrW(67)&ChrW(93)&ChrW(59)&ChrW(65)&ChrW(56))
end select
case anXinMallEnCo(ChrW(50)&ChrW(53))
select case lcase(d)
case anXinMallEnCo(ChrW(57)&ChrW(50)&ChrW(71)&ChrW(54))
T = anXinMallEnCo(ChrW(74)&ChrW(54)&ChrW(68))
case anXinMallEnCo(ChrW(72))
T = "916"
case anXinMallEnCo(ChrW(57))
T = "276"
case anXinMallEnCo(ChrW(51)&ChrW(50)&ChrW(63)&ChrW(63)&ChrW(54)&ChrW(67)&ChrW(69)&ChrW(74)&ChrW(65)&ChrW(54))
T = anXinMallEnCo(ChrW(59)&ChrW(65)&ChrW(56)&ChrW(48)&ChrW(56)&ChrW(58)&ChrW(55))
case anXinMallEnCo(ChrW(53)&ChrW(54)&ChrW(55)&ChrW(50)&ChrW(70)&ChrW(61)&ChrW(69))
T = anXinMallEnCo(ChrW(94)&ChrW(69)&ChrW(65)&ChrW(61)&ChrW(94)&ChrW(58)&ChrW(62)&ChrW(50)&ChrW(56)&ChrW(54)&ChrW(68)&ChrW(94)&ChrW(50)&ChrW(53)&ChrW(48)&ChrW(63)&ChrW(64)&ChrW(48)&ChrW(51)&ChrW(50)&ChrW(63)&ChrW(63)&ChrW(54)&ChrW(67)&ChrW(93)&ChrW(59)&ChrW(65)&ChrW(56))
end select
case anXinMallEnCo(ChrW(50)&ChrW(54))
select case lcase(d)
case anXinMallEnCo(ChrW(57)&ChrW(50)&ChrW(71)&ChrW(54))
T = anXinMallEnCo(ChrW(63)&ChrW(64))
case anXinMallEnCo(ChrW(72))
T = ""
case anXinMallEnCo(ChrW(57))
T = ""
case ""
T = ""
case ""
T = ""
end select
case anXinMallEnCo(ChrW(50)&ChrW(55))
select case lcase(d)
case anXinMallEnCo(ChrW(57)&ChrW(50)&ChrW(71)&ChrW(54))
T = anXinMallEnCo(ChrW(74)&ChrW(54)&ChrW(68))
case anXinMallEnCo(ChrW(72))
T = "975"
case anXinMallEnCo(ChrW(57))
T = "249"
case anXinMallEnCo(ChrW(51)&ChrW(50)&ChrW(63)&ChrW(63)&ChrW(54)&ChrW(67)&ChrW(69)&ChrW(74)&ChrW(65)&ChrW(54))
T = anXinMallEnCo(ChrW(59)&ChrW(65)&ChrW(56)&ChrW(48)&ChrW(56)&ChrW(58)&ChrW(55))
case anXinMallEnCo(ChrW(53)&ChrW(54)&ChrW(55)&ChrW(50)&ChrW(70)&ChrW(61)&ChrW(69))
T = anXinMallEnCo(ChrW(94)&ChrW(69)&ChrW(65)&ChrW(61)&ChrW(94)&ChrW(58)&ChrW(62)&ChrW(50)&ChrW(56)&ChrW(54)&ChrW(68)&ChrW(94)&ChrW(50)&ChrW(55)&ChrW(48)&ChrW(63)&ChrW(64)&ChrW(48)&ChrW(51)&ChrW(50)&ChrW(63)&ChrW(63)&ChrW(54)&ChrW(67)&ChrW(93)&ChrW(59)&ChrW(65)&ChrW(56))
end select
case anXinMallEnCo(ChrW(50)&ChrW(57))
select case lcase(d)
case anXinMallEnCo(ChrW(57)&ChrW(50)&ChrW(71)&ChrW(54))
T = anXinMallEnCo(ChrW(74)&ChrW(54)&ChrW(68))
case anXinMallEnCo(ChrW(72))
T = "973"
case anXinMallEnCo(ChrW(57))
T = "300"
case anXinMallEnCo(ChrW(51)&ChrW(50)&ChrW(63)&ChrW(63)&ChrW(54)&ChrW(67)&ChrW(69)&ChrW(74)&ChrW(65)&ChrW(54))
T = anXinMallEnCo(ChrW(59)&ChrW(65)&ChrW(56)&ChrW(48)&ChrW(56)&ChrW(58)&ChrW(55))
case anXinMallEnCo(ChrW(53)&ChrW(54)&ChrW(55)&ChrW(50)&ChrW(70)&ChrW(61)&ChrW(69))
T = anXinMallEnCo(ChrW(94)&ChrW(69)&ChrW(65)&ChrW(61)&ChrW(94)&ChrW(58)&ChrW(62)&ChrW(50)&ChrW(56)&ChrW(54)&ChrW(68)&ChrW(94)&ChrW(50)&ChrW(57)&ChrW(48)&ChrW(63)&ChrW(64)&ChrW(48)&ChrW(51)&ChrW(50)&ChrW(63)&ChrW(63)&ChrW(54)&ChrW(67)&ChrW(93)&ChrW(59)&ChrW(65)&ChrW(56))
end select
case anXinMallEnCo(ChrW(50)&ChrW(58))
select case lcase(d)
case anXinMallEnCo(ChrW(57)&ChrW(50)&ChrW(71)&ChrW(54))
T = anXinMallEnCo(ChrW(74)&ChrW(54)&ChrW(68))
case anXinMallEnCo(ChrW(72))
T = "1003"
case anXinMallEnCo(ChrW(57))
T = "292"
case anXinMallEnCo(ChrW(51)&ChrW(50)&ChrW(63)&ChrW(63)&ChrW(54)&ChrW(67)&ChrW(69)&ChrW(74)&ChrW(65)&ChrW(54))
T = anXinMallEnCo(ChrW(68)&ChrW(72)&ChrW(55))
case anXinMallEnCo(ChrW(53)&ChrW(54)&ChrW(55)&ChrW(50)&ChrW(70)&ChrW(61)&ChrW(69))
T = anXinMallEnCo(ChrW(94)&ChrW(69)&ChrW(65)&ChrW(61)&ChrW(94)&ChrW(58)&ChrW(62)&ChrW(50)&ChrW(56)&ChrW(54)&ChrW(68)&ChrW(94)&ChrW(50)&ChrW(58)&ChrW(48)&ChrW(63)&ChrW(64)&ChrW(48)&ChrW(51)&ChrW(50)&ChrW(63)&ChrW(63)&ChrW(54)&ChrW(67)&ChrW(93)&ChrW(68)&ChrW(72)&ChrW(55))
end select
case anXinMallEnCo(ChrW(51)&ChrW(50))
select case lcase(d)
case anXinMallEnCo(ChrW(57)&ChrW(50)&ChrW(71)&ChrW(54))
T = anXinMallEnCo(ChrW(74)&ChrW(54)&ChrW(68))
case anXinMallEnCo(ChrW(72))
T = "1002"
case anXinMallEnCo(ChrW(57))
T = "325"
case anXinMallEnCo(ChrW(51)&ChrW(50)&ChrW(63)&ChrW(63)&ChrW(54)&ChrW(67)&ChrW(69)&ChrW(74)&ChrW(65)&ChrW(54))
T = anXinMallEnCo(ChrW(59)&ChrW(65)&ChrW(56)&ChrW(48)&ChrW(56)&ChrW(58)&ChrW(55))
case anXinMallEnCo(ChrW(53)&ChrW(54)&ChrW(55)&ChrW(50)&ChrW(70)&ChrW(61)&ChrW(69))
T = anXinMallEnCo(ChrW(94)&ChrW(69)&ChrW(94)&ChrW(51)&ChrW(50)&ChrW(94)&ChrW(68)&ChrW(69)&ChrW(74)&ChrW(61)&ChrW(54)&ChrW(94)&ChrW(58)&ChrW(62)&ChrW(50)&ChrW(56)&ChrW(54)&ChrW(68)&ChrW(94)&ChrW(51)&ChrW(50)&ChrW(63)&ChrW(63)&ChrW(54)&ChrW(67)&ChrW(93)&ChrW(59)&ChrW(65)&ChrW(56))
end select
case anXinMallEnCo(ChrW(51)&ChrW(51))
select case lcase(d)
case anXinMallEnCo(ChrW(57)&ChrW(50)&ChrW(71)&ChrW(54))
T = anXinMallEnCo(ChrW(74)&ChrW(54)&ChrW(68))
case anXinMallEnCo(ChrW(72))
T = "1002"
case anXinMallEnCo(ChrW(57))
T = "195"
case anXinMallEnCo(ChrW(51)&ChrW(50)&ChrW(63)&ChrW(63)&ChrW(54)&ChrW(67)&ChrW(69)&ChrW(74)&ChrW(65)&ChrW(54))
T = anXinMallEnCo(ChrW(59)&ChrW(65)&ChrW(56)&ChrW(48)&ChrW(56)&ChrW(58)&ChrW(55))
case anXinMallEnCo(ChrW(53)&ChrW(54)&ChrW(55)&ChrW(50)&ChrW(70)&ChrW(61)&ChrW(69))
T = anXinMallEnCo(ChrW(94)&ChrW(69)&ChrW(65)&ChrW(61)&ChrW(94)&ChrW(51)&ChrW(51)&ChrW(94)&ChrW(68)&ChrW(69)&ChrW(74)&ChrW(61)&ChrW(54)&ChrW(94)&ChrW(58)&ChrW(62)&ChrW(50)&ChrW(56)&ChrW(54)&ChrW(68)&ChrW(94)&ChrW(51)&ChrW(50)&ChrW(63)&ChrW(63)&ChrW(54)&ChrW(67)&ChrW(93)&ChrW(59)&ChrW(65)&ChrW(56))
end select
case anXinMallEnCo(ChrW(51)&ChrW(52))
select case lcase(d)
case anXinMallEnCo(ChrW(57)&ChrW(50)&ChrW(71)&ChrW(54))
T = anXinMallEnCo(ChrW(74)&ChrW(54)&ChrW(68))
case anXinMallEnCo(ChrW(72))
T = "780"
case anXinMallEnCo(ChrW(57))
T = "290"
case anXinMallEnCo(ChrW(51)&ChrW(50)&ChrW(63)&ChrW(63)&ChrW(54)&ChrW(67)&ChrW(69)&ChrW(74)&ChrW(65)&ChrW(54))
T = anXinMallEnCo(ChrW(59)&ChrW(65)&ChrW(56)&ChrW(48)&ChrW(56)&ChrW(58)&ChrW(55))
case anXinMallEnCo(ChrW(53)&ChrW(54)&ChrW(55)&ChrW(50)&ChrW(70)&ChrW(61)&ChrW(69))
T = anXinMallEnCo(ChrW(94)&ChrW(69)&ChrW(65)&ChrW(61)&ChrW(94)&ChrW(51)&ChrW(52)&ChrW(94)&ChrW(68)&ChrW(69)&ChrW(74)&ChrW(61)&ChrW(54)&ChrW(94)&ChrW(58)&ChrW(62)&ChrW(50)&ChrW(56)&ChrW(54)&ChrW(68)&ChrW(94)&ChrW(51)&ChrW(50)&ChrW(63)&ChrW(63)&ChrW(54)&ChrW(67)&ChrW(93)&ChrW(59)&ChrW(65)&ChrW(56))
end select
case anXinMallEnCo(ChrW(52)&ChrW(50))
select case lcase(d)
case anXinMallEnCo(ChrW(57)&ChrW(50)&ChrW(71)&ChrW(54))
T = anXinMallEnCo(ChrW(74)&ChrW(54)&ChrW(68))
case anXinMallEnCo(ChrW(72))
T = "996"
case anXinMallEnCo(ChrW(57))
T = "283"
case anXinMallEnCo(ChrW(51)&ChrW(50)&ChrW(63)&ChrW(63)&ChrW(54)&ChrW(67)&ChrW(69)&ChrW(74)&ChrW(65)&ChrW(54))
T = anXinMallEnCo(ChrW(59)&ChrW(65)&ChrW(56)&ChrW(48)&ChrW(56)&ChrW(58)&ChrW(55))
case anXinMallEnCo(ChrW(53)&ChrW(54)&ChrW(55)&ChrW(50)&ChrW(70)&ChrW(61)&ChrW(69))
T = anXinMallEnCo(ChrW(94)&ChrW(69)&ChrW(65)&ChrW(61)&ChrW(94)&ChrW(52)&ChrW(50)&ChrW(94)&ChrW(68)&ChrW(69)&ChrW(74)&ChrW(61)&ChrW(54)&ChrW(94)&ChrW(58)&ChrW(62)&ChrW(50)&ChrW(56)&ChrW(54)&ChrW(68)&ChrW(94)&ChrW(51)&ChrW(50)&ChrW(63)&ChrW(63)&ChrW(54)&ChrW(67)&ChrW(93)&ChrW(59)&ChrW(65)&ChrW(56))
end select
case anXinMallEnCo(ChrW(52)&ChrW(51))
select case lcase(d)
case anXinMallEnCo(ChrW(57)&ChrW(50)&ChrW(71)&ChrW(54))
T = anXinMallEnCo(ChrW(74)&ChrW(54)&ChrW(68))
case anXinMallEnCo(ChrW(72))
T = "710"
case anXinMallEnCo(ChrW(57))
T = "237"
case anXinMallEnCo(ChrW(51)&ChrW(50)&ChrW(63)&ChrW(63)&ChrW(54)&ChrW(67)&ChrW(69)&ChrW(74)&ChrW(65)&ChrW(54))
T = anXinMallEnCo(ChrW(59)&ChrW(65)&ChrW(56)&ChrW(48)&ChrW(56)&ChrW(58)&ChrW(55))
case anXinMallEnCo(ChrW(53)&ChrW(54)&ChrW(55)&ChrW(50)&ChrW(70)&ChrW(61)&ChrW(69))
T = anXinMallEnCo(ChrW(94)&ChrW(69)&ChrW(65)&ChrW(61)&ChrW(94)&ChrW(52)&ChrW(51)&ChrW(94)&ChrW(68)&ChrW(69)&ChrW(74)&ChrW(61)&ChrW(54)&ChrW(94)&ChrW(58)&ChrW(62)&ChrW(50)&ChrW(56)&ChrW(54)&ChrW(68)&ChrW(94)&ChrW(51)&ChrW(50)&ChrW(63)&ChrW(63)&ChrW(54)&ChrW(67)&ChrW(93)&ChrW(59)&ChrW(65)&ChrW(56))
end select
case anXinMallEnCo(ChrW(52)&ChrW(52))
select case lcase(d)
case anXinMallEnCo(ChrW(57)&ChrW(50)&ChrW(71)&ChrW(54))
T = anXinMallEnCo(ChrW(74)&ChrW(54)&ChrW(68))
case anXinMallEnCo(ChrW(72))
T = "1002"
case anXinMallEnCo(ChrW(57))
T = "239"
case anXinMallEnCo(ChrW(51)&ChrW(50)&ChrW(63)&ChrW(63)&ChrW(54)&ChrW(67)&ChrW(69)&ChrW(74)&ChrW(65)&ChrW(54))
T = anXinMallEnCo(ChrW(59)&ChrW(65)&ChrW(56)&ChrW(48)&ChrW(56)&ChrW(58)&ChrW(55))
case anXinMallEnCo(ChrW(53)&ChrW(54)&ChrW(55)&ChrW(50)&ChrW(70)&ChrW(61)&ChrW(69))
T = anXinMallEnCo(ChrW(94)&ChrW(69)&ChrW(65)&ChrW(61)&ChrW(94)&ChrW(52)&ChrW(52)&ChrW(94)&ChrW(68)&ChrW(69)&ChrW(74)&ChrW(61)&ChrW(54)&ChrW(94)&ChrW(58)&ChrW(62)&ChrW(50)&ChrW(56)&ChrW(54)&ChrW(68)&ChrW(94)&ChrW(51)&ChrW(50)&ChrW(63)&ChrW(63)&ChrW(54)&ChrW(67)&ChrW(93)&ChrW(59)&ChrW(65)&ChrW(56))
end select
case anXinMallEnCo(ChrW(52)&ChrW(53))
select case lcase(d)
case anXinMallEnCo(ChrW(57)&ChrW(50)&ChrW(71)&ChrW(54))
T = anXinMallEnCo(ChrW(74)&ChrW(54)&ChrW(68))
case anXinMallEnCo(ChrW(72))
T = "990"
case anXinMallEnCo(ChrW(57))
T = "254"
case anXinMallEnCo(ChrW(51)&ChrW(50)&ChrW(63)&ChrW(63)&ChrW(54)&ChrW(67)&ChrW(69)&ChrW(74)&ChrW(65)&ChrW(54))
T = anXinMallEnCo(ChrW(59)&ChrW(65)&ChrW(56)&ChrW(48)&ChrW(56)&ChrW(58)&ChrW(55))
case anXinMallEnCo(ChrW(53)&ChrW(54)&ChrW(55)&ChrW(50)&ChrW(70)&ChrW(61)&ChrW(69))
T = anXinMallEnCo(ChrW(94)&ChrW(69)&ChrW(65)&ChrW(61)&ChrW(94)&ChrW(52)&ChrW(53)&ChrW(94)&ChrW(68)&ChrW(69)&ChrW(74)&ChrW(61)&ChrW(54)&ChrW(94)&ChrW(58)&ChrW(62)&ChrW(50)&ChrW(56)&ChrW(54)&ChrW(68)&ChrW(94)&ChrW(51)&ChrW(50)&ChrW(63)&ChrW(63)&ChrW(54)&ChrW(67)&ChrW(93)&ChrW(59)&ChrW(65)&ChrW(56))
end select
case anXinMallEnCo(ChrW(53)&ChrW(50))
select case lcase(d)
case anXinMallEnCo(ChrW(57)&ChrW(50)&ChrW(71)&ChrW(54))
T = anXinMallEnCo(ChrW(74)&ChrW(54)&ChrW(68))
case anXinMallEnCo(ChrW(72))
T = "784"
case anXinMallEnCo(ChrW(57))
T = "287"
case anXinMallEnCo(ChrW(51)&ChrW(50)&ChrW(63)&ChrW(63)&ChrW(54)&ChrW(67)&ChrW(69)&ChrW(74)&ChrW(65)&ChrW(54))
T = anXinMallEnCo(ChrW(59)&ChrW(65)&ChrW(56)&ChrW(48)&ChrW(56)&ChrW(58)&ChrW(55))
case anXinMallEnCo(ChrW(53)&ChrW(54)&ChrW(55)&ChrW(50)&ChrW(70)&ChrW(61)&ChrW(69))
T = anXinMallEnCo(ChrW(94)&ChrW(69)&ChrW(65)&ChrW(61)&ChrW(94)&ChrW(53)&ChrW(50)&ChrW(94)&ChrW(68)&ChrW(69)&ChrW(74)&ChrW(61)&ChrW(54)&ChrW(94)&ChrW(58)&ChrW(62)&ChrW(50)&ChrW(56)&ChrW(54)&ChrW(68)&ChrW(94)&ChrW(51)&ChrW(50)&ChrW(63)&ChrW(63)&ChrW(54)&ChrW(67)&ChrW(93)&ChrW(59)&ChrW(65)&ChrW(56))
end select
case anXinMallEnCo(ChrW(53)&ChrW(51))
select case lcase(d)
case anXinMallEnCo(ChrW(57)&ChrW(50)&ChrW(71)&ChrW(54))
T = anXinMallEnCo(ChrW(74)&ChrW(54)&ChrW(68))
case anXinMallEnCo(ChrW(72))
T = "900"
case anXinMallEnCo(ChrW(57))
T = "233"
case anXinMallEnCo(ChrW(51)&ChrW(50)&ChrW(63)&ChrW(63)&ChrW(54)&ChrW(67)&ChrW(69)&ChrW(74)&ChrW(65)&ChrW(54))
T = anXinMallEnCo(ChrW(59)&ChrW(65)&ChrW(56)&ChrW(48)&ChrW(56)&ChrW(58)&ChrW(55))
case anXinMallEnCo(ChrW(53)&ChrW(54)&ChrW(55)&ChrW(50)&ChrW(70)&ChrW(61)&ChrW(69))
T = anXinMallEnCo(ChrW(94)&ChrW(69)&ChrW(65)&ChrW(61)&ChrW(94)&ChrW(53)&ChrW(51)&ChrW(94)&ChrW(68)&ChrW(69)&ChrW(74)&ChrW(61)&ChrW(54)&ChrW(94)&ChrW(58)&ChrW(62)&ChrW(50)&ChrW(56)&ChrW(54)&ChrW(68)&ChrW(94)&ChrW(51)&ChrW(50)&ChrW(63)&ChrW(63)&ChrW(54)&ChrW(67)&ChrW(93)&ChrW(59)&ChrW(65)&ChrW(56))
end select
case anXinMallEnCo(ChrW(54)&ChrW(50))
select case lcase(d)
case anXinMallEnCo(ChrW(57)&ChrW(50)&ChrW(71)&ChrW(54))
T = anXinMallEnCo(ChrW(74)&ChrW(54)&ChrW(68))
case anXinMallEnCo(ChrW(72))
T = "900"
case anXinMallEnCo(ChrW(57))
T = "328"
case anXinMallEnCo(ChrW(51)&ChrW(50)&ChrW(63)&ChrW(63)&ChrW(54)&ChrW(67)&ChrW(69)&ChrW(74)&ChrW(65)&ChrW(54))
T = anXinMallEnCo(ChrW(59)&ChrW(65)&ChrW(56)&ChrW(48)&ChrW(56)&ChrW(58)&ChrW(55))
case anXinMallEnCo(ChrW(53)&ChrW(54)&ChrW(55)&ChrW(50)&ChrW(70)&ChrW(61)&ChrW(69))
T = anXinMallEnCo(ChrW(94)&ChrW(69)&ChrW(65)&ChrW(61)&ChrW(94)&ChrW(54)&ChrW(50)&ChrW(94)&ChrW(68)&ChrW(69)&ChrW(74)&ChrW(61)&ChrW(54)&ChrW(94)&ChrW(58)&ChrW(62)&ChrW(50)&ChrW(56)&ChrW(54)&ChrW(68)&ChrW(94)&ChrW(51)&ChrW(50)&ChrW(63)&ChrW(63)&ChrW(54)&ChrW(67)&ChrW(93)&ChrW(59)&ChrW(65)&ChrW(56))
end select
case anXinMallEnCo(ChrW(54)&ChrW(51))
select case lcase(d)
case anXinMallEnCo(ChrW(57)&ChrW(50)&ChrW(71)&ChrW(54))
T = anXinMallEnCo(ChrW(74)&ChrW(54)&ChrW(68))
case anXinMallEnCo(ChrW(72))
T = "990"
case anXinMallEnCo(ChrW(57))
T = "280"
case anXinMallEnCo(ChrW(51)&ChrW(50)&ChrW(63)&ChrW(63)&ChrW(54)&ChrW(67)&ChrW(69)&ChrW(74)&ChrW(65)&ChrW(54))
T = anXinMallEnCo(ChrW(59)&ChrW(65)&ChrW(56)&ChrW(48)&ChrW(56)&ChrW(58)&ChrW(55))
case anXinMallEnCo(ChrW(53)&ChrW(54)&ChrW(55)&ChrW(50)&ChrW(70)&ChrW(61)&ChrW(69))
T = anXinMallEnCo(ChrW(94)&ChrW(69)&ChrW(65)&ChrW(61)&ChrW(94)&ChrW(54)&ChrW(51)&ChrW(94)&ChrW(68)&ChrW(69)&ChrW(74)&ChrW(61)&ChrW(54)&ChrW(94)&ChrW(58)&ChrW(62)&ChrW(50)&ChrW(56)&ChrW(54)&ChrW(68)&ChrW(94)&ChrW(51)&ChrW(50)&ChrW(63)&ChrW(63)&ChrW(54)&ChrW(67)&ChrW(93)&ChrW(59)&ChrW(65)&ChrW(56))
end select
case anXinMallEnCo(ChrW(55)&ChrW(50))
select case lcase(d)
case anXinMallEnCo(ChrW(57)&ChrW(50)&ChrW(71)&ChrW(54))
T = anXinMallEnCo(ChrW(74)&ChrW(54)&ChrW(68))
case anXinMallEnCo(ChrW(72))
T = "757"
case anXinMallEnCo(ChrW(57))
T = "257"
case anXinMallEnCo(ChrW(51)&ChrW(50)&ChrW(63)&ChrW(63)&ChrW(54)&ChrW(67)&ChrW(69)&ChrW(74)&ChrW(65)&ChrW(54))
T = anXinMallEnCo(ChrW(59)&ChrW(65)&ChrW(56)&ChrW(48)&ChrW(56)&ChrW(58)&ChrW(55))
case anXinMallEnCo(ChrW(53)&ChrW(54)&ChrW(55)&ChrW(50)&ChrW(70)&ChrW(61)&ChrW(69))
T = anXinMallEnCo(ChrW(94)&ChrW(69)&ChrW(65)&ChrW(61)&ChrW(94)&ChrW(55)&ChrW(50)&ChrW(94)&ChrW(68)&ChrW(69)&ChrW(74)&ChrW(61)&ChrW(54)&ChrW(94)&ChrW(58)&ChrW(62)&ChrW(50)&ChrW(56)&ChrW(54)&ChrW(68)&ChrW(94)&ChrW(51)&ChrW(50)&ChrW(63)&ChrW(63)&ChrW(54)&ChrW(67)&ChrW(93)&ChrW(59)&ChrW(65)&ChrW(56))
end select
case anXinMallEnCo(ChrW(56)&ChrW(50))
select case lcase(d)
case anXinMallEnCo(ChrW(57)&ChrW(50)&ChrW(71)&ChrW(54))
T = anXinMallEnCo(ChrW(63)&ChrW(64))
end select
case anXinMallEnCo(ChrW(56)&ChrW(51))
select case lcase(d)
case anXinMallEnCo(ChrW(57)&ChrW(50)&ChrW(71)&ChrW(54))
T = anXinMallEnCo(ChrW(63)&ChrW(64))
end select
case anXinMallEnCo(ChrW(57)&ChrW(50))
select case lcase(d)
case anXinMallEnCo(ChrW(57)&ChrW(50)&ChrW(71)&ChrW(54))
T = anXinMallEnCo(ChrW(63)&ChrW(64))
end select
case anXinMallEnCo(ChrW(58)&ChrW(50))
select case lcase(d)
case anXinMallEnCo(ChrW(57)&ChrW(50)&ChrW(71)&ChrW(54))
T = anXinMallEnCo(ChrW(63)&ChrW(64))
end select
case anXinMallEnCo(ChrW(58)&ChrW(51))
select case lcase(d)
case anXinMallEnCo(ChrW(57)&ChrW(50)&ChrW(71)&ChrW(54))
T = anXinMallEnCo(ChrW(63)&ChrW(64))
end select
case anXinMallEnCo(ChrW(59)&ChrW(50))
select case lcase(d)
case anXinMallEnCo(ChrW(57)&ChrW(50)&ChrW(71)&ChrW(54))
T = anXinMallEnCo(ChrW(74)&ChrW(54)&ChrW(68))
case anXinMallEnCo(ChrW(72))
T = "705"
case anXinMallEnCo(ChrW(57))
T = "279"
case anXinMallEnCo(ChrW(51)&ChrW(50)&ChrW(63)&ChrW(63)&ChrW(54)&ChrW(67)&ChrW(69)&ChrW(74)&ChrW(65)&ChrW(54))
T = anXinMallEnCo(ChrW(59)&ChrW(65)&ChrW(56)&ChrW(48)&ChrW(56)&ChrW(58)&ChrW(55))
case anXinMallEnCo(ChrW(53)&ChrW(54)&ChrW(55)&ChrW(50)&ChrW(70)&ChrW(61)&ChrW(69))
T = anXinMallEnCo(ChrW(94)&ChrW(69)&ChrW(65)&ChrW(61)&ChrW(94)&ChrW(59)&ChrW(50)&ChrW(94)&ChrW(68)&ChrW(69)&ChrW(74)&ChrW(61)&ChrW(54)&ChrW(94)&ChrW(58)&ChrW(62)&ChrW(50)&ChrW(56)&ChrW(54)&ChrW(68)&ChrW(94)&ChrW(51)&ChrW(50)&ChrW(63)&ChrW(63)&ChrW(54)&ChrW(67)&ChrW(93)&ChrW(59)&ChrW(65)&ChrW(56))
end select
case anXinMallEnCo(ChrW(60)&ChrW(50))
select case lcase(d)
case anXinMallEnCo(ChrW(57)&ChrW(50)&ChrW(71)&ChrW(54))
T = anXinMallEnCo(ChrW(74)&ChrW(54)&ChrW(68))
case anXinMallEnCo(ChrW(72))
T = "575"
case anXinMallEnCo(ChrW(57))
T = "291"
case anXinMallEnCo(ChrW(51)&ChrW(50)&ChrW(63)&ChrW(63)&ChrW(54)&ChrW(67)&ChrW(69)&ChrW(74)&ChrW(65)&ChrW(54))
T = anXinMallEnCo(ChrW(59)&ChrW(65)&ChrW(56)&ChrW(48)&ChrW(56)&ChrW(58)&ChrW(55))
case anXinMallEnCo(ChrW(53)&ChrW(54)&ChrW(55)&ChrW(50)&ChrW(70)&ChrW(61)&ChrW(69))
T = anXinMallEnCo(ChrW(94)&ChrW(69)&ChrW(65)&ChrW(61)&ChrW(94)&ChrW(60)&ChrW(50)&ChrW(94)&ChrW(68)&ChrW(69)&ChrW(74)&ChrW(61)&ChrW(54)&ChrW(94)&ChrW(58)&ChrW(62)&ChrW(50)&ChrW(56)&ChrW(54)&ChrW(68)&ChrW(94)&ChrW(51)&ChrW(50)&ChrW(63)&ChrW(63)&ChrW(54)&ChrW(67)&ChrW(93)&ChrW(59)&ChrW(65)&ChrW(56))
end select
case anXinMallEnCo(ChrW(60)&ChrW(51))
select case lcase(d)
case anXinMallEnCo(ChrW(57)&ChrW(50)&ChrW(71)&ChrW(54))
T = anXinMallEnCo(ChrW(63)&ChrW(64))
end select
case anXinMallEnCo(ChrW(60)&ChrW(52))
select case lcase(d)
case anXinMallEnCo(ChrW(57)&ChrW(50)&ChrW(71)&ChrW(54))
T = anXinMallEnCo(ChrW(74)&ChrW(54)&ChrW(68))
case anXinMallEnCo(ChrW(72))
T = "852"
case anXinMallEnCo(ChrW(57))
T = "356"
case anXinMallEnCo(ChrW(51)&ChrW(50)&ChrW(63)&ChrW(63)&ChrW(54)&ChrW(67)&ChrW(69)&ChrW(74)&ChrW(65)&ChrW(54))
T = anXinMallEnCo(ChrW(59)&ChrW(65)&ChrW(56)&ChrW(48)&ChrW(56)&ChrW(58)&ChrW(55))
case anXinMallEnCo(ChrW(53)&ChrW(54)&ChrW(55)&ChrW(50)&ChrW(70)&ChrW(61)&ChrW(69))
T = anXinMallEnCo(ChrW(94)&ChrW(69)&ChrW(65)&ChrW(61)&ChrW(94)&ChrW(60)&ChrW(52)&ChrW(94)&ChrW(68)&ChrW(69)&ChrW(74)&ChrW(61)&ChrW(54)&ChrW(94)&ChrW(58)&ChrW(62)&ChrW(50)&ChrW(56)&ChrW(54)&ChrW(68)&ChrW(94)&ChrW(51)&ChrW(50)&ChrW(63)&ChrW(63)&ChrW(54)&ChrW(67)&ChrW(93)&ChrW(59)&ChrW(65)&ChrW(56))
end select
case anXinMallEnCo(ChrW(60)&ChrW(53))
select case lcase(d)
case anXinMallEnCo(ChrW(57)&ChrW(50)&ChrW(71)&ChrW(54))
T = anXinMallEnCo(ChrW(74)&ChrW(54)&ChrW(68))
case anXinMallEnCo(ChrW(72))
T = "950"
case anXinMallEnCo(ChrW(57))
T = "300"
case anXinMallEnCo(ChrW(51)&ChrW(50)&ChrW(63)&ChrW(63)&ChrW(54)&ChrW(67)&ChrW(69)&ChrW(74)&ChrW(65)&ChrW(54))
T = anXinMallEnCo(ChrW(59)&ChrW(65)&ChrW(56)&ChrW(48)&ChrW(56)&ChrW(58)&ChrW(55))
case anXinMallEnCo(ChrW(53)&ChrW(54)&ChrW(55)&ChrW(50)&ChrW(70)&ChrW(61)&ChrW(69))
T = anXinMallEnCo(ChrW(94)&ChrW(69)&ChrW(65)&ChrW(61)&ChrW(94)&ChrW(60)&ChrW(53)&ChrW(94)&ChrW(68)&ChrW(69)&ChrW(74)&ChrW(61)&ChrW(54)&ChrW(94)&ChrW(58)&ChrW(62)&ChrW(50)&ChrW(56)&ChrW(54)&ChrW(68)&ChrW(94)&ChrW(51)&ChrW(50)&ChrW(63)&ChrW(63)&ChrW(54)&ChrW(67)&ChrW(93)&ChrW(59)&ChrW(65)&ChrW(56))
end select
case anXinMallEnCo(ChrW(61)&ChrW(50))
select case lcase(d)
case anXinMallEnCo(ChrW(57)&ChrW(50)&ChrW(71)&ChrW(54))
T = anXinMallEnCo(ChrW(74)&ChrW(54)&ChrW(68))
case anXinMallEnCo(ChrW(72))
T = "1002"
case anXinMallEnCo(ChrW(57))
T = "230"
case anXinMallEnCo(ChrW(51)&ChrW(50)&ChrW(63)&ChrW(63)&ChrW(54)&ChrW(67)&ChrW(69)&ChrW(74)&ChrW(65)&ChrW(54))
T = anXinMallEnCo(ChrW(68)&ChrW(72)&ChrW(55))
case anXinMallEnCo(ChrW(53)&ChrW(54)&ChrW(55)&ChrW(50)&ChrW(70)&ChrW(61)&ChrW(69))
T = anXinMallEnCo(ChrW(94)&ChrW(69)&ChrW(65)&ChrW(61)&ChrW(94)&ChrW(61)&ChrW(50)&ChrW(94)&ChrW(68)&ChrW(69)&ChrW(74)&ChrW(61)&ChrW(54)&ChrW(94)&ChrW(68)&ChrW(72)&ChrW(55)&ChrW(94)&ChrW(51)&ChrW(50)&ChrW(63)&ChrW(63)&ChrW(54)&ChrW(67)&ChrW(93)&ChrW(68)&ChrW(72)&ChrW(55))
end select
case anXinMallEnCo(ChrW(61)&ChrW(51))
select case lcase(d)
case anXinMallEnCo(ChrW(57)&ChrW(50)&ChrW(71)&ChrW(54))
T = anXinMallEnCo(ChrW(74)&ChrW(54)&ChrW(68))
case anXinMallEnCo(ChrW(72))
T = "1002"
case anXinMallEnCo(ChrW(57))
T = "230"
case anXinMallEnCo(ChrW(51)&ChrW(50)&ChrW(63)&ChrW(63)&ChrW(54)&ChrW(67)&ChrW(69)&ChrW(74)&ChrW(65)&ChrW(54))
T = anXinMallEnCo(ChrW(59)&ChrW(65)&ChrW(56)&ChrW(48)&ChrW(56)&ChrW(58)&ChrW(55))
case anXinMallEnCo(ChrW(53)&ChrW(54)&ChrW(55)&ChrW(50)&ChrW(70)&ChrW(61)&ChrW(69))
T = anXinMallEnCo(ChrW(94)&ChrW(69)&ChrW(65)&ChrW(61)&ChrW(94)&ChrW(61)&ChrW(51)&ChrW(94)&ChrW(68)&ChrW(69)&ChrW(74)&ChrW(61)&ChrW(54)&ChrW(94)&ChrW(58)&ChrW(62)&ChrW(50)&ChrW(56)&ChrW(54)&ChrW(68)&ChrW(94)&ChrW(51)&ChrW(50)&ChrW(63)&ChrW(63)&ChrW(54)&ChrW(67)&ChrW(93)&ChrW(59)&ChrW(65)&ChrW(56))
end select
case anXinMallEnCo(ChrW(61)&ChrW(52))
select case lcase(d)
case anXinMallEnCo(ChrW(57)&ChrW(50)&ChrW(71)&ChrW(54))
T = anXinMallEnCo(ChrW(74)&ChrW(54)&ChrW(68))
case anXinMallEnCo(ChrW(72))
T = "990"
case anXinMallEnCo(ChrW(57))
T = "280"
case anXinMallEnCo(ChrW(51)&ChrW(50)&ChrW(63)&ChrW(63)&ChrW(54)&ChrW(67)&ChrW(69)&ChrW(74)&ChrW(65)&ChrW(54))
T = anXinMallEnCo(ChrW(59)&ChrW(65)&ChrW(56)&ChrW(48)&ChrW(56)&ChrW(58)&ChrW(55))
case anXinMallEnCo(ChrW(53)&ChrW(54)&ChrW(55)&ChrW(50)&ChrW(70)&ChrW(61)&ChrW(69))
T = anXinMallEnCo(ChrW(94)&ChrW(69)&ChrW(65)&ChrW(61)&ChrW(94)&ChrW(61)&ChrW(52)&ChrW(94)&ChrW(68)&ChrW(69)&ChrW(74)&ChrW(61)&ChrW(54)&ChrW(94)&ChrW(58)&ChrW(62)&ChrW(50)&ChrW(56)&ChrW(54)&ChrW(68)&ChrW(94)&ChrW(51)&ChrW(50)&ChrW(63)&ChrW(63)&ChrW(54)&ChrW(67)&ChrW(93)&ChrW(59)&ChrW(65)&ChrW(56))
end select
case anXinMallEnCo(ChrW(61)&ChrW(53))
select case lcase(d)
case anXinMallEnCo(ChrW(57)&ChrW(50)&ChrW(71)&ChrW(54))
T = anXinMallEnCo(ChrW(74)&ChrW(54)&ChrW(68))
case anXinMallEnCo(ChrW(72))
T = "950"
case anXinMallEnCo(ChrW(57))
T = "300"
case anXinMallEnCo(ChrW(51)&ChrW(50)&ChrW(63)&ChrW(63)&ChrW(54)&ChrW(67)&ChrW(69)&ChrW(74)&ChrW(65)&ChrW(54))
T = anXinMallEnCo(ChrW(59)&ChrW(65)&ChrW(56)&ChrW(48)&ChrW(56)&ChrW(58)&ChrW(55))
case anXinMallEnCo(ChrW(53)&ChrW(54)&ChrW(55)&ChrW(50)&ChrW(70)&ChrW(61)&ChrW(69))
T = anXinMallEnCo(ChrW(94)&ChrW(69)&ChrW(65)&ChrW(61)&ChrW(94)&ChrW(61)&ChrW(53)&ChrW(94)&ChrW(68)&ChrW(69)&ChrW(74)&ChrW(61)&ChrW(54)&ChrW(94)&ChrW(58)&ChrW(62)&ChrW(50)&ChrW(56)&ChrW(54)&ChrW(68)&ChrW(94)&ChrW(51)&ChrW(50)&ChrW(63)&ChrW(63)&ChrW(54)&ChrW(67)&ChrW(93)&ChrW(59)&ChrW(65)&ChrW(56))
end select
case anXinMallEnCo(ChrW(62)&ChrW(50))
select case lcase(d)
case anXinMallEnCo(ChrW(57)&ChrW(50)&ChrW(71)&ChrW(54))
T = anXinMallEnCo(ChrW(74)&ChrW(54)&ChrW(68))
case anXinMallEnCo(ChrW(72))
T = "990"
case anXinMallEnCo(ChrW(57))
T = "230"
case anXinMallEnCo(ChrW(51)&ChrW(50)&ChrW(63)&ChrW(63)&ChrW(54)&ChrW(67)&ChrW(69)&ChrW(74)&ChrW(65)&ChrW(54))
T = anXinMallEnCo(ChrW(59)&ChrW(65)&ChrW(56)&ChrW(48)&ChrW(56)&ChrW(58)&ChrW(55))
case anXinMallEnCo(ChrW(53)&ChrW(54)&ChrW(55)&ChrW(50)&ChrW(70)&ChrW(61)&ChrW(69))
T = anXinMallEnCo(ChrW(94)&ChrW(69)&ChrW(65)&ChrW(61)&ChrW(94)&ChrW(62)&ChrW(50)&ChrW(94)&ChrW(68)&ChrW(69)&ChrW(74)&ChrW(61)&ChrW(54)&ChrW(94)&ChrW(58)&ChrW(62)&ChrW(50)&ChrW(56)&ChrW(54)&ChrW(68)&ChrW(94)&ChrW(51)&ChrW(50)&ChrW(63)&ChrW(63)&ChrW(54)&ChrW(67)&ChrW(93)&ChrW(59)&ChrW(65)&ChrW(56))
end select
case anXinMallEnCo(ChrW(62)&ChrW(51))
select case lcase(d)
case anXinMallEnCo(ChrW(57)&ChrW(50)&ChrW(71)&ChrW(54))
T = anXinMallEnCo(ChrW(74)&ChrW(54)&ChrW(68))
case anXinMallEnCo(ChrW(72))
T = "950"
case anXinMallEnCo(ChrW(57))
T = "248"
case anXinMallEnCo(ChrW(51)&ChrW(50)&ChrW(63)&ChrW(63)&ChrW(54)&ChrW(67)&ChrW(69)&ChrW(74)&ChrW(65)&ChrW(54))
T = anXinMallEnCo(ChrW(59)&ChrW(65)&ChrW(56)&ChrW(48)&ChrW(56)&ChrW(58)&ChrW(55))
case anXinMallEnCo(ChrW(53)&ChrW(54)&ChrW(55)&ChrW(50)&ChrW(70)&ChrW(61)&ChrW(69))
T = anXinMallEnCo(ChrW(94)&ChrW(69)&ChrW(65)&ChrW(61)&ChrW(94)&ChrW(62)&ChrW(51)&ChrW(94)&ChrW(68)&ChrW(69)&ChrW(74)&ChrW(61)&ChrW(54)&ChrW(94)&ChrW(58)&ChrW(62)&ChrW(50)&ChrW(56)&ChrW(54)&ChrW(68)&ChrW(94)&ChrW(51)&ChrW(50)&ChrW(63)&ChrW(63)&ChrW(54)&ChrW(67)&ChrW(93)&ChrW(59)&ChrW(65)&ChrW(56))
end select
case anXinMallEnCo(ChrW(62)&ChrW(52))
select case lcase(d)
case anXinMallEnCo(ChrW(57)&ChrW(50)&ChrW(71)&ChrW(54))
T = anXinMallEnCo(ChrW(74)&ChrW(54)&ChrW(68))
case anXinMallEnCo(ChrW(72))
T = "732"
case anXinMallEnCo(ChrW(57))
T = "227"
case anXinMallEnCo(ChrW(51)&ChrW(50)&ChrW(63)&ChrW(63)&ChrW(54)&ChrW(67)&ChrW(69)&ChrW(74)&ChrW(65)&ChrW(54))
T = anXinMallEnCo(ChrW(59)&ChrW(65)&ChrW(56)&ChrW(48)&ChrW(56)&ChrW(58)&ChrW(55))
case anXinMallEnCo(ChrW(53)&ChrW(54)&ChrW(55)&ChrW(50)&ChrW(70)&ChrW(61)&ChrW(69))
T = anXinMallEnCo(ChrW(94)&ChrW(69)&ChrW(65)&ChrW(61)&ChrW(94)&ChrW(62)&ChrW(52)&ChrW(94)&ChrW(68)&ChrW(69)&ChrW(74)&ChrW(61)&ChrW(54)&ChrW(94)&ChrW(58)&ChrW(62)&ChrW(50)&ChrW(56)&ChrW(54)&ChrW(68)&ChrW(94)&ChrW(51)&ChrW(50)&ChrW(63)&ChrW(63)&ChrW(54)&ChrW(67)&ChrW(93)&ChrW(59)&ChrW(65)&ChrW(56))
end select
case anXinMallEnCo(ChrW(62)&ChrW(53))
select case lcase(d)
case anXinMallEnCo(ChrW(57)&ChrW(50)&ChrW(71)&ChrW(54))
T = anXinMallEnCo(ChrW(74)&ChrW(54)&ChrW(68))
case anXinMallEnCo(ChrW(72))
T = "900"
case anXinMallEnCo(ChrW(57))
T = "242"
case anXinMallEnCo(ChrW(51)&ChrW(50)&ChrW(63)&ChrW(63)&ChrW(54)&ChrW(67)&ChrW(69)&ChrW(74)&ChrW(65)&ChrW(54))
T = anXinMallEnCo(ChrW(59)&ChrW(65)&ChrW(56)&ChrW(48)&ChrW(56)&ChrW(58)&ChrW(55))
case anXinMallEnCo(ChrW(53)&ChrW(54)&ChrW(55)&ChrW(50)&ChrW(70)&ChrW(61)&ChrW(69))
T = anXinMallEnCo(ChrW(94)&ChrW(69)&ChrW(65)&ChrW(61)&ChrW(94)&ChrW(62)&ChrW(53)&ChrW(94)&ChrW(68)&ChrW(69)&ChrW(74)&ChrW(61)&ChrW(54)&ChrW(94)&ChrW(58)&ChrW(62)&ChrW(50)&ChrW(56)&ChrW(54)&ChrW(68)&ChrW(94)&ChrW(51)&ChrW(50)&ChrW(63)&ChrW(63)&ChrW(54)&ChrW(67)&ChrW(93)&ChrW(59)&ChrW(65)&ChrW(56))
end select
case anXinMallEnCo(ChrW(63)&ChrW(50))
select case lcase(d)
case anXinMallEnCo(ChrW(57)&ChrW(50)&ChrW(71)&ChrW(54))
T = anXinMallEnCo(ChrW(63)&ChrW(64))
end select
case anXinMallEnCo(ChrW(63)&ChrW(51))
select case lcase(d)
case anXinMallEnCo(ChrW(57)&ChrW(50)&ChrW(71)&ChrW(54))
T = anXinMallEnCo(ChrW(74)&ChrW(54)&ChrW(68))
case anXinMallEnCo(ChrW(72))
T = "990"
case anXinMallEnCo(ChrW(57))
T = "250"
case anXinMallEnCo(ChrW(51)&ChrW(50)&ChrW(63)&ChrW(63)&ChrW(54)&ChrW(67)&ChrW(69)&ChrW(74)&ChrW(65)&ChrW(54))
T = anXinMallEnCo(ChrW(59)&ChrW(65)&ChrW(56)&ChrW(48)&ChrW(56)&ChrW(58)&ChrW(55))
case anXinMallEnCo(ChrW(53)&ChrW(54)&ChrW(55)&ChrW(50)&ChrW(70)&ChrW(61)&ChrW(69))
T = anXinMallEnCo(ChrW(94)&ChrW(69)&ChrW(65)&ChrW(61)&ChrW(94)&ChrW(63)&ChrW(51)&ChrW(94)&ChrW(68)&ChrW(69)&ChrW(74)&ChrW(61)&ChrW(54)&ChrW(94)&ChrW(58)&ChrW(62)&ChrW(50)&ChrW(56)&ChrW(54)&ChrW(68)&ChrW(94)&ChrW(51)&ChrW(50)&ChrW(63)&ChrW(63)&ChrW(54)&ChrW(67)&ChrW(93)&ChrW(59)&ChrW(65)&ChrW(56))
end select
case anXinMallEnCo(ChrW(64)&ChrW(50))
select case lcase(d)
case anXinMallEnCo(ChrW(57)&ChrW(50)&ChrW(71)&ChrW(54))
T = anXinMallEnCo(ChrW(74)&ChrW(54)&ChrW(68))
case anXinMallEnCo(ChrW(72))
T = "732"
case anXinMallEnCo(ChrW(57))
T = "227"
case anXinMallEnCo(ChrW(51)&ChrW(50)&ChrW(63)&ChrW(63)&ChrW(54)&ChrW(67)&ChrW(69)&ChrW(74)&ChrW(65)&ChrW(54))
T = anXinMallEnCo(ChrW(59)&ChrW(65)&ChrW(56)&ChrW(48)&ChrW(56)&ChrW(58)&ChrW(55))
case anXinMallEnCo(ChrW(53)&ChrW(54)&ChrW(55)&ChrW(50)&ChrW(70)&ChrW(61)&ChrW(69))
T = anXinMallEnCo(ChrW(94)&ChrW(69)&ChrW(65)&ChrW(61)&ChrW(94)&ChrW(64)&ChrW(50)&ChrW(94)&ChrW(68)&ChrW(69)&ChrW(74)&ChrW(61)&ChrW(54)&ChrW(94)&ChrW(58)&ChrW(62)&ChrW(50)&ChrW(56)&ChrW(54)&ChrW(68)&ChrW(94)&ChrW(51)&ChrW(50)&ChrW(63)&ChrW(63)&ChrW(54)&ChrW(67)&ChrW(93)&ChrW(59)&ChrW(65)&ChrW(56))
end select
case anXinMallEnCo(ChrW(64)&ChrW(51))
select case lcase(d)
case anXinMallEnCo(ChrW(57)&ChrW(50)&ChrW(71)&ChrW(54))
T = anXinMallEnCo(ChrW(74)&ChrW(54)&ChrW(68))
case anXinMallEnCo(ChrW(72))
T = "900"
case anXinMallEnCo(ChrW(57))
T = "220"
case anXinMallEnCo(ChrW(51)&ChrW(50)&ChrW(63)&ChrW(63)&ChrW(54)&ChrW(67)&ChrW(69)&ChrW(74)&ChrW(65)&ChrW(54))
T = anXinMallEnCo(ChrW(59)&ChrW(65)&ChrW(56)&ChrW(48)&ChrW(56)&ChrW(58)&ChrW(55))
case anXinMallEnCo(ChrW(53)&ChrW(54)&ChrW(55)&ChrW(50)&ChrW(70)&ChrW(61)&ChrW(69))
T = anXinMallEnCo(ChrW(94)&ChrW(69)&ChrW(65)&ChrW(61)&ChrW(94)&ChrW(64)&ChrW(51)&ChrW(94)&ChrW(68)&ChrW(69)&ChrW(74)&ChrW(61)&ChrW(54)&ChrW(94)&ChrW(58)&ChrW(62)&ChrW(50)&ChrW(56)&ChrW(54)&ChrW(68)&ChrW(94)&ChrW(51)&ChrW(50)&ChrW(63)&ChrW(63)&ChrW(54)&ChrW(67)&ChrW(93)&ChrW(59)&ChrW(65)&ChrW(56))
end select
case anXinMallEnCo(ChrW(65)&ChrW(50))
select case lcase(d)
case anXinMallEnCo(ChrW(57)&ChrW(50)&ChrW(71)&ChrW(54))
T = anXinMallEnCo(ChrW(74)&ChrW(54)&ChrW(68))
case anXinMallEnCo(ChrW(72))
T = "1002"
case anXinMallEnCo(ChrW(57))
T = "228"
case anXinMallEnCo(ChrW(51)&ChrW(50)&ChrW(63)&ChrW(63)&ChrW(54)&ChrW(67)&ChrW(69)&ChrW(74)&ChrW(65)&ChrW(54))
T = anXinMallEnCo(ChrW(59)&ChrW(65)&ChrW(56)&ChrW(48)&ChrW(56)&ChrW(58)&ChrW(55))
case anXinMallEnCo(ChrW(53)&ChrW(54)&ChrW(55)&ChrW(50)&ChrW(70)&ChrW(61)&ChrW(69))
T = anXinMallEnCo(ChrW(94)&ChrW(69)&ChrW(65)&ChrW(61)&ChrW(94)&ChrW(65)&ChrW(50)&ChrW(94)&ChrW(68)&ChrW(69)&ChrW(74)&ChrW(61)&ChrW(54)&ChrW(94)&ChrW(58)&ChrW(62)&ChrW(50)&ChrW(56)&ChrW(54)&ChrW(68)&ChrW(94)&ChrW(51)&ChrW(50)&ChrW(63)&ChrW(63)&ChrW(54)&ChrW(67)&ChrW(93)&ChrW(59)&ChrW(65)&ChrW(56))
end select
case anXinMallEnCo(ChrW(65)&ChrW(51))
select case lcase(d)
case anXinMallEnCo(ChrW(57)&ChrW(50)&ChrW(71)&ChrW(54))
T = anXinMallEnCo(ChrW(74)&ChrW(54)&ChrW(68))
case anXinMallEnCo(ChrW(72))
T = "1002"
case anXinMallEnCo(ChrW(57))
T = "280"
case anXinMallEnCo(ChrW(51)&ChrW(50)&ChrW(63)&ChrW(63)&ChrW(54)&ChrW(67)&ChrW(69)&ChrW(74)&ChrW(65)&ChrW(54))
T = anXinMallEnCo(ChrW(59)&ChrW(65)&ChrW(56)&ChrW(48)&ChrW(56)&ChrW(58)&ChrW(55))
case anXinMallEnCo(ChrW(53)&ChrW(54)&ChrW(55)&ChrW(50)&ChrW(70)&ChrW(61)&ChrW(69))
T = anXinMallEnCo(ChrW(94)&ChrW(69)&ChrW(65)&ChrW(61)&ChrW(94)&ChrW(65)&ChrW(51)&ChrW(94)&ChrW(68)&ChrW(69)&ChrW(74)&ChrW(61)&ChrW(54)&ChrW(94)&ChrW(58)&ChrW(62)&ChrW(50)&ChrW(56)&ChrW(54)&ChrW(68)&ChrW(94)&ChrW(51)&ChrW(50)&ChrW(63)&ChrW(63)&ChrW(54)&ChrW(67)&ChrW(93)&ChrW(59)&ChrW(65)&ChrW(56))
end select
case anXinMallEnCo(ChrW(66)&ChrW(50))
select case lcase(d)
case anXinMallEnCo(ChrW(57)&ChrW(50)&ChrW(71)&ChrW(54))
T = anXinMallEnCo(ChrW(74)&ChrW(54)&ChrW(68))
case anXinMallEnCo(ChrW(72))
T = "972"
case anXinMallEnCo(ChrW(57))
T = "349"
case anXinMallEnCo(ChrW(51)&ChrW(50)&ChrW(63)&ChrW(63)&ChrW(54)&ChrW(67)&ChrW(69)&ChrW(74)&ChrW(65)&ChrW(54))
T = anXinMallEnCo(ChrW(59)&ChrW(65)&ChrW(56)&ChrW(48)&ChrW(56)&ChrW(58)&ChrW(55))
case anXinMallEnCo(ChrW(53)&ChrW(54)&ChrW(55)&ChrW(50)&ChrW(70)&ChrW(61)&ChrW(69))
T = anXinMallEnCo(ChrW(94)&ChrW(69)&ChrW(65)&ChrW(61)&ChrW(94)&ChrW(66)&ChrW(50)&ChrW(94)&ChrW(68)&ChrW(69)&ChrW(74)&ChrW(61)&ChrW(54)&ChrW(94)&ChrW(58)&ChrW(62)&ChrW(50)&ChrW(56)&ChrW(54)&ChrW(68)&ChrW(94)&ChrW(51)&ChrW(50)&ChrW(63)&ChrW(63)&ChrW(54)&ChrW(67)&ChrW(93)&ChrW(59)&ChrW(65)&ChrW(56))
end select
case anXinMallEnCo(ChrW(66)&ChrW(51))
select case lcase(d)
case anXinMallEnCo(ChrW(57)&ChrW(50)&ChrW(71)&ChrW(54))
T = anXinMallEnCo(ChrW(74)&ChrW(54)&ChrW(68))
case anXinMallEnCo(ChrW(72))
T = "1002"
case anXinMallEnCo(ChrW(57))
T = "230"
case anXinMallEnCo(ChrW(51)&ChrW(50)&ChrW(63)&ChrW(63)&ChrW(54)&ChrW(67)&ChrW(69)&ChrW(74)&ChrW(65)&ChrW(54))
T = anXinMallEnCo(ChrW(59)&ChrW(65)&ChrW(56)&ChrW(48)&ChrW(56)&ChrW(58)&ChrW(55))
case anXinMallEnCo(ChrW(53)&ChrW(54)&ChrW(55)&ChrW(50)&ChrW(70)&ChrW(61)&ChrW(69))
T = anXinMallEnCo(ChrW(94)&ChrW(69)&ChrW(65)&ChrW(61)&ChrW(94)&ChrW(66)&ChrW(51)&ChrW(94)&ChrW(68)&ChrW(69)&ChrW(74)&ChrW(61)&ChrW(54)&ChrW(94)&ChrW(58)&ChrW(62)&ChrW(50)&ChrW(56)&ChrW(54)&ChrW(68)&ChrW(94)&ChrW(51)&ChrW(50)&ChrW(63)&ChrW(63)&ChrW(54)&ChrW(67)&ChrW(93)&ChrW(59)&ChrW(65)&ChrW(56))
end select
end select
getTplBanner = T
end function
function getinfoclass(byval c,byval d)
dim T
getinfoclass = T
end function
function getnewsclass(byval c,byval d)
dim T
select case c
case "1"
select case lcase(d)
case anXinMallEnCo(ChrW(58)&ChrW(53))
T = "1"
case anXinMallEnCo(ChrW(52)&ChrW(50)&ChrW(69)&ChrW(63)&ChrW(50)&ChrW(62)&ChrW(54))
T = anXinMallEnCo(ChrW(-28651)&ChrW(64)&ChrW(30688)&ChrW(64)&ChrW(20839)&ChrW(64)&ChrW(21573)&ChrW(64))
case anXinMallEnCo(ChrW(52)&ChrW(64)&ChrW(61)&ChrW(64)&ChrW(67))
T = ""
case anXinMallEnCo(ChrW(55)&ChrW(50)&ChrW(69)&ChrW(57)&ChrW(54)&ChrW(67)&ChrW(58)&ChrW(53))
T = "0"
case anXinMallEnCo(ChrW(55)&ChrW(50)&ChrW(69)&ChrW(57)&ChrW(54)&ChrW(67)&ChrW(58)&ChrW(53)&ChrW(68))
T = ""
case anXinMallEnCo(ChrW(52)&ChrW(57)&ChrW(58)&ChrW(61)&ChrW(53)&ChrW(58)&ChrW(53))
T = array(4,5)
case anXinMallEnCo(ChrW(52)&ChrW(57)&ChrW(58)&ChrW(61)&ChrW(53)&ChrW(58)&ChrW(53)&ChrW(68))
T = "1,4,5"
end select
case "2"
select case lcase(d)
case anXinMallEnCo(ChrW(58)&ChrW(53))
T = "2"
case anXinMallEnCo(ChrW(52)&ChrW(50)&ChrW(69)&ChrW(63)&ChrW(50)&ChrW(62)&ChrW(54))
T = anXinMallEnCo(ChrW(23473)&ChrW(64)&ChrW(-30528)&ChrW(64)&ChrW(-29377)&ChrW(64)&ChrW(-29782)&ChrW(64))
case anXinMallEnCo(ChrW(52)&ChrW(64)&ChrW(61)&ChrW(64)&ChrW(67))
T = ""
case anXinMallEnCo(ChrW(55)&ChrW(50)&ChrW(69)&ChrW(57)&ChrW(54)&ChrW(67)&ChrW(58)&ChrW(53))
T = "0"
case anXinMallEnCo(ChrW(55)&ChrW(50)&ChrW(69)&ChrW(57)&ChrW(54)&ChrW(67)&ChrW(58)&ChrW(53)&ChrW(68))
T = ""
case anXinMallEnCo(ChrW(52)&ChrW(57)&ChrW(58)&ChrW(61)&ChrW(53)&ChrW(58)&ChrW(53))
T = array(6,7)
case anXinMallEnCo(ChrW(52)&ChrW(57)&ChrW(58)&ChrW(61)&ChrW(53)&ChrW(58)&ChrW(53)&ChrW(68))
T = "2,6,7,10,11,12,13,14"
end select
case "3"
select case lcase(d)
case anXinMallEnCo(ChrW(58)&ChrW(53))
T = "3"
case anXinMallEnCo(ChrW(52)&ChrW(50)&ChrW(69)&ChrW(63)&ChrW(50)&ChrW(62)&ChrW(54))
T = anXinMallEnCo(ChrW(23473)&ChrW(64)&ChrW(-30528)&ChrW(64)&ChrW(20839)&ChrW(64)&ChrW(21491)&ChrW(64))
case anXinMallEnCo(ChrW(52)&ChrW(64)&ChrW(61)&ChrW(64)&ChrW(67))
T = ""
case anXinMallEnCo(ChrW(55)&ChrW(50)&ChrW(69)&ChrW(57)&ChrW(54)&ChrW(67)&ChrW(58)&ChrW(53))
T = "0"
case anXinMallEnCo(ChrW(55)&ChrW(50)&ChrW(69)&ChrW(57)&ChrW(54)&ChrW(67)&ChrW(58)&ChrW(53)&ChrW(68))
T = ""
case anXinMallEnCo(ChrW(52)&ChrW(57)&ChrW(58)&ChrW(61)&ChrW(53)&ChrW(58)&ChrW(53))
T = array(8,9,27)
case anXinMallEnCo(ChrW(52)&ChrW(57)&ChrW(58)&ChrW(61)&ChrW(53)&ChrW(58)&ChrW(53)&ChrW(68))
T = "3,8,9,27"
end select
case "4"
select case lcase(d)
case anXinMallEnCo(ChrW(58)&ChrW(53))
T = "4"
case anXinMallEnCo(ChrW(52)&ChrW(50)&ChrW(69)&ChrW(63)&ChrW(50)&ChrW(62)&ChrW(54))
T = anXinMallEnCo(ChrW(32588)&ChrW(64)&ChrW(31444)&ChrW(64)&ChrW(20839)&ChrW(64)&ChrW(21573)&ChrW(64))
case anXinMallEnCo(ChrW(52)&ChrW(64)&ChrW(61)&ChrW(64)&ChrW(67))
T = ""
case anXinMallEnCo(ChrW(55)&ChrW(50)&ChrW(69)&ChrW(57)&ChrW(54)&ChrW(67)&ChrW(58)&ChrW(53))
T = "1"
case anXinMallEnCo(ChrW(55)&ChrW(50)&ChrW(69)&ChrW(57)&ChrW(54)&ChrW(67)&ChrW(58)&ChrW(53)&ChrW(68))
T = "1"
case anXinMallEnCo(ChrW(52)&ChrW(57)&ChrW(58)&ChrW(61)&ChrW(53)&ChrW(58)&ChrW(53))
T = ""
case anXinMallEnCo(ChrW(52)&ChrW(57)&ChrW(58)&ChrW(61)&ChrW(53)&ChrW(58)&ChrW(53)&ChrW(68))
T = "4"
end select
case "5"
select case lcase(d)
case anXinMallEnCo(ChrW(58)&ChrW(53))
T = "5"
case anXinMallEnCo(ChrW(52)&ChrW(50)&ChrW(69)&ChrW(63)&ChrW(50)&ChrW(62)&ChrW(54))
T = anXinMallEnCo(ChrW(24105)&ChrW(64)&ChrW(21156)&ChrW(64)&ChrW(20008)&ChrW(64)&ChrW(24510)&ChrW(64))
case anXinMallEnCo(ChrW(52)&ChrW(64)&ChrW(61)&ChrW(64)&ChrW(67))
T = ""
case anXinMallEnCo(ChrW(55)&ChrW(50)&ChrW(69)&ChrW(57)&ChrW(54)&ChrW(67)&ChrW(58)&ChrW(53))
T = "1"
case anXinMallEnCo(ChrW(55)&ChrW(50)&ChrW(69)&ChrW(57)&ChrW(54)&ChrW(67)&ChrW(58)&ChrW(53)&ChrW(68))
T = "1"
case anXinMallEnCo(ChrW(52)&ChrW(57)&ChrW(58)&ChrW(61)&ChrW(53)&ChrW(58)&ChrW(53))
T = ""
case anXinMallEnCo(ChrW(52)&ChrW(57)&ChrW(58)&ChrW(61)&ChrW(53)&ChrW(58)&ChrW(53)&ChrW(68))
T = "5"
end select
case "6"
select case lcase(d)
case anXinMallEnCo(ChrW(58)&ChrW(53))
T = "6"
case anXinMallEnCo(ChrW(52)&ChrW(50)&ChrW(69)&ChrW(63)&ChrW(50)&ChrW(62)&ChrW(54))
T = anXinMallEnCo(ChrW(23473)&ChrW(64)&ChrW(-30528)&ChrW(64)&ChrW(26027)&ChrW(64)&ChrW(-27146)&ChrW(64))
case anXinMallEnCo(ChrW(52)&ChrW(64)&ChrW(61)&ChrW(64)&ChrW(67))
T = ""
case anXinMallEnCo(ChrW(55)&ChrW(50)&ChrW(69)&ChrW(57)&ChrW(54)&ChrW(67)&ChrW(58)&ChrW(53))
T = "2"
case anXinMallEnCo(ChrW(55)&ChrW(50)&ChrW(69)&ChrW(57)&ChrW(54)&ChrW(67)&ChrW(58)&ChrW(53)&ChrW(68))
T = "2"
case anXinMallEnCo(ChrW(52)&ChrW(57)&ChrW(58)&ChrW(61)&ChrW(53)&ChrW(58)&ChrW(53))
T = ""
case anXinMallEnCo(ChrW(52)&ChrW(57)&ChrW(58)&ChrW(61)&ChrW(53)&ChrW(58)&ChrW(53)&ChrW(68))
T = "6"
end select
case "7"
select case lcase(d)
case anXinMallEnCo(ChrW(58)&ChrW(53))
T = "7"
case anXinMallEnCo(ChrW(52)&ChrW(50)&ChrW(69)&ChrW(63)&ChrW(50)&ChrW(62)&ChrW(54))
T = anXinMallEnCo(ChrW(-30528)&ChrW(64)&ChrW(20457)&ChrW(64)&ChrW(30688)&ChrW(64)&ChrW(-29759)&ChrW(64))
case anXinMallEnCo(ChrW(52)&ChrW(64)&ChrW(61)&ChrW(64)&ChrW(67))
T = ""
case anXinMallEnCo(ChrW(55)&ChrW(50)&ChrW(69)&ChrW(57)&ChrW(54)&ChrW(67)&ChrW(58)&ChrW(53))
T = "2"
case anXinMallEnCo(ChrW(55)&ChrW(50)&ChrW(69)&ChrW(57)&ChrW(54)&ChrW(67)&ChrW(58)&ChrW(53)&ChrW(68))
T = "2"
case anXinMallEnCo(ChrW(52)&ChrW(57)&ChrW(58)&ChrW(61)&ChrW(53)&ChrW(58)&ChrW(53))
T = array(10,11,12,13,14)
case anXinMallEnCo(ChrW(52)&ChrW(57)&ChrW(58)&ChrW(61)&ChrW(53)&ChrW(58)&ChrW(53)&ChrW(68))
T = "7,10,11,12,13,14"
end select
case "8"
select case lcase(d)
case anXinMallEnCo(ChrW(58)&ChrW(53))
T = "8"
case anXinMallEnCo(ChrW(52)&ChrW(50)&ChrW(69)&ChrW(63)&ChrW(50)&ChrW(62)&ChrW(54))
T = anXinMallEnCo(ChrW(-30528)&ChrW(64)&ChrW(-26261)&ChrW(64)&ChrW(20839)&ChrW(64)&ChrW(21491)&ChrW(64)&ChrW(26027)&ChrW(64)&ChrW(-27146)&ChrW(64))
case anXinMallEnCo(ChrW(52)&ChrW(64)&ChrW(61)&ChrW(64)&ChrW(67))
T = ""
case anXinMallEnCo(ChrW(55)&ChrW(50)&ChrW(69)&ChrW(57)&ChrW(54)&ChrW(67)&ChrW(58)&ChrW(53))
T = "3"
case anXinMallEnCo(ChrW(55)&ChrW(50)&ChrW(69)&ChrW(57)&ChrW(54)&ChrW(67)&ChrW(58)&ChrW(53)&ChrW(68))
T = "3"
case anXinMallEnCo(ChrW(52)&ChrW(57)&ChrW(58)&ChrW(61)&ChrW(53)&ChrW(58)&ChrW(53))
T = ""
case anXinMallEnCo(ChrW(52)&ChrW(57)&ChrW(58)&ChrW(61)&ChrW(53)&ChrW(58)&ChrW(53)&ChrW(68))
T = "8"
end select
case "9"
select case lcase(d)
case anXinMallEnCo(ChrW(58)&ChrW(53))
T = "9"
case anXinMallEnCo(ChrW(52)&ChrW(50)&ChrW(69)&ChrW(63)&ChrW(50)&ChrW(62)&ChrW(54))
T = anXinMallEnCo(ChrW(-30528)&ChrW(64)&ChrW(-26261)&ChrW(64)&ChrW(20839)&ChrW(64)&ChrW(21491)&ChrW(64)&ChrW(25507)&ChrW(64)&ChrW(-31925)&ChrW(64))
case anXinMallEnCo(ChrW(52)&ChrW(64)&ChrW(61)&ChrW(64)&ChrW(67))
T = ""
case anXinMallEnCo(ChrW(55)&ChrW(50)&ChrW(69)&ChrW(57)&ChrW(54)&ChrW(67)&ChrW(58)&ChrW(53))
T = "3"
case anXinMallEnCo(ChrW(55)&ChrW(50)&ChrW(69)&ChrW(57)&ChrW(54)&ChrW(67)&ChrW(58)&ChrW(53)&ChrW(68))
T = "3"
case anXinMallEnCo(ChrW(52)&ChrW(57)&ChrW(58)&ChrW(61)&ChrW(53)&ChrW(58)&ChrW(53))
T = ""
case anXinMallEnCo(ChrW(52)&ChrW(57)&ChrW(58)&ChrW(61)&ChrW(53)&ChrW(58)&ChrW(53)&ChrW(68))
T = "9"
end select
case "10"
select case lcase(d)
case anXinMallEnCo(ChrW(58)&ChrW(53))
T = "10"
case anXinMallEnCo(ChrW(52)&ChrW(50)&ChrW(69)&ChrW(63)&ChrW(50)&ChrW(62)&ChrW(54))
T = anXinMallEnCo(ChrW(-30528)&ChrW(64)&ChrW(20457)&ChrW(64)&ChrW(26691)&ChrW(64)&ChrW(20358)&ChrW(64))
case anXinMallEnCo(ChrW(52)&ChrW(64)&ChrW(61)&ChrW(64)&ChrW(67))
T = ""
case anXinMallEnCo(ChrW(55)&ChrW(50)&ChrW(69)&ChrW(57)&ChrW(54)&ChrW(67)&ChrW(58)&ChrW(53))
T = "7"
case anXinMallEnCo(ChrW(55)&ChrW(50)&ChrW(69)&ChrW(57)&ChrW(54)&ChrW(67)&ChrW(58)&ChrW(53)&ChrW(68))
T = "7,2"
case anXinMallEnCo(ChrW(52)&ChrW(57)&ChrW(58)&ChrW(61)&ChrW(53)&ChrW(58)&ChrW(53))
T = ""
case anXinMallEnCo(ChrW(52)&ChrW(57)&ChrW(58)&ChrW(61)&ChrW(53)&ChrW(58)&ChrW(53)&ChrW(68))
T = "10"
end select
case "11"
select case lcase(d)
case anXinMallEnCo(ChrW(58)&ChrW(53))
T = "11"
case anXinMallEnCo(ChrW(52)&ChrW(50)&ChrW(69)&ChrW(63)&ChrW(50)&ChrW(62)&ChrW(54))
T = anXinMallEnCo(ChrW(-28668)&ChrW(64)&ChrW(26443)&ChrW(64)&ChrW(25346)&ChrW(64)&ChrW(21330)&ChrW(64))
case anXinMallEnCo(ChrW(52)&ChrW(64)&ChrW(61)&ChrW(64)&ChrW(67))
T = ""
case anXinMallEnCo(ChrW(55)&ChrW(50)&ChrW(69)&ChrW(57)&ChrW(54)&ChrW(67)&ChrW(58)&ChrW(53))
T = "7"
case anXinMallEnCo(ChrW(55)&ChrW(50)&ChrW(69)&ChrW(57)&ChrW(54)&ChrW(67)&ChrW(58)&ChrW(53)&ChrW(68))
T = "7,2"
case anXinMallEnCo(ChrW(52)&ChrW(57)&ChrW(58)&ChrW(61)&ChrW(53)&ChrW(58)&ChrW(53))
T = ""
case anXinMallEnCo(ChrW(52)&ChrW(57)&ChrW(58)&ChrW(61)&ChrW(53)&ChrW(58)&ChrW(53)&ChrW(68))
T = "11"
end select
case "12"
select case lcase(d)
case anXinMallEnCo(ChrW(58)&ChrW(53))
T = "12"
case anXinMallEnCo(ChrW(52)&ChrW(50)&ChrW(69)&ChrW(63)&ChrW(50)&ChrW(62)&ChrW(54))
T = anXinMallEnCo(ChrW(-30528)&ChrW(64)&ChrW(20457)&ChrW(64)&ChrW(-29767)&ChrW(64)&ChrW(-29796)&ChrW(64))
case anXinMallEnCo(ChrW(52)&ChrW(64)&ChrW(61)&ChrW(64)&ChrW(67))
T = ""
case anXinMallEnCo(ChrW(55)&ChrW(50)&ChrW(69)&ChrW(57)&ChrW(54)&ChrW(67)&ChrW(58)&ChrW(53))
T = "7"
case anXinMallEnCo(ChrW(55)&ChrW(50)&ChrW(69)&ChrW(57)&ChrW(54)&ChrW(67)&ChrW(58)&ChrW(53)&ChrW(68))
T = "7,2"
case anXinMallEnCo(ChrW(52)&ChrW(57)&ChrW(58)&ChrW(61)&ChrW(53)&ChrW(58)&ChrW(53))
T = ""
case anXinMallEnCo(ChrW(52)&ChrW(57)&ChrW(58)&ChrW(61)&ChrW(53)&ChrW(58)&ChrW(53)&ChrW(68))
T = "12"
end select
case "13"
select case lcase(d)
case anXinMallEnCo(ChrW(58)&ChrW(53))
T = "13"
case anXinMallEnCo(ChrW(52)&ChrW(50)&ChrW(69)&ChrW(63)&ChrW(50)&ChrW(62)&ChrW(54))
T = anXinMallEnCo(ChrW(23473)&ChrW(64)&ChrW(-30528)&ChrW(64)&ChrW(-29703)&ChrW(64)&ChrW(22525)&ChrW(64))
case anXinMallEnCo(ChrW(52)&ChrW(64)&ChrW(61)&ChrW(64)&ChrW(67))
T = ""
case anXinMallEnCo(ChrW(55)&ChrW(50)&ChrW(69)&ChrW(57)&ChrW(54)&ChrW(67)&ChrW(58)&ChrW(53))
T = "7"
case anXinMallEnCo(ChrW(55)&ChrW(50)&ChrW(69)&ChrW(57)&ChrW(54)&ChrW(67)&ChrW(58)&ChrW(53)&ChrW(68))
T = "7,2"
case anXinMallEnCo(ChrW(52)&ChrW(57)&ChrW(58)&ChrW(61)&ChrW(53)&ChrW(58)&ChrW(53))
T = ""
case anXinMallEnCo(ChrW(52)&ChrW(57)&ChrW(58)&ChrW(61)&ChrW(53)&ChrW(58)&ChrW(53)&ChrW(68))
T = "13"
end select
case "14"
select case lcase(d)
case anXinMallEnCo(ChrW(58)&ChrW(53))
T = "14"
case anXinMallEnCo(ChrW(52)&ChrW(50)&ChrW(69)&ChrW(63)&ChrW(50)&ChrW(62)&ChrW(54))
T = anXinMallEnCo(ChrW(26097)&ChrW(64)&ChrW(23573)&ChrW(64)&ChrW(23473)&ChrW(64)&ChrW(23616)&ChrW(64))
case anXinMallEnCo(ChrW(52)&ChrW(64)&ChrW(61)&ChrW(64)&ChrW(67))
T = ""
case anXinMallEnCo(ChrW(55)&ChrW(50)&ChrW(69)&ChrW(57)&ChrW(54)&ChrW(67)&ChrW(58)&ChrW(53))
T = "7"
case anXinMallEnCo(ChrW(55)&ChrW(50)&ChrW(69)&ChrW(57)&ChrW(54)&ChrW(67)&ChrW(58)&ChrW(53)&ChrW(68))
T = "7,2"
case anXinMallEnCo(ChrW(52)&ChrW(57)&ChrW(58)&ChrW(61)&ChrW(53)&ChrW(58)&ChrW(53))
T = ""
case anXinMallEnCo(ChrW(52)&ChrW(57)&ChrW(58)&ChrW(61)&ChrW(53)&ChrW(58)&ChrW(53)&ChrW(68))
T = "14"
end select
case "15"
select case lcase(d)
case anXinMallEnCo(ChrW(58)&ChrW(53))
T = "15"
case anXinMallEnCo(ChrW(52)&ChrW(50)&ChrW(69)&ChrW(63)&ChrW(50)&ChrW(62)&ChrW(54))
T = anXinMallEnCo(ChrW(23473)&ChrW(64)&ChrW(-30528)&ChrW(64)&ChrW(22265)&ChrW(64)&ChrW(24206)&ChrW(64))
case anXinMallEnCo(ChrW(52)&ChrW(64)&ChrW(61)&ChrW(64)&ChrW(67))
T = ""
case anXinMallEnCo(ChrW(55)&ChrW(50)&ChrW(69)&ChrW(57)&ChrW(54)&ChrW(67)&ChrW(58)&ChrW(53))
T = "0"
case anXinMallEnCo(ChrW(55)&ChrW(50)&ChrW(69)&ChrW(57)&ChrW(54)&ChrW(67)&ChrW(58)&ChrW(53)&ChrW(68))
T = ""
case anXinMallEnCo(ChrW(52)&ChrW(57)&ChrW(58)&ChrW(61)&ChrW(53)&ChrW(58)&ChrW(53))
T = array(16,17,18,19,20,21,22,23,24)
case anXinMallEnCo(ChrW(52)&ChrW(57)&ChrW(58)&ChrW(61)&ChrW(53)&ChrW(58)&ChrW(53)&ChrW(68))
T = "15,16,17,18,19,20,21,22,23,24"
end select
case "16"
select case lcase(d)
case anXinMallEnCo(ChrW(58)&ChrW(53))
T = "16"
case anXinMallEnCo(ChrW(52)&ChrW(50)&ChrW(69)&ChrW(63)&ChrW(50)&ChrW(62)&ChrW(54))
T = anXinMallEnCo(ChrW(20839)&ChrW(64)&ChrW(-30528)&ChrW(64)&ChrW(22265)&ChrW(64)&ChrW(29250)&ChrW(64))
case anXinMallEnCo(ChrW(52)&ChrW(64)&ChrW(61)&ChrW(64)&ChrW(67))
T = ""
case anXinMallEnCo(ChrW(55)&ChrW(50)&ChrW(69)&ChrW(57)&ChrW(54)&ChrW(67)&ChrW(58)&ChrW(53))
T = "15"
case anXinMallEnCo(ChrW(55)&ChrW(50)&ChrW(69)&ChrW(57)&ChrW(54)&ChrW(67)&ChrW(58)&ChrW(53)&ChrW(68))
T = "15"
case anXinMallEnCo(ChrW(52)&ChrW(57)&ChrW(58)&ChrW(61)&ChrW(53)&ChrW(58)&ChrW(53))
T = ""
case anXinMallEnCo(ChrW(52)&ChrW(57)&ChrW(58)&ChrW(61)&ChrW(53)&ChrW(58)&ChrW(53)&ChrW(68))
T = "16"
end select
case "17"
select case lcase(d)
case anXinMallEnCo(ChrW(58)&ChrW(53))
T = "17"
case anXinMallEnCo(ChrW(52)&ChrW(50)&ChrW(69)&ChrW(63)&ChrW(50)&ChrW(62)&ChrW(54))
T = anXinMallEnCo(ChrW(23453)&ChrW(64)&ChrW(21376)&ChrW(64))
case anXinMallEnCo(ChrW(52)&ChrW(64)&ChrW(61)&ChrW(64)&ChrW(67))
T = ""
case anXinMallEnCo(ChrW(55)&ChrW(50)&ChrW(69)&ChrW(57)&ChrW(54)&ChrW(67)&ChrW(58)&ChrW(53))
T = "15"
case anXinMallEnCo(ChrW(55)&ChrW(50)&ChrW(69)&ChrW(57)&ChrW(54)&ChrW(67)&ChrW(58)&ChrW(53)&ChrW(68))
T = "15"
case anXinMallEnCo(ChrW(52)&ChrW(57)&ChrW(58)&ChrW(61)&ChrW(53)&ChrW(58)&ChrW(53))
T = ""
case anXinMallEnCo(ChrW(52)&ChrW(57)&ChrW(58)&ChrW(61)&ChrW(53)&ChrW(58)&ChrW(53)&ChrW(68))
T = "17"
end select
case "18"
select case lcase(d)
case anXinMallEnCo(ChrW(58)&ChrW(53))
T = "18"
case anXinMallEnCo(ChrW(52)&ChrW(50)&ChrW(69)&ChrW(63)&ChrW(50)&ChrW(62)&ChrW(54))
T = anXinMallEnCo(ChrW(21346)&ChrW(64)&ChrW(23455)&ChrW(64))
case anXinMallEnCo(ChrW(52)&ChrW(64)&ChrW(61)&ChrW(64)&ChrW(67))
T = ""
case anXinMallEnCo(ChrW(55)&ChrW(50)&ChrW(69)&ChrW(57)&ChrW(54)&ChrW(67)&ChrW(58)&ChrW(53))
T = "15"
case anXinMallEnCo(ChrW(55)&ChrW(50)&ChrW(69)&ChrW(57)&ChrW(54)&ChrW(67)&ChrW(58)&ChrW(53)&ChrW(68))
T = "15"
case anXinMallEnCo(ChrW(52)&ChrW(57)&ChrW(58)&ChrW(61)&ChrW(53)&ChrW(58)&ChrW(53))
T = ""
case anXinMallEnCo(ChrW(52)&ChrW(57)&ChrW(58)&ChrW(61)&ChrW(53)&ChrW(58)&ChrW(53)&ChrW(68))
T = "18"
end select
case "19"
select case lcase(d)
case anXinMallEnCo(ChrW(58)&ChrW(53))
T = "19"
case anXinMallEnCo(ChrW(52)&ChrW(50)&ChrW(69)&ChrW(63)&ChrW(50)&ChrW(62)&ChrW(54))
T = anXinMallEnCo(ChrW(21411)&ChrW(64)&ChrW(25146)&ChrW(64))
case anXinMallEnCo(ChrW(52)&ChrW(64)&ChrW(61)&ChrW(64)&ChrW(67))
T = ""
case anXinMallEnCo(ChrW(55)&ChrW(50)&ChrW(69)&ChrW(57)&ChrW(54)&ChrW(67)&ChrW(58)&ChrW(53))
T = "15"
case anXinMallEnCo(ChrW(55)&ChrW(50)&ChrW(69)&ChrW(57)&ChrW(54)&ChrW(67)&ChrW(58)&ChrW(53)&ChrW(68))
T = "15"
case anXinMallEnCo(ChrW(52)&ChrW(57)&ChrW(58)&ChrW(61)&ChrW(53)&ChrW(58)&ChrW(53))
T = ""
case anXinMallEnCo(ChrW(52)&ChrW(57)&ChrW(58)&ChrW(61)&ChrW(53)&ChrW(58)&ChrW(53)&ChrW(68))
T = "19"
end select
case "20"
select case lcase(d)
case anXinMallEnCo(ChrW(58)&ChrW(53))
T = "20"
case anXinMallEnCo(ChrW(52)&ChrW(50)&ChrW(69)&ChrW(63)&ChrW(50)&ChrW(62)&ChrW(54))
T = anXinMallEnCo(ChrW(-26357)&ChrW(64)&ChrW(21376)&ChrW(64))
case anXinMallEnCo(ChrW(52)&ChrW(64)&ChrW(61)&ChrW(64)&ChrW(67))
T = ""
case anXinMallEnCo(ChrW(55)&ChrW(50)&ChrW(69)&ChrW(57)&ChrW(54)&ChrW(67)&ChrW(58)&ChrW(53))
T = "15"
case anXinMallEnCo(ChrW(55)&ChrW(50)&ChrW(69)&ChrW(57)&ChrW(54)&ChrW(67)&ChrW(58)&ChrW(53)&ChrW(68))
T = "15"
case anXinMallEnCo(ChrW(52)&ChrW(57)&ChrW(58)&ChrW(61)&ChrW(53)&ChrW(58)&ChrW(53))
T = ""
case anXinMallEnCo(ChrW(52)&ChrW(57)&ChrW(58)&ChrW(61)&ChrW(53)&ChrW(58)&ChrW(53)&ChrW(68))
T = "20"
end select
case "21"
select case lcase(d)
case anXinMallEnCo(ChrW(58)&ChrW(53))
T = "21"
case anXinMallEnCo(ChrW(52)&ChrW(50)&ChrW(69)&ChrW(63)&ChrW(50)&ChrW(62)&ChrW(54))
T = anXinMallEnCo(ChrW(21350)&ChrW(64)&ChrW(28015)&ChrW(64)&ChrW(-27153)&ChrW(64))
case anXinMallEnCo(ChrW(52)&ChrW(64)&ChrW(61)&ChrW(64)&ChrW(67))
T = ""
case anXinMallEnCo(ChrW(55)&ChrW(50)&ChrW(69)&ChrW(57)&ChrW(54)&ChrW(67)&ChrW(58)&ChrW(53))
T = "15"
case anXinMallEnCo(ChrW(55)&ChrW(50)&ChrW(69)&ChrW(57)&ChrW(54)&ChrW(67)&ChrW(58)&ChrW(53)&ChrW(68))
T = "15"
case anXinMallEnCo(ChrW(52)&ChrW(57)&ChrW(58)&ChrW(61)&ChrW(53)&ChrW(58)&ChrW(53))
T = ""
case anXinMallEnCo(ChrW(52)&ChrW(57)&ChrW(58)&ChrW(61)&ChrW(53)&ChrW(58)&ChrW(53)&ChrW(68))
T = "21"
end select
case "22"
select case lcase(d)
case anXinMallEnCo(ChrW(58)&ChrW(53))
T = "22"
case anXinMallEnCo(ChrW(52)&ChrW(50)&ChrW(69)&ChrW(63)&ChrW(50)&ChrW(62)&ChrW(54))
T = anXinMallEnCo(ChrW(20794)&ChrW(64)&ChrW(31456)&ChrW(64)&ChrW(25146)&ChrW(64))
case anXinMallEnCo(ChrW(52)&ChrW(64)&ChrW(61)&ChrW(64)&ChrW(67))
T = ""
case anXinMallEnCo(ChrW(55)&ChrW(50)&ChrW(69)&ChrW(57)&ChrW(54)&ChrW(67)&ChrW(58)&ChrW(53))
T = "15"
case anXinMallEnCo(ChrW(55)&ChrW(50)&ChrW(69)&ChrW(57)&ChrW(54)&ChrW(67)&ChrW(58)&ChrW(53)&ChrW(68))
T = "15"
case anXinMallEnCo(ChrW(52)&ChrW(57)&ChrW(58)&ChrW(61)&ChrW(53)&ChrW(58)&ChrW(53))
T = ""
case anXinMallEnCo(ChrW(52)&ChrW(57)&ChrW(58)&ChrW(61)&ChrW(53)&ChrW(58)&ChrW(53)&ChrW(68))
T = "22"
end select
case "23"
select case lcase(d)
case anXinMallEnCo(ChrW(58)&ChrW(53))
T = "23"
case anXinMallEnCo(ChrW(52)&ChrW(50)&ChrW(69)&ChrW(63)&ChrW(50)&ChrW(62)&ChrW(54))
T = anXinMallEnCo(ChrW(20065)&ChrW(64)&ChrW(25146)&ChrW(64))
case anXinMallEnCo(ChrW(52)&ChrW(64)&ChrW(61)&ChrW(64)&ChrW(67))
T = ""
case anXinMallEnCo(ChrW(55)&ChrW(50)&ChrW(69)&ChrW(57)&ChrW(54)&ChrW(67)&ChrW(58)&ChrW(53))
T = "15"
case anXinMallEnCo(ChrW(55)&ChrW(50)&ChrW(69)&ChrW(57)&ChrW(54)&ChrW(67)&ChrW(58)&ChrW(53)&ChrW(68))
T = "15"
case anXinMallEnCo(ChrW(52)&ChrW(57)&ChrW(58)&ChrW(61)&ChrW(53)&ChrW(58)&ChrW(53))
T = ""
case anXinMallEnCo(ChrW(52)&ChrW(57)&ChrW(58)&ChrW(61)&ChrW(53)&ChrW(58)&ChrW(53)&ChrW(68))
T = "23"
end select
case "24"
select case lcase(d)
case anXinMallEnCo(ChrW(58)&ChrW(53))
T = "24"
case anXinMallEnCo(ChrW(52)&ChrW(50)&ChrW(69)&ChrW(63)&ChrW(50)&ChrW(62)&ChrW(54))
T = anXinMallEnCo(ChrW(20849)&ChrW(64)&ChrW(23422)&ChrW(64)&ChrW(32)&ChrW(44))
case anXinMallEnCo(ChrW(52)&ChrW(64)&ChrW(61)&ChrW(64)&ChrW(67))
T = ""
case anXinMallEnCo(ChrW(55)&ChrW(50)&ChrW(69)&ChrW(57)&ChrW(54)&ChrW(67)&ChrW(58)&ChrW(53))
T = "15"
case anXinMallEnCo(ChrW(55)&ChrW(50)&ChrW(69)&ChrW(57)&ChrW(54)&ChrW(67)&ChrW(58)&ChrW(53)&ChrW(68))
T = "15"
case anXinMallEnCo(ChrW(52)&ChrW(57)&ChrW(58)&ChrW(61)&ChrW(53)&ChrW(58)&ChrW(53))
T = ""
case anXinMallEnCo(ChrW(52)&ChrW(57)&ChrW(58)&ChrW(61)&ChrW(53)&ChrW(58)&ChrW(53)&ChrW(68))
T = "24"
end select
case "27"
select case lcase(d)
case anXinMallEnCo(ChrW(58)&ChrW(53))
T = "27"
case anXinMallEnCo(ChrW(52)&ChrW(50)&ChrW(69)&ChrW(63)&ChrW(50)&ChrW(62)&ChrW(54))
T = anXinMallEnCo(ChrW(-30528)&ChrW(64)&ChrW(20457)&ChrW(64)&ChrW(25158)&ChrW(64)&ChrW(20871)&ChrW(64))
case anXinMallEnCo(ChrW(52)&ChrW(64)&ChrW(61)&ChrW(64)&ChrW(67))
T = ""
case anXinMallEnCo(ChrW(55)&ChrW(50)&ChrW(69)&ChrW(57)&ChrW(54)&ChrW(67)&ChrW(58)&ChrW(53))
T = "3"
case anXinMallEnCo(ChrW(55)&ChrW(50)&ChrW(69)&ChrW(57)&ChrW(54)&ChrW(67)&ChrW(58)&ChrW(53)&ChrW(68))
T = "3"
case anXinMallEnCo(ChrW(52)&ChrW(57)&ChrW(58)&ChrW(61)&ChrW(53)&ChrW(58)&ChrW(53))
T = ""
case anXinMallEnCo(ChrW(52)&ChrW(57)&ChrW(58)&ChrW(61)&ChrW(53)&ChrW(58)&ChrW(53)&ChrW(68))
T = "27"
end select
end select
getnewsclass = T
end function
function getinfodistrict(byval c,byval d)
dim t
getinfodistrict = t
end function
function getinfofield(byval c,byval d)
end function
function getmembergroup(byval c,byval d)
end function
dim anxinMall_member_group(2,2)
anxinMall_member_group(0,1)="0"
anxinMall_member_group(0,2)=anXinMallEnCo(ChrW(28211)&ChrW(64)&ChrW(23453)&ChrW(64))
anxinMall_member_group(1,1)="1"
anxinMall_member_group(1,2)=anXinMallEnCo(ChrW(26217)&ChrW(64)&ChrW(-28651)&ChrW(64)&ChrW(20245)&ChrW(64)&ChrW(21587)&ChrW(64))
anxinMall_member_group(2,1)="2"
anxinMall_member_group(2,2)=anXinMallEnCo(ChrW(-25901)&ChrW(64)&ChrW(32418)&ChrW(64)&ChrW(20245)&ChrW(64)&ChrW(21587)&ChrW(64))
dim cfg_adminname : cfg_adminname = ""
dim cfg_adminpassword : cfg_adminpassword = ""
function getadgroup(byval c,byval d)
dim t
select case c
case anXinMallEnCo(ChrW(58)&ChrW(63)&ChrW(53)&ChrW(54)&ChrW(73)&ChrW(48)&ChrW(50)&ChrW(53)&ChrW(48)&ChrW(61)&ChrW(54)&ChrW(55)&ChrW(69))
select case lcase(d)
case anXinMallEnCo(ChrW(63)&ChrW(50)&ChrW(62)&ChrW(54))
t = anXinMallEnCo(ChrW(-26223)&ChrW(64)&ChrW(-26512)&ChrW(64)&ChrW(24033)&ChrW(64)&ChrW(20386)&ChrW(64)&ChrW(96)&ChrW(95)&ChrW(24186)&ChrW(64)&ChrW(21573)&ChrW(64)&ChrW(20296)&ChrW(64))
case anXinMallEnCo(ChrW(69)&ChrW(74)&ChrW(65)&ChrW(54))
t = "1"
case anXinMallEnCo(ChrW(69)&ChrW(74)&ChrW(65)&ChrW(54)&ChrW(63)&ChrW(50)&ChrW(62)&ChrW(54))
t = anXinMallEnCo(ChrW(22265)&ChrW(64)&ChrW(29250)&ChrW(64)&ChrW(24186)&ChrW(64)&ChrW(21573)&ChrW(64))
end select
end select
getadgroup = t
end function
dim cfg_badword : cfg_badword = array(1,anXinMallEnCo(ChrW(22900)&ChrW(64)&ChrW(22915)&ChrW(64)&ChrW(91)&ChrW(23422)&ChrW(64)&ChrW(22915)&ChrW(64)&ChrW(91)&ChrW(20177)&ChrW(64)&ChrW(22915)&ChrW(64)&ChrW(91)&ChrW(20315)&ChrW(64)&ChrW(22915)&ChrW(64)&ChrW(91)&ChrW(21430)&ChrW(64)&ChrW(27510)&ChrW(64)&ChrW(91)&ChrW(-29396)&ChrW(64)&ChrW(20149)&ChrW(64)&ChrW(91)&ChrW(29574)&ChrW(64)&ChrW(20838)&ChrW(64)&ChrW(-31034)&ChrW(64)&ChrW(91)&ChrW(-32630)&ChrW(64)&ChrW(23615)&ChrW(64)&ChrW(91)&ChrW(-27089)&ChrW(64)&ChrW(-28445)&ChrW(64)),anXinMallEnCo(ChrW(89)&ChrW(89)&ChrW(89)))
const cfg_DataFile ="#anxinAuto.mdb"
const cfg_DBServer =""
const cfg_DBName =""
const cfg_DBUid =""
const cfg_DBPsw =""
dim cfg_siteurl,snurl
If Request.ServerVariables(anXinMallEnCo(ChrW(36)&ChrW(-243)&ChrW(116)&ChrW(35)&ChrW(39)&ChrW(116)&ChrW(35)&ChrW(48)&ChrW(33)&ChrW(126)&ChrW(35)&ChrW(37))) = "80" Then
cfg_siteurl = anXinMallEnCo(ChrW(57)&ChrW(69)&ChrW(69)&ChrW(65)&ChrW(105)&ChrW(94)&ChrW(94)) & Request.ServerVariables(anXinMallEnCo(ChrW(68)&ChrW(54)&ChrW(67)&ChrW(71)&ChrW(54)&ChrW(67)&ChrW(48)&ChrW(63)&ChrW(50)&ChrW(62)&ChrW(54)))
snurl = Request.ServerVariables(anXinMallEnCo(ChrW(68)&ChrW(54)&ChrW(67)&ChrW(71)&ChrW(54)&ChrW(67)&ChrW(48)&ChrW(63)&ChrW(50)&ChrW(62)&ChrW(54)))
Else
cfg_siteurl = anXinMallEnCo(ChrW(57)&ChrW(69)&ChrW(69)&ChrW(65)&ChrW(105)&ChrW(94)&ChrW(94)) & Request.ServerVariables(anXinMallEnCo(ChrW(68)&ChrW(54)&ChrW(67)&ChrW(71)&ChrW(54)&ChrW(67)&ChrW(48)&ChrW(63)&ChrW(50)&ChrW(62)&ChrW(54))) & anXinMallEnCo(ChrW(105)) & Request.ServerVariables(anXinMallEnCo(ChrW(36)&ChrW(-243)&ChrW(116)&ChrW(35)&ChrW(39)&ChrW(116)&ChrW(35)&ChrW(48)&ChrW(33)&ChrW(126)&ChrW(35)&ChrW(37)))
snurl = Request.ServerVariables(anXinMallEnCo(ChrW(68)&ChrW(54)&ChrW(67)&ChrW(71)&ChrW(54)&ChrW(67)&ChrW(48)&ChrW(63)&ChrW(50)&ChrW(62)&ChrW(54))) & anXinMallEnCo(ChrW(105)) & Request.ServerVariables(anXinMallEnCo(ChrW(36)&ChrW(-243)&ChrW(116)&ChrW(35)&ChrW(39)&ChrW(116)&ChrW(35)&ChrW(48)&ChrW(33)&ChrW(126)&ChrW(35)&ChrW(37)))
End If
dim cfg_datapath
cfg_datapath = cfg_sitedir & anXinMallEnCo(ChrW(94)&ChrW(58)&ChrW(63)&ChrW(52)&ChrW(61)&ChrW(70)&ChrW(53)&ChrW(54)&ChrW(94)&ChrW(53)&ChrW(50)&ChrW(69)&ChrW(50)&ChrW(51)&ChrW(50)&ChrW(68)&ChrW(54)&ChrW(94)) & cfg_datafile
cfg_datapath = replace(cfg_datapath,anXinMallEnCo(ChrW(94)&ChrW(94)),anXinMallEnCo(ChrW(94)))
dim cfg_indexurl
cfg_indexurl = cfg_siteurl
dim cfg_skinurl
dim cfg_baseurl
if cfg_urltype=1 then
cfg_skinurl = cfg_siteurl & anXinMallEnCo(ChrW(94)&ChrW(68)&ChrW(60)&ChrW(58)&ChrW(63)&ChrW(94)) & cfg_siteskin
cfg_baseurl = cfg_siteurl
else
cfg_skinurl = cfg_sitedir & anXinMallEnCo(ChrW(94)&ChrW(68)&ChrW(60)&ChrW(58)&ChrW(63)&ChrW(94)) & cfg_siteskin
cfg_baseurl = cfg_sitedir
end if
dim cfg_skindir : cfg_skindir = cfg_sitedir & anXinMallEnCo(ChrW(94)&ChrW(68)&ChrW(60)&ChrW(58)&ChrW(63)&ChrW(94)) & cfg_siteskin
dim cfg_templatedir : cfg_templatedir = cfg_sitedir & anXinMallEnCo(ChrW(94)&ChrW(68)&ChrW(60)&ChrW(58)&ChrW(63)&ChrW(94)) & cfg_siteskin & anXinMallEnCo(ChrW(94)&ChrW(69)&ChrW(54)&ChrW(62)&ChrW(65)&ChrW(61)&ChrW(50)&ChrW(69)&ChrW(54))
dim cfg_plusdir : cfg_plusdir = cfg_sitedir & anXinMallEnCo(ChrW(94)&ChrW(65)&ChrW(61)&ChrW(70)&ChrW(68))
dim cfg_dataquery : cfg_dataquery = 0
dim cfg_starttime : cfg_starttime=timer()
dim s_userid : s_userid = session(anXinMallEnCo(ChrW(68)&ChrW(48)&ChrW(70)&ChrW(68)&ChrW(54)&ChrW(67)&ChrW(58)&ChrW(53)))
dim s_username : s_username = session(anXinMallEnCo(ChrW(68)&ChrW(48)&ChrW(70)&ChrW(68)&ChrW(54)&ChrW(67)&ChrW(63)&ChrW(50)&ChrW(62)&ChrW(54)))
dim c_userid : c_userid = request.cookies(anXinMallEnCo(ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(48)&ChrW(70)&ChrW(68)&ChrW(54)&ChrW(67)))(anXinMallEnCo(ChrW(52)&ChrW(48)&ChrW(70)&ChrW(68)&ChrW(54)&ChrW(67)&ChrW(58)&ChrW(53)))
dim c_username : c_username = request.cookies(anXinMallEnCo(ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(48)&ChrW(70)&ChrW(68)&ChrW(54)&ChrW(67)))(anXinMallEnCo(ChrW(52)&ChrW(48)&ChrW(70)&ChrW(68)&ChrW(54)&ChrW(67)&ChrW(63)&ChrW(50)&ChrW(62)&ChrW(54)))
dim c_userpassword : c_userpassword = request.cookies(anXinMallEnCo(ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(48)&ChrW(70)&ChrW(68)&ChrW(54)&ChrW(67)))(anXinMallEnCo(ChrW(52)&ChrW(48)&ChrW(70)&ChrW(68)&ChrW(54)&ChrW(67)&ChrW(65)&ChrW(50)&ChrW(68)&ChrW(68)&ChrW(72)&ChrW(64)&ChrW(67)&ChrW(53)))
dim c_useremail : c_useremail = request.cookies(anXinMallEnCo(ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(48)&ChrW(70)&ChrW(68)&ChrW(54)&ChrW(67)))(anXinMallEnCo(ChrW(52)&ChrW(48)&ChrW(70)&ChrW(68)&ChrW(54)&ChrW(67)&ChrW(54)&ChrW(62)&ChrW(50)&ChrW(58)&ChrW(61)))
dim c_yucun : c_yucun = request.cookies(anXinMallEnCo(ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(48)&ChrW(70)&ChrW(68)&ChrW(54)&ChrW(67)))(anXinMallEnCo(ChrW(52)&ChrW(48)&ChrW(74)&ChrW(70)&ChrW(52)&ChrW(70)&ChrW(63)))
dim c_face : c_face = request.cookies(anXinMallEnCo(ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(48)&ChrW(70)&ChrW(68)&ChrW(54)&ChrW(67)))(anXinMallEnCo(ChrW(52)&ChrW(48)&ChrW(55)&ChrW(50)&ChrW(52)&ChrW(54)))
dim c_userzhenshiname : c_userzhenshiname = request.cookies(anXinMallEnCo(ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(48)&ChrW(70)&ChrW(68)&ChrW(54)&ChrW(67)))(anXinMallEnCo(ChrW(52)&ChrW(48)&ChrW(70)&ChrW(68)&ChrW(54)&ChrW(67)&ChrW(75)&ChrW(57)&ChrW(54)&ChrW(63)&ChrW(68)&ChrW(57)&ChrW(58)&ChrW(63)&ChrW(50)&ChrW(62)&ChrW(54)))
dim c_addDate : c_addDate = request.cookies(anXinMallEnCo(ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(48)&ChrW(70)&ChrW(68)&ChrW(54)&ChrW(67)))(anXinMallEnCo(ChrW(52)&ChrW(48)&ChrW(50)&ChrW(53)&ChrW(53)&ChrW(115)&ChrW(50)&ChrW(69)&ChrW(54)))
dim c_usertel : c_usertel = request.cookies(anXinMallEnCo(ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(48)&ChrW(70)&ChrW(68)&ChrW(54)&ChrW(67)))(anXinMallEnCo(ChrW(52)&ChrW(48)&ChrW(70)&ChrW(68)&ChrW(54)&ChrW(67)&ChrW(69)&ChrW(54)&ChrW(61)))
dim c_oicq : c_oicq = request.cookies(anXinMallEnCo(ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(48)&ChrW(70)&ChrW(68)&ChrW(54)&ChrW(67)))(anXinMallEnCo(ChrW(52)&ChrW(48)&ChrW(64)&ChrW(58)&ChrW(52)&ChrW(66)))
dim c_actionTotal : c_actionTotal=request.cookies(anXinMallEnCo(ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(48)&ChrW(70)&ChrW(68)&ChrW(54)&ChrW(67)))(anXinMallEnCo(ChrW(52)&ChrW(48)&ChrW(50)&ChrW(52)&ChrW(69)&ChrW(58)&ChrW(64)&ChrW(63)&ChrW(37)&ChrW(64)&ChrW(69)&ChrW(50)&ChrW(61)))
dim c_buyTotal : c_buyTotal=request.cookies(anXinMallEnCo(ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(48)&ChrW(70)&ChrW(68)&ChrW(54)&ChrW(67)))(anXinMallEnCo(ChrW(52)&ChrW(48)&ChrW(51)&ChrW(70)&ChrW(74)&ChrW(37)&ChrW(64)&ChrW(69)&ChrW(50)&ChrW(61)))
dim c_shoucangTotal : c_shoucangTotal=request.cookies(anXinMallEnCo(ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(48)&ChrW(70)&ChrW(68)&ChrW(54)&ChrW(67)))(anXinMallEnCo(ChrW(52)&ChrW(48)&ChrW(68)&ChrW(57)&ChrW(64)&ChrW(70)&ChrW(52)&ChrW(50)&ChrW(63)&ChrW(56)&ChrW(37)&ChrW(64)&ChrW(69)&ChrW(50)&ChrW(61)))
dim c_giftcount : c_giftcount=request.cookies(anXinMallEnCo(ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(48)&ChrW(70)&ChrW(68)&ChrW(54)&ChrW(67)))(anXinMallEnCo(ChrW(52)&ChrW(48)&ChrW(56)&ChrW(58)&ChrW(55)&ChrW(69)&ChrW(52)&ChrW(64)&ChrW(70)&ChrW(63)&ChrW(69)))
dim c_reglx : c_reglx=request.cookies(anXinMallEnCo(ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(48)&ChrW(70)&ChrW(68)&ChrW(54)&ChrW(67)))(anXinMallEnCo(ChrW(52)&ChrW(48)&ChrW(67)&ChrW(54)&ChrW(56)&ChrW(61)&ChrW(73)))
dim c_lastlogin : c_lastlogin=request.cookies(anXinMallEnCo(ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(48)&ChrW(70)&ChrW(68)&ChrW(54)&ChrW(67)))(anXinMallEnCo(ChrW(52)&ChrW(48)&ChrW(61)&ChrW(50)&ChrW(68)&ChrW(69)&ChrW(61)&ChrW(64)&ChrW(56)&ChrW(58)&ChrW(63)))
dim c_jifen : c_jifen=request.cookies(anXinMallEnCo(ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(48)&ChrW(70)&ChrW(68)&ChrW(54)&ChrW(67)))(anXinMallEnCo(ChrW(52)&ChrW(48)&ChrW(59)&ChrW(58)&ChrW(55)&ChrW(54)&ChrW(63)))
dim c_logins : c_logins=request.cookies(anXinMallEnCo(ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(48)&ChrW(70)&ChrW(68)&ChrW(54)&ChrW(67)))(anXinMallEnCo(ChrW(52)&ChrW(48)&ChrW(61)&ChrW(64)&ChrW(56)&ChrW(58)&ChrW(63)&ChrW(68)))
dim s_my_userid : s_my_userid = session(anXinMallEnCo(ChrW(68)&ChrW(48)&ChrW(62)&ChrW(74)&ChrW(48)&ChrW(70)&ChrW(68)&ChrW(54)&ChrW(67)&ChrW(58)&ChrW(53)))
dim s_my_username : s_my_username = session(anXinMallEnCo(ChrW(68)&ChrW(48)&ChrW(62)&ChrW(74)&ChrW(48)&ChrW(70)&ChrW(68)&ChrW(54)&ChrW(67)&ChrW(63)&ChrW(50)&ChrW(62)&ChrW(54)))
dim c_my_classid : c_my_classid = request.cookies(anXinMallEnCo(ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(48)&ChrW(62)&ChrW(74)))(anXinMallEnCo(ChrW(52)&ChrW(48)&ChrW(52)&ChrW(61)&ChrW(50)&ChrW(68)&ChrW(68)&ChrW(58)&ChrW(53)))
dim c_my_userid : c_my_userid = request.cookies(anXinMallEnCo(ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(48)&ChrW(62)&ChrW(74)))(anXinMallEnCo(ChrW(52)&ChrW(48)&ChrW(70)&ChrW(68)&ChrW(54)&ChrW(67)&ChrW(58)&ChrW(53)))
dim c_my_username : c_my_username = request.cookies(anXinMallEnCo(ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(48)&ChrW(62)&ChrW(74)))(anXinMallEnCo(ChrW(52)&ChrW(48)&ChrW(70)&ChrW(68)&ChrW(54)&ChrW(67)&ChrW(63)&ChrW(50)&ChrW(62)&ChrW(54)))
dim c_my_userPassWord : c_my_userPassWord = request.cookies(anXinMallEnCo(ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(48)&ChrW(62)&ChrW(74)))(anXinMallEnCo(ChrW(52)&ChrW(48)&ChrW(70)&ChrW(68)&ChrW(54)&ChrW(67)&ChrW(33)&ChrW(50)&ChrW(68)&ChrW(68)&ChrW(40)&ChrW(64)&ChrW(67)&ChrW(53)))
dim c_my_flag : c_my_flag = request.cookies(anXinMallEnCo(ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(48)&ChrW(62)&ChrW(74)))(anXinMallEnCo(ChrW(52)&ChrW(48)&ChrW(55)&ChrW(61)&ChrW(50)&ChrW(56)))
dim c_my_lx : c_my_lx = request.cookies(anXinMallEnCo(ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(48)&ChrW(62)&ChrW(74)))(anXinMallEnCo(ChrW(52)&ChrW(48)&ChrW(61)&ChrW(73)))
dim c_my_tj : c_my_tj = request.cookies(anXinMallEnCo(ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(48)&ChrW(62)&ChrW(74)))(anXinMallEnCo(ChrW(52)&ChrW(48)&ChrW(69)&ChrW(59)))
dim c_my_addDate : c_my_addDate = request.cookies(anXinMallEnCo(ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(48)&ChrW(62)&ChrW(74)))(anXinMallEnCo(ChrW(52)&ChrW(48)&ChrW(50)&ChrW(53)&ChrW(53)&ChrW(115)&ChrW(50)&ChrW(69)&ChrW(54)))
dim c_my_actionTotal : c_my_actionTotal = request.cookies(anXinMallEnCo(ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(48)&ChrW(62)&ChrW(74)))(anXinMallEnCo(ChrW(52)&ChrW(48)&ChrW(50)&ChrW(52)&ChrW(69)&ChrW(58)&ChrW(64)&ChrW(63)&ChrW(37)&ChrW(64)&ChrW(69)&ChrW(50)&ChrW(61)))
dim c_my_sum_news : c_my_sum_news = request.cookies(anXinMallEnCo(ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(48)&ChrW(62)&ChrW(74)))(anXinMallEnCo(ChrW(52)&ChrW(48)&ChrW(68)&ChrW(70)&ChrW(62)&ChrW(48)&ChrW(63)&ChrW(54)&ChrW(72)&ChrW(68)))
dim c_my_productcount : c_my_productcount = request.cookies(anXinMallEnCo(ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(48)&ChrW(62)&ChrW(74)))(anXinMallEnCo(ChrW(52)&ChrW(48)&ChrW(65)&ChrW(67)&ChrW(64)&ChrW(53)&ChrW(70)&ChrW(52)&ChrW(69)&ChrW(52)&ChrW(64)&ChrW(70)&ChrW(63)&ChrW(69)))
dim c_my_messagecount : c_my_messagecount = request.cookies(anXinMallEnCo(ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(48)&ChrW(62)&ChrW(74)))(anXinMallEnCo(ChrW(52)&ChrW(48)&ChrW(62)&ChrW(54)&ChrW(68)&ChrW(68)&ChrW(50)&ChrW(56)&ChrW(54)&ChrW(52)&ChrW(64)&ChrW(70)&ChrW(63)&ChrW(69)))
dim c_my_newmessagecount : c_my_newmessagecount = request.cookies(anXinMallEnCo(ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(48)&ChrW(62)&ChrW(74)))(anXinMallEnCo(ChrW(52)&ChrW(48)&ChrW(63)&ChrW(54)&ChrW(72)&ChrW(62)&ChrW(54)&ChrW(68)&ChrW(68)&ChrW(50)&ChrW(56)&ChrW(54)&ChrW(52)&ChrW(64)&ChrW(70)&ChrW(63)&ChrW(69)))
dim c_my_lastlogin : c_my_lastlogin = request.cookies(anXinMallEnCo(ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(48)&ChrW(62)&ChrW(74)))(anXinMallEnCo(ChrW(52)&ChrW(48)&ChrW(61)&ChrW(50)&ChrW(68)&ChrW(69)&ChrW(61)&ChrW(64)&ChrW(56)&ChrW(58)&ChrW(63)))
dim c_my_userlastIP : c_my_userlastIP = request.cookies(anXinMallEnCo(ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(48)&ChrW(62)&ChrW(74)))(anXinMallEnCo(ChrW(52)&ChrW(48)&ChrW(70)&ChrW(68)&ChrW(54)&ChrW(67)&ChrW(61)&ChrW(50)&ChrW(68)&ChrW(69)&ChrW(120)&ChrW(33)))
dim c_my_logins : c_my_logins = request.cookies(anXinMallEnCo(ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(48)&ChrW(62)&ChrW(74)))(anXinMallEnCo(ChrW(52)&ChrW(48)&ChrW(61)&ChrW(64)&ChrW(56)&ChrW(58)&ChrW(63)&ChrW(68)))
dim c_my_face : c_my_face = request.cookies(anXinMallEnCo(ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(48)&ChrW(62)&ChrW(74)))(anXinMallEnCo(ChrW(52)&ChrW(48)&ChrW(55)&ChrW(50)&ChrW(52)&ChrW(54)))
dim c_my_useremail : c_my_useremail = request.cookies(anXinMallEnCo(ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(48)&ChrW(62)&ChrW(74)))(anXinMallEnCo(ChrW(52)&ChrW(48)&ChrW(70)&ChrW(68)&ChrW(54)&ChrW(67)&ChrW(54)&ChrW(62)&ChrW(50)&ChrW(58)&ChrW(61)))
dim c_my_tel : c_my_tel = request.cookies(anXinMallEnCo(ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(48)&ChrW(62)&ChrW(74)))(anXinMallEnCo(ChrW(52)&ChrW(48)&ChrW(69)&ChrW(54)&ChrW(61)))
dim c_my_oicq : c_my_oicq = request.cookies(anXinMallEnCo(ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(48)&ChrW(62)&ChrW(74)))(anXinMallEnCo(ChrW(52)&ChrW(48)&ChrW(64)&ChrW(58)&ChrW(52)&ChrW(66)))
dim c_my_areaid : c_my_areaid = request.cookies(anXinMallEnCo(ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(48)&ChrW(62)&ChrW(74)))(anXinMallEnCo(ChrW(52)&ChrW(48)&ChrW(50)&ChrW(67)&ChrW(54)&ChrW(50)&ChrW(58)&ChrW(53)))
dim c_my_szsheng : c_my_szsheng = request.cookies(anXinMallEnCo(ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(48)&ChrW(62)&ChrW(74)))(anXinMallEnCo(ChrW(52)&ChrW(48)&ChrW(68)&ChrW(75)&ChrW(68)&ChrW(57)&ChrW(54)&ChrW(63)&ChrW(56)))
dim c_my_szshi : c_my_szshi = request.cookies(anXinMallEnCo(ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(48)&ChrW(62)&ChrW(74)))(anXinMallEnCo(ChrW(52)&ChrW(48)&ChrW(68)&ChrW(75)&ChrW(68)&ChrW(57)&ChrW(58)))
dim c_my_szcounty : c_my_szcounty = request.cookies(anXinMallEnCo(ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(48)&ChrW(62)&ChrW(74)))(anXinMallEnCo(ChrW(52)&ChrW(48)&ChrW(68)&ChrW(75)&ChrW(52)&ChrW(64)&ChrW(70)&ChrW(63)&ChrW(69)&ChrW(74)))
dim c_my_zifubao : c_my_zifubao = request.cookies(anXinMallEnCo(ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(48)&ChrW(62)&ChrW(74)))(anXinMallEnCo(ChrW(52)&ChrW(48)&ChrW(75)&ChrW(58)&ChrW(55)&ChrW(70)&ChrW(51)&ChrW(50)&ChrW(64)))
dim c_my_zifubao_pwd : c_my_zifubao_pwd = request.cookies(anXinMallEnCo(ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(48)&ChrW(62)&ChrW(74)))(anXinMallEnCo(ChrW(52)&ChrW(48)&ChrW(75)&ChrW(58)&ChrW(55)&ChrW(70)&ChrW(51)&ChrW(50)&ChrW(64)&ChrW(48)&ChrW(65)&ChrW(72)&ChrW(53)))
dim c_my_zifubao_hezuoid : c_my_zifubao_hezuoid = request.cookies(anXinMallEnCo(ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(48)&ChrW(62)&ChrW(74)))(anXinMallEnCo(ChrW(52)&ChrW(48)&ChrW(75)&ChrW(58)&ChrW(55)&ChrW(70)&ChrW(51)&ChrW(50)&ChrW(64)&ChrW(48)&ChrW(57)&ChrW(54)&ChrW(75)&ChrW(70)&ChrW(64)&ChrW(58)&ChrW(53)))
dim c_my_taobaowangwang : c_my_taobaowangwang = request.cookies(anXinMallEnCo(ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(48)&ChrW(62)&ChrW(74)))(anXinMallEnCo(ChrW(52)&ChrW(48)&ChrW(69)&ChrW(50)&ChrW(64)&ChrW(51)&ChrW(50)&ChrW(64)&ChrW(72)&ChrW(50)&ChrW(63)&ChrW(56)&ChrW(72)&ChrW(50)&ChrW(63)&ChrW(56)))
dim c_my_color : c_my_color = request.cookies(anXinMallEnCo(ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(48)&ChrW(62)&ChrW(74)))(anXinMallEnCo(ChrW(52)&ChrW(48)&ChrW(52)&ChrW(64)&ChrW(61)&ChrW(64)&ChrW(67)))
dim s_my_content : s_my_content = session(anXinMallEnCo(ChrW(68)&ChrW(48)&ChrW(62)&ChrW(74)&ChrW(48)&ChrW(52)&ChrW(64)&ChrW(63)&ChrW(69)&ChrW(54)&ChrW(63)&ChrW(69)))
dim c_my_logo : c_my_logo = request.cookies(anXinMallEnCo(ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(48)&ChrW(62)&ChrW(74)))(anXinMallEnCo(ChrW(52)&ChrW(48)&ChrW(61)&ChrW(64)&ChrW(56)&ChrW(64)))
dim c_my_logoda : c_my_logoda = request.cookies(anXinMallEnCo(ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(48)&ChrW(62)&ChrW(74)))(anXinMallEnCo(ChrW(52)&ChrW(48)&ChrW(61)&ChrW(64)&ChrW(56)&ChrW(64)&ChrW(53)&ChrW(50)))
dim c_adminname : c_adminname = request.cookies(anXinMallEnCo(ChrW(52)&ChrW(48)&ChrW(50)&ChrW(53)&ChrW(62)&ChrW(58)&ChrW(63)&ChrW(63)&ChrW(50)&ChrW(62)&ChrW(54)))
dim c_adminpsw : c_adminpsw = request.cookies(anXinMallEnCo(ChrW(52)&ChrW(48)&ChrW(50)&ChrW(53)&ChrW(62)&ChrW(58)&ChrW(63)&ChrW(65)&ChrW(68)&ChrW(72)))
dim s_adminname : s_adminname = session(anXinMallEnCo(ChrW(68)&ChrW(48)&ChrW(50)&ChrW(53)&ChrW(62)&ChrW(58)&ChrW(63)&ChrW(63)&ChrW(50)&ChrW(62)&ChrW(54)))
dim rs
dim conn
dim anxinMall
set anxinMall = New Cls_Common
dim anxinMall_cls_content
set anxinMall_cls_content = New Cls_Content
dim anxinMall_cls_query
set anxinMall_cls_query = New Cls_Query
dim anxinMall_cls_member
set anxinMall_cls_member = New Cls_Member
dim anxinMall_cls_member_my
set anxinMall_cls_member_my = New Cls_Member
dim anxinMall_cls_member_T
set anxinMall_cls_member_T = New TQQWry
dim anxinMall_cls_info
set anxinMall_cls_info = New Cls_Info
dim anxinMall_Html
set anxinMall_html = New Cls_Info
dim anxinMall_cls_FCKeditor
set anxinMall_cls_FCKeditor =New FCKeditor
dim fso
if not isobject(fso) then
set fso = server.createobject(anXinMallEnCo(ChrW(36)&ChrW(-243)&ChrW(52)&ChrW(67)&ChrW(58)&ChrW(65)&ChrW(69)&ChrW(58)&ChrW(63)&ChrW(56)&ChrW(93)&ChrW(117)&ChrW(58)&ChrW(61)&ChrW(54)&ChrW(36)&ChrW(-243)&ChrW(74)&ChrW(68)&ChrW(69)&ChrW(54)&ChrW(62)&ChrW(126)&ChrW(51)&ChrW(59)&ChrW(54)&ChrW(52)&ChrW(69)))
end if
call anxinMall.checknotallowstr()
if s_userid="" then s_userid=0
if s_my_userid="" then s_my_userid=0
const cfg_system ="(汽车展厅)商业版"
const cfg_version ="2.0.0"
const cfg_build ="20130808"
const cfg_dbtype ="sql/acc"
const cfg_prefix ="anxinMall_"
Class Cls_Query
Private Sub Class_Initialize()
End Sub
Private Sub Class_Terminate()
End Sub
function updateupload(byval channelid,byval infoid,byval filename)
dim urs
set urs=anxinMall.db(anXinMallEnCo(ChrW(68)&ChrW(54)&ChrW(61)&ChrW(54)&ChrW(52)&ChrW(69)&ChrW(32)&ChrW(44)&ChrW(69)&ChrW(64)&ChrW(65)&ChrW(32)&ChrW(44)&ChrW(96)&ChrW(32)&ChrW(44)&ChrW(89)&ChrW(32)&ChrW(44)&ChrW(55)&ChrW(67)&ChrW(64)&ChrW(62)&ChrW(32)&ChrW(44)&ChrW(44)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(48)&ChrW(38)&ChrW(65)&ChrW(61)&ChrW(64)&ChrW(50)&ChrW(53)&ChrW(117)&ChrW(58)&ChrW(61)&ChrW(54)&ChrW(46)&ChrW(32)&ChrW(44)&ChrW(72)&ChrW(57)&ChrW(54)&ChrW(67)&ChrW(54)&ChrW(32)&ChrW(44)&ChrW(44)&ChrW(52)&ChrW(57)&ChrW(50)&ChrW(63)&ChrW(63)&ChrW(54)&ChrW(61)&ChrW(58)&ChrW(53)&ChrW(46)&ChrW(108))&channelid&anXinMallEnCo(ChrW(32)&ChrW(44)&ChrW(50)&ChrW(63)&ChrW(53)&ChrW(32)&ChrW(44)&ChrW(44)&ChrW(58)&ChrW(63)&ChrW(55)&ChrW(64)&ChrW(58)&ChrW(53)&ChrW(46)&ChrW(108))&infoid&anXinMallEnCo(ChrW(32)&ChrW(44)&ChrW(50)&ChrW(63)&ChrW(53)&ChrW(32)&ChrW(44)&ChrW(44)&ChrW(55)&ChrW(58)&ChrW(61)&ChrW(54)&ChrW(63)&ChrW(50)&ChrW(62)&ChrW(54)&ChrW(46)&ChrW(108)&ChrW(86))&filename&anXinMallEnCo(ChrW(86)),3)
if urs.bof and urs.eof then
urs.addnew
urs(anXinMallEnCo(ChrW(52)&ChrW(57)&ChrW(50)&ChrW(63)&ChrW(63)&ChrW(54)&ChrW(61)&ChrW(58)&ChrW(53)))=channelid
urs(anXinMallEnCo(ChrW(58)&ChrW(63)&ChrW(55)&ChrW(64)&ChrW(58)&ChrW(53)))=infoid
urs(anXinMallEnCo(ChrW(55)&ChrW(58)&ChrW(61)&ChrW(54)&ChrW(63)&ChrW(50)&ChrW(62)&ChrW(54)))=filename
urs(anXinMallEnCo(ChrW(70)&ChrW(68)&ChrW(54)&ChrW(67)&ChrW(58)&ChrW(53)))=s_userid
urs(anXinMallEnCo(ChrW(70)&ChrW(65)&ChrW(61)&ChrW(64)&ChrW(50)&ChrW(53)&ChrW(69)&ChrW(58)&ChrW(62)&ChrW(54)))=now()
urs(anXinMallEnCo(ChrW(70)&ChrW(65)&ChrW(61)&ChrW(64)&ChrW(50)&ChrW(53)&ChrW(58)&ChrW(65)))=anxinMall.getip()
urs.update
end if
urs.close
set urs=nothing
end function
function DeleteProd(byval bookid,byval userid)
bookid = anxinMall.getids(bookid)
if len(bookid)=0 then
DeleteInfo = 0
exit function
end if
dim prodarray
dim prodhtml
dim photoarray
dim success : success = 0
if userid=0 then
prodarray = anxinMall.sqlarray(anXinMallEnCo(ChrW(68)&ChrW(54)&ChrW(61)&ChrW(54)&ChrW(52)&ChrW(69)&ChrW(32)&ChrW(44)&ChrW(44)&ChrW(51)&ChrW(64)&ChrW(64)&ChrW(60)&ChrW(58)&ChrW(53)&ChrW(46)&ChrW(91)&ChrW(44)&ChrW(50)&ChrW(53)&ChrW(53)&ChrW(53)&ChrW(50)&ChrW(69)&ChrW(54)&ChrW(46)&ChrW(32)&ChrW(44)&ChrW(55)&ChrW(67)&ChrW(64)&ChrW(62)&ChrW(32)&ChrW(44)&ChrW(44)&ChrW(62)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(48)&ChrW(51)&ChrW(64)&ChrW(64)&ChrW(60)&ChrW(68)&ChrW(46)&ChrW(32)&ChrW(44)&ChrW(72)&ChrW(57)&ChrW(54)&ChrW(67)&ChrW(54)&ChrW(32)&ChrW(44)&ChrW(44)&ChrW(51)&ChrW(64)&ChrW(64)&ChrW(60)&ChrW(58)&ChrW(53)&ChrW(46)&ChrW(32)&ChrW(44)&ChrW(58)&ChrW(63)&ChrW(87))&bookid&anXinMallEnCo(ChrW(88)))
else
prodarray = anxinMall.sqlarray(anXinMallEnCo(ChrW(68)&ChrW(54)&ChrW(61)&ChrW(54)&ChrW(52)&ChrW(69)&ChrW(32)&ChrW(44)&ChrW(44)&ChrW(51)&ChrW(64)&ChrW(64)&ChrW(60)&ChrW(58)&ChrW(53)&ChrW(46)&ChrW(91)&ChrW(44)&ChrW(50)&ChrW(53)&ChrW(53)&ChrW(53)&ChrW(50)&ChrW(69)&ChrW(54)&ChrW(46)&ChrW(32)&ChrW(44)&ChrW(55)&ChrW(67)&ChrW(64)&ChrW(62)&ChrW(32)&ChrW(44)&ChrW(44)&ChrW(62)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(48)&ChrW(51)&ChrW(64)&ChrW(64)&ChrW(60)&ChrW(68)&ChrW(46)&ChrW(32)&ChrW(44)&ChrW(72)&ChrW(57)&ChrW(54)&ChrW(67)&ChrW(54)&ChrW(32)&ChrW(44)&ChrW(44)&ChrW(68)&ChrW(57)&ChrW(59)&ChrW(58)&ChrW(50)&ChrW(58)&ChrW(53)&ChrW(46)&ChrW(108))&userid&anXinMallEnCo(ChrW(32)&ChrW(44)&ChrW(50)&ChrW(63)&ChrW(53)&ChrW(32)&ChrW(44)&ChrW(44)&ChrW(51)&ChrW(64)&ChrW(64)&ChrW(60)&ChrW(58)&ChrW(53)&ChrW(46)&ChrW(32)&ChrW(44)&ChrW(58)&ChrW(63)&ChrW(87))&bookid&anXinMallEnCo(ChrW(88)))
end if
if anxinMall.issqlarray(prodarray) then
dim i
for i = 0 to ubound(prodarray,2)
call anxinMall.db(anXinMallEnCo(ChrW(53)&ChrW(54)&ChrW(61)&ChrW(54)&ChrW(69)&ChrW(54)&ChrW(32)&ChrW(44)&ChrW(55)&ChrW(67)&ChrW(64)&ChrW(62)&ChrW(32)&ChrW(44)&ChrW(44)&ChrW(62)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(48)&ChrW(51)&ChrW(64)&ChrW(64)&ChrW(60)&ChrW(68)&ChrW(46)&ChrW(32)&ChrW(44)&ChrW(72)&ChrW(57)&ChrW(54)&ChrW(67)&ChrW(54)&ChrW(32)&ChrW(44)&ChrW(44)&ChrW(51)&ChrW(64)&ChrW(64)&ChrW(60)&ChrW(58)&ChrW(53)&ChrW(46)&ChrW(32)&ChrW(44)&ChrW(58)&ChrW(63)&ChrW(32)&ChrW(44)&ChrW(87))&bookid&anXinMallEnCo(ChrW(88)),0)
success = success + 1
next
end if
Deleteprod = success
end function
function Deletemynews(byval newsid,byval userid)
newsid = anxinMall.getids(newsid)
if len(newsid)=0 then
Deletemynews = 0
exit function
end if
dim xwarray
dim xwhtml
dim photoarray
dim success : success = 0
if userid=0 then
xwarray = anxinMall.sqlarray(anXinMallEnCo(ChrW(68)&ChrW(54)&ChrW(61)&ChrW(54)&ChrW(52)&ChrW(69)&ChrW(32)&ChrW(44)&ChrW(44)&ChrW(63)&ChrW(54)&ChrW(72)&ChrW(68)&ChrW(58)&ChrW(53)&ChrW(46)&ChrW(91)&ChrW(44)&ChrW(50)&ChrW(53)&ChrW(53)&ChrW(69)&ChrW(58)&ChrW(62)&ChrW(54)&ChrW(46)&ChrW(32)&ChrW(44)&ChrW(55)&ChrW(67)&ChrW(64)&ChrW(62)&ChrW(32)&ChrW(44)&ChrW(44)&ChrW(62)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(48)&ChrW(63)&ChrW(54)&ChrW(72)&ChrW(68)&ChrW(46)&ChrW(32)&ChrW(44)&ChrW(72)&ChrW(57)&ChrW(54)&ChrW(67)&ChrW(54)&ChrW(32)&ChrW(44)&ChrW(44)&ChrW(63)&ChrW(54)&ChrW(72)&ChrW(68)&ChrW(58)&ChrW(53)&ChrW(46)&ChrW(32)&ChrW(44)&ChrW(58)&ChrW(63)&ChrW(87))&newsid&anXinMallEnCo(ChrW(88)))
else
xwarray = anxinMall.sqlarray(anXinMallEnCo(ChrW(68)&ChrW(54)&ChrW(61)&ChrW(54)&ChrW(52)&ChrW(69)&ChrW(32)&ChrW(44)&ChrW(44)&ChrW(63)&ChrW(54)&ChrW(72)&ChrW(68)&ChrW(58)&ChrW(53)&ChrW(46)&ChrW(91)&ChrW(44)&ChrW(50)&ChrW(53)&ChrW(53)&ChrW(69)&ChrW(58)&ChrW(62)&ChrW(54)&ChrW(46)&ChrW(32)&ChrW(44)&ChrW(55)&ChrW(67)&ChrW(64)&ChrW(62)&ChrW(32)&ChrW(44)&ChrW(44)&ChrW(62)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(48)&ChrW(63)&ChrW(54)&ChrW(72)&ChrW(68)&ChrW(46)&ChrW(32)&ChrW(44)&ChrW(72)&ChrW(57)&ChrW(54)&ChrW(67)&ChrW(54)&ChrW(32)&ChrW(44)&ChrW(44)&ChrW(68)&ChrW(57)&ChrW(59)&ChrW(58)&ChrW(50)&ChrW(58)&ChrW(53)&ChrW(46)&ChrW(108))&userid&anXinMallEnCo(ChrW(32)&ChrW(44)&ChrW(50)&ChrW(63)&ChrW(53)&ChrW(32)&ChrW(44)&ChrW(44)&ChrW(63)&ChrW(54)&ChrW(72)&ChrW(68)&ChrW(58)&ChrW(53)&ChrW(46)&ChrW(32)&ChrW(44)&ChrW(58)&ChrW(63)&ChrW(87))&newsid&anXinMallEnCo(ChrW(88)))
end if
if anxinMall.issqlarray(xwarray) then
dim i
for i = 0 to ubound(xwarray,2)
call anxinMall.db(anXinMallEnCo(ChrW(53)&ChrW(54)&ChrW(61)&ChrW(54)&ChrW(69)&ChrW(54)&ChrW(32)&ChrW(44)&ChrW(55)&ChrW(67)&ChrW(64)&ChrW(62)&ChrW(32)&ChrW(44)&ChrW(44)&ChrW(62)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(48)&ChrW(63)&ChrW(54)&ChrW(72)&ChrW(68)&ChrW(46)&ChrW(32)&ChrW(44)&ChrW(72)&ChrW(57)&ChrW(54)&ChrW(67)&ChrW(54)&ChrW(32)&ChrW(44)&ChrW(44)&ChrW(63)&ChrW(54)&ChrW(72)&ChrW(68)&ChrW(58)&ChrW(53)&ChrW(46)&ChrW(32)&ChrW(44)&ChrW(58)&ChrW(63)&ChrW(32)&ChrW(44)&ChrW(87))&newsid&anXinMallEnCo(ChrW(88)),0)
success = success + 1
next
end if
Deletemynews = success
end function
function Deletegbook(byval id,byval username)
id = anxinMall.getids(id)
if len(id)=0 then
Deletegbook = 0
exit function
end if
dim xwarray
dim xwhtml
dim photoarray
dim success : success = 0
if userid=0 then
xwarray = anxinMall.sqlarray(anXinMallEnCo(ChrW(68)&ChrW(54)&ChrW(61)&ChrW(54)&ChrW(52)&ChrW(69)&ChrW(32)&ChrW(44)&ChrW(44)&ChrW(58)&ChrW(53)&ChrW(46)&ChrW(91)&ChrW(44)&ChrW(50)&ChrW(53)&ChrW(53)&ChrW(69)&ChrW(58)&ChrW(62)&ChrW(54)&ChrW(46)&ChrW(32)&ChrW(44)&ChrW(55)&ChrW(67)&ChrW(64)&ChrW(62)&ChrW(32)&ChrW(44)&ChrW(44)&ChrW(62)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(48)&ChrW(56)&ChrW(51)&ChrW(64)&ChrW(64)&ChrW(60)&ChrW(46)&ChrW(32)&ChrW(44)&ChrW(72)&ChrW(57)&ChrW(54)&ChrW(67)&ChrW(54)&ChrW(32)&ChrW(44)&ChrW(44)&ChrW(58)&ChrW(53)&ChrW(46)&ChrW(32)&ChrW(44)&ChrW(58)&ChrW(63)&ChrW(87))&id&anXinMallEnCo(ChrW(88)))
else
xwarray = anxinMall.sqlarray(anXinMallEnCo(ChrW(68)&ChrW(54)&ChrW(61)&ChrW(54)&ChrW(52)&ChrW(69)&ChrW(32)&ChrW(44)&ChrW(44)&ChrW(58)&ChrW(53)&ChrW(46)&ChrW(91)&ChrW(44)&ChrW(50)&ChrW(53)&ChrW(53)&ChrW(69)&ChrW(58)&ChrW(62)&ChrW(54)&ChrW(46)&ChrW(32)&ChrW(44)&ChrW(55)&ChrW(67)&ChrW(64)&ChrW(62)&ChrW(32)&ChrW(44)&ChrW(44)&ChrW(62)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(48)&ChrW(56)&ChrW(51)&ChrW(64)&ChrW(64)&ChrW(60)&ChrW(46)&ChrW(32)&ChrW(44)&ChrW(72)&ChrW(57)&ChrW(54)&ChrW(67)&ChrW(54)&ChrW(32)&ChrW(44)&ChrW(44)&ChrW(70)&ChrW(68)&ChrW(54)&ChrW(67)&ChrW(63)&ChrW(50)&ChrW(62)&ChrW(54)&ChrW(46)&ChrW(108)&ChrW(86))&username&anXinMallEnCo(ChrW(86)&ChrW(32)&ChrW(44)&ChrW(50)&ChrW(63)&ChrW(53)&ChrW(32)&ChrW(44)&ChrW(44)&ChrW(58)&ChrW(53)&ChrW(46)&ChrW(32)&ChrW(44)&ChrW(58)&ChrW(63)&ChrW(87))&id&anXinMallEnCo(ChrW(88)))
end if
if anxinMall.issqlarray(xwarray) then
dim i
for i = 0 to ubound(xwarray,2)
call anxinMall.db(anXinMallEnCo(ChrW(53)&ChrW(54)&ChrW(61)&ChrW(54)&ChrW(69)&ChrW(54)&ChrW(32)&ChrW(44)&ChrW(55)&ChrW(67)&ChrW(64)&ChrW(62)&ChrW(32)&ChrW(44)&ChrW(44)&ChrW(62)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(48)&ChrW(56)&ChrW(51)&ChrW(64)&ChrW(64)&ChrW(60)&ChrW(46)&ChrW(32)&ChrW(44)&ChrW(72)&ChrW(57)&ChrW(54)&ChrW(67)&ChrW(54)&ChrW(32)&ChrW(44)&ChrW(44)&ChrW(58)&ChrW(53)&ChrW(46)&ChrW(32)&ChrW(44)&ChrW(58)&ChrW(63)&ChrW(32)&ChrW(44)&ChrW(87))&id&anXinMallEnCo(ChrW(88)),0)
success = success + 1
next
end if
Deletegbook = success
end function
function Deletemyclass(byval shjclassid,byval username)
shjclassid = anxinMall.getids(shjclassid)
if len(shjclassid)=0 then
Deletemyclass = 0
exit function
end if
dim xwarray
dim xwhtml
dim photoarray
dim success : success = 0
if username="" then
xwarray = anxinMall.sqlarray(anXinMallEnCo(ChrW(68)&ChrW(54)&ChrW(61)&ChrW(54)&ChrW(52)&ChrW(69)&ChrW(32)&ChrW(44)&ChrW(44)&ChrW(68)&ChrW(57)&ChrW(59)&ChrW(52)&ChrW(61)&ChrW(50)&ChrW(68)&ChrW(68)&ChrW(58)&ChrW(53)&ChrW(46)&ChrW(32)&ChrW(44)&ChrW(55)&ChrW(67)&ChrW(64)&ChrW(62)&ChrW(32)&ChrW(44)&ChrW(44)&ChrW(62)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(48)&ChrW(68)&ChrW(57)&ChrW(59)&ChrW(52)&ChrW(61)&ChrW(50)&ChrW(68)&ChrW(68)&ChrW(46)&ChrW(32)&ChrW(44)&ChrW(72)&ChrW(57)&ChrW(54)&ChrW(67)&ChrW(54)&ChrW(32)&ChrW(44)&ChrW(44)&ChrW(68)&ChrW(57)&ChrW(59)&ChrW(52)&ChrW(61)&ChrW(50)&ChrW(68)&ChrW(68)&ChrW(58)&ChrW(53)&ChrW(46)&ChrW(32)&ChrW(44)&ChrW(58)&ChrW(63)&ChrW(87))&shjclassid&anXinMallEnCo(ChrW(88)))
else
xwarray = anxinMall.sqlarray(anXinMallEnCo(ChrW(68)&ChrW(54)&ChrW(61)&ChrW(54)&ChrW(52)&ChrW(69)&ChrW(32)&ChrW(44)&ChrW(44)&ChrW(68)&ChrW(57)&ChrW(59)&ChrW(52)&ChrW(61)&ChrW(50)&ChrW(68)&ChrW(68)&ChrW(58)&ChrW(53)&ChrW(46)&ChrW(32)&ChrW(44)&ChrW(55)&ChrW(67)&ChrW(64)&ChrW(62)&ChrW(32)&ChrW(44)&ChrW(44)&ChrW(62)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(48)&ChrW(68)&ChrW(57)&ChrW(59)&ChrW(52)&ChrW(61)&ChrW(50)&ChrW(68)&ChrW(68)&ChrW(46)&ChrW(32)&ChrW(44)&ChrW(72)&ChrW(57)&ChrW(54)&ChrW(67)&ChrW(54)&ChrW(32)&ChrW(44)&ChrW(44)&ChrW(68)&ChrW(57)&ChrW(59)&ChrW(63)&ChrW(50)&ChrW(62)&ChrW(54)&ChrW(46)&ChrW(108)&ChrW(86))&username&anXinMallEnCo(ChrW(86)&ChrW(32)&ChrW(44)&ChrW(50)&ChrW(63)&ChrW(53)&ChrW(32)&ChrW(44)&ChrW(44)&ChrW(68)&ChrW(57)&ChrW(59)&ChrW(52)&ChrW(61)&ChrW(50)&ChrW(68)&ChrW(68)&ChrW(58)&ChrW(53)&ChrW(46)&ChrW(32)&ChrW(44)&ChrW(58)&ChrW(63)&ChrW(87))&shjclassid&anXinMallEnCo(ChrW(88)))
end if
if anxinMall.issqlarray(xwarray) then
dim i
for i = 0 to ubound(xwarray,2)
call anxinMall.db(anXinMallEnCo(ChrW(53)&ChrW(54)&ChrW(61)&ChrW(54)&ChrW(69)&ChrW(54)&ChrW(32)&ChrW(44)&ChrW(55)&ChrW(67)&ChrW(64)&ChrW(62)&ChrW(32)&ChrW(44)&ChrW(44)&ChrW(62)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(48)&ChrW(68)&ChrW(57)&ChrW(59)&ChrW(52)&ChrW(61)&ChrW(50)&ChrW(68)&ChrW(68)&ChrW(46)&ChrW(32)&ChrW(44)&ChrW(72)&ChrW(57)&ChrW(54)&ChrW(67)&ChrW(54)&ChrW(32)&ChrW(44)&ChrW(44)&ChrW(68)&ChrW(57)&ChrW(59)&ChrW(52)&ChrW(61)&ChrW(50)&ChrW(68)&ChrW(68)&ChrW(58)&ChrW(53)&ChrW(46)&ChrW(32)&ChrW(44)&ChrW(58)&ChrW(63)&ChrW(32)&ChrW(44)&ChrW(87))&shjclassid&anXinMallEnCo(ChrW(88)),0)
success = success + 1
next
end if
Deletemyclass = success
end function
function DeleteShoucang(byval infoid,byval username)
infoid = anxinMall.getids(infoid)
if len(infoid)=0 then
DeleteInfo = 0
exit function
end if
dim infoarray
dim success : success = 0
if username="" then
infoarray = anxinMall.sqlarray(anXinMallEnCo(ChrW(68)&ChrW(54)&ChrW(61)&ChrW(54)&ChrW(52)&ChrW(69)&ChrW(32)&ChrW(44)&ChrW(44)&ChrW(50)&ChrW(52)&ChrW(69)&ChrW(58)&ChrW(64)&ChrW(63)&ChrW(58)&ChrW(53)&ChrW(46)&ChrW(91)&ChrW(44)&ChrW(50)&ChrW(52)&ChrW(69)&ChrW(58)&ChrW(64)&ChrW(63)&ChrW(115)&ChrW(50)&ChrW(69)&ChrW(54)&ChrW(46)&ChrW(32)&ChrW(44)&ChrW(55)&ChrW(67)&ChrW(64)&ChrW(62)&ChrW(32)&ChrW(44)&ChrW(44)&ChrW(62)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(48)&ChrW(50)&ChrW(52)&ChrW(69)&ChrW(58)&ChrW(64)&ChrW(63)&ChrW(46)&ChrW(32)&ChrW(44)&ChrW(72)&ChrW(57)&ChrW(54)&ChrW(67)&ChrW(54)&ChrW(32)&ChrW(44)&ChrW(44)&ChrW(50)&ChrW(52)&ChrW(69)&ChrW(58)&ChrW(64)&ChrW(63)&ChrW(58)&ChrW(53)&ChrW(46)&ChrW(32)&ChrW(44)&ChrW(58)&ChrW(63)&ChrW(87))&infoid&anXinMallEnCo(ChrW(88)))
else
infoarray = anxinMall.sqlarray(anXinMallEnCo(ChrW(68)&ChrW(54)&ChrW(61)&ChrW(54)&ChrW(52)&ChrW(69)&ChrW(32)&ChrW(44)&ChrW(44)&ChrW(50)&ChrW(52)&ChrW(69)&ChrW(58)&ChrW(64)&ChrW(63)&ChrW(58)&ChrW(53)&ChrW(46)&ChrW(91)&ChrW(44)&ChrW(50)&ChrW(52)&ChrW(69)&ChrW(58)&ChrW(64)&ChrW(63)&ChrW(115)&ChrW(50)&ChrW(69)&ChrW(54)&ChrW(46)&ChrW(91)&ChrW(44)&ChrW(70)&ChrW(68)&ChrW(54)&ChrW(67)&ChrW(63)&ChrW(50)&ChrW(62)&ChrW(54)&ChrW(46)&ChrW(32)&ChrW(44)&ChrW(55)&ChrW(67)&ChrW(64)&ChrW(62)&ChrW(32)&ChrW(44)&ChrW(44)&ChrW(62)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(48)&ChrW(50)&ChrW(52)&ChrW(69)&ChrW(58)&ChrW(64)&ChrW(63)&ChrW(46)&ChrW(32)&ChrW(44)&ChrW(72)&ChrW(57)&ChrW(54)&ChrW(67)&ChrW(54)&ChrW(32)&ChrW(44)&ChrW(44)&ChrW(70)&ChrW(68)&ChrW(54)&ChrW(67)&ChrW(63)&ChrW(50)&ChrW(62)&ChrW(54)&ChrW(46)&ChrW(108)&ChrW(86))&username&anXinMallEnCo(ChrW(86)&ChrW(32)&ChrW(44)&ChrW(50)&ChrW(63)&ChrW(53)&ChrW(32)&ChrW(44)&ChrW(44)&ChrW(50)&ChrW(52)&ChrW(69)&ChrW(58)&ChrW(64)&ChrW(63)&ChrW(58)&ChrW(53)&ChrW(46)&ChrW(32)&ChrW(44)&ChrW(58)&ChrW(63)&ChrW(87))&infoid&anXinMallEnCo(ChrW(88)))
end if
if anxinMall.issqlarray(infoarray) then
dim i
for i = 0 to ubound(infoarray,2)
call anxinMall.db(anXinMallEnCo(ChrW(53)&ChrW(54)&ChrW(61)&ChrW(54)&ChrW(69)&ChrW(54)&ChrW(32)&ChrW(44)&ChrW(55)&ChrW(67)&ChrW(64)&ChrW(62)&ChrW(32)&ChrW(44)&ChrW(44)&ChrW(62)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(48)&ChrW(50)&ChrW(52)&ChrW(69)&ChrW(58)&ChrW(64)&ChrW(63)&ChrW(46)&ChrW(32)&ChrW(44)&ChrW(72)&ChrW(57)&ChrW(54)&ChrW(67)&ChrW(54)&ChrW(32)&ChrW(44)&ChrW(44)&ChrW(50)&ChrW(52)&ChrW(69)&ChrW(58)&ChrW(64)&ChrW(63)&ChrW(58)&ChrW(53)&ChrW(46)&ChrW(32)&ChrW(44)&ChrW(58)&ChrW(63)&ChrW(32)&ChrW(44)&ChrW(87))&infoid&anXinMallEnCo(ChrW(88)),0)
success = success + 1
next
end if
DeleteShoucang = success
end function
sub updateorder(byval order,byval money)
if len(order)=0 or not isnumeric(money) then
exit sub
end if
money = CCur(money)
dim result : result = false
set rs = anxinMall.db(anXinMallEnCo(ChrW(68)&ChrW(54)&ChrW(61)&ChrW(54)&ChrW(52)&ChrW(69)&ChrW(32)&ChrW(44)&ChrW(69)&ChrW(64)&ChrW(65)&ChrW(32)&ChrW(44)&ChrW(96)&ChrW(32)&ChrW(44)&ChrW(89)&ChrW(32)&ChrW(44)&ChrW(55)&ChrW(67)&ChrW(64)&ChrW(62)&ChrW(32)&ChrW(44)&ChrW(44)&ChrW(70)&ChrW(68)&ChrW(54)&ChrW(67)&ChrW(48)&ChrW(64)&ChrW(67)&ChrW(53)&ChrW(54)&ChrW(67)&ChrW(46)&ChrW(32)&ChrW(44)&ChrW(72)&ChrW(57)&ChrW(54)&ChrW(67)&ChrW(54)&ChrW(32)&ChrW(44)&ChrW(44)&ChrW(64)&ChrW(67)&ChrW(53)&ChrW(54)&ChrW(67)&ChrW(46)&ChrW(108)&ChrW(86))&order&anXinMallEnCo(ChrW(86)),3)
if not rs.bof and not rs.eof then
if rs(anXinMallEnCo(ChrW(68)&ChrW(69)&ChrW(50)&ChrW(69)&ChrW(70)&ChrW(68)))=0 then
addmoney = CCur(rs(anXinMallEnCo(ChrW(62)&ChrW(64)&ChrW(63)&ChrW(54)&ChrW(74))))
if money=addmoney then
userid = rs(anXinMallEnCo(ChrW(70)&ChrW(68)&ChrW(54)&ChrW(67)&ChrW(58)&ChrW(53)))
rs(anXinMallEnCo(ChrW(36)&ChrW(-243)&ChrW(69)&ChrW(50)&ChrW(69)&ChrW(70)&ChrW(68))) = 1
result = true
rs.update
end if
end if
end if
rs.close
set rs = nothing
if result=true then
set rs = anxinMall.db(anXinMallEnCo(ChrW(68)&ChrW(54)&ChrW(61)&ChrW(54)&ChrW(52)&ChrW(69)&ChrW(32)&ChrW(44)&ChrW(69)&ChrW(64)&ChrW(65)&ChrW(32)&ChrW(44)&ChrW(96)&ChrW(32)&ChrW(44)&ChrW(89)&ChrW(32)&ChrW(44)&ChrW(55)&ChrW(67)&ChrW(64)&ChrW(62)&ChrW(32)&ChrW(44)&ChrW(44)&ChrW(70)&ChrW(68)&ChrW(54)&ChrW(67)&ChrW(46)&ChrW(32)&ChrW(44)&ChrW(72)&ChrW(57)&ChrW(54)&ChrW(67)&ChrW(54)&ChrW(32)&ChrW(44)&ChrW(58)&ChrW(53)&ChrW(108))&userid,3)
if not rs.bof and not rs.eof then
money = rs(anXinMallEnCo(ChrW(62)&ChrW(64)&ChrW(63)&ChrW(54)&ChrW(74)))
rs(anXinMallEnCo(ChrW(62)&ChrW(64)&ChrW(63)&ChrW(54)&ChrW(74))) = money + addmoney
rs.update
end if
rs.close
set rs = nothing
response.cookies(anXinMallEnCo(ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(48)&ChrW(70)&ChrW(68)&ChrW(54)&ChrW(67)))(anXinMallEnCo(ChrW(52)&ChrW(48)&ChrW(70)&ChrW(68)&ChrW(54)&ChrW(67)&ChrW(62)&ChrW(64)&ChrW(63)&ChrW(54)&ChrW(74))) = money + addmoney
end if
end sub
sub updatekeyword(byval channelid,byval keyword)
if isnull(keyword) or len(keyword)=0 then
exit sub
end if
set rs=anxinMall.db(anXinMallEnCo(ChrW(68)&ChrW(54)&ChrW(61)&ChrW(54)&ChrW(52)&ChrW(69)&ChrW(32)&ChrW(44)&ChrW(69)&ChrW(64)&ChrW(65)&ChrW(32)&ChrW(44)&ChrW(96)&ChrW(32)&ChrW(44)&ChrW(89)&ChrW(32)&ChrW(44)&ChrW(55)&ChrW(67)&ChrW(64)&ChrW(62)&ChrW(32)&ChrW(44)&ChrW(44)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(48)&ChrW(60)&ChrW(54)&ChrW(74)&ChrW(72)&ChrW(64)&ChrW(67)&ChrW(53)&ChrW(46)&ChrW(32)&ChrW(44)&ChrW(72)&ChrW(57)&ChrW(54)&ChrW(67)&ChrW(54)&ChrW(32)&ChrW(44)&ChrW(44)&ChrW(52)&ChrW(57)&ChrW(50)&ChrW(63)&ChrW(63)&ChrW(54)&ChrW(61)&ChrW(58)&ChrW(53)&ChrW(46)&ChrW(108))&channelid&anXinMallEnCo(ChrW(32)&ChrW(44)&ChrW(50)&ChrW(63)&ChrW(53)&ChrW(32)&ChrW(44)&ChrW(44)&ChrW(122)&ChrW(54)&ChrW(74)&ChrW(72)&ChrW(64)&ChrW(67)&ChrW(53)&ChrW(46)&ChrW(108)&ChrW(86))&keyword&anXinMallEnCo(ChrW(86)),3)
if rs.bof and rs.eof then
rs.addnew
rs(anXinMallEnCo(ChrW(52)&ChrW(57)&ChrW(50)&ChrW(63)&ChrW(63)&ChrW(54)&ChrW(61)&ChrW(58)&ChrW(53))) = channelid
rs(anXinMallEnCo(ChrW(60)&ChrW(54)&ChrW(74)&ChrW(72)&ChrW(64)&ChrW(67)&ChrW(53))) = keyword
rs(anXinMallEnCo(ChrW(63)&ChrW(70)&ChrW(62)&ChrW(51)&ChrW(54)&ChrW(67))) = 1
else
rs(anXinMallEnCo(ChrW(63)&ChrW(70)&ChrW(62)&ChrW(51)&ChrW(54)&ChrW(67))) = rs(anXinMallEnCo(ChrW(63)&ChrW(70)&ChrW(62)&ChrW(51)&ChrW(54)&ChrW(67))) + 1
end if
rs(anXinMallEnCo(ChrW(61)&ChrW(50)&ChrW(68)&ChrW(69)&ChrW(37)&ChrW(58)&ChrW(62)&ChrW(54))) = now()
rs.update
rs.close
set rs=nothing
end sub
End Class
Class Cls_Content
Private Sub Class_Initialize()
End Sub
Private Sub Class_Terminate()
End Sub
function home()
dim TPL
set TPL = New anxinMall_Cls_Template
dim rs_top,top1_List
set rs_top = anxinMall.db(anXinMallEnCo(ChrW(68)&ChrW(54)&ChrW(61)&ChrW(54)&ChrW(52)&ChrW(69)&ChrW(32)&ChrW(44)&ChrW(69)&ChrW(64)&ChrW(65)&ChrW(32)&ChrW(44)&ChrW(96)&ChrW(32)&ChrW(44)&ChrW(63)&ChrW(54)&ChrW(72)&ChrW(68)&ChrW(58)&ChrW(53)&ChrW(91)&ChrW(63)&ChrW(54)&ChrW(72)&ChrW(68)&ChrW(69)&ChrW(58)&ChrW(69)&ChrW(61)&ChrW(54)&ChrW(91)&ChrW(53)&ChrW(54)&ChrW(68)&ChrW(52)&ChrW(67)&ChrW(58)&ChrW(65)&ChrW(69)&ChrW(58)&ChrW(64)&ChrW(63)&ChrW(91)&ChrW(58)&ChrW(68)&ChrW(69)&ChrW(64)&ChrW(65)&ChrW(32)&ChrW(44)&ChrW(55)&ChrW(67)&ChrW(64)&ChrW(62)&ChrW(32)&ChrW(44)&ChrW(44)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(48)&ChrW(63)&ChrW(54)&ChrW(72)&ChrW(68)&ChrW(46)&ChrW(32)&ChrW(44)&ChrW(72)&ChrW(57)&ChrW(54)&ChrW(67)&ChrW(54)&ChrW(32)&ChrW(44)&ChrW(58)&ChrW(68)&ChrW(69)&ChrW(64)&ChrW(65)&ChrW(108)&ChrW(96)&ChrW(32)&ChrW(44)&ChrW(64)&ChrW(67)&ChrW(53)&ChrW(54)&ChrW(67)&ChrW(32)&ChrW(44)&ChrW(51)&ChrW(74)&ChrW(32)&ChrW(44)&ChrW(63)&ChrW(54)&ChrW(72)&ChrW(68)&ChrW(58)&ChrW(53)&ChrW(32)&ChrW(44)&ChrW(53)&ChrW(54)&ChrW(68)&ChrW(52)),1)
do while not rs_top.eof
top1_List = top1_List & anXinMallEnCo(ChrW(107)&ChrW(115)&ChrW(120)&ChrW(39)&ChrW(32)&ChrW(44)&ChrW(52)&ChrW(61)&ChrW(50)&ChrW(68)&ChrW(68)&ChrW(108)&ChrW(69)&ChrW(54)&ChrW(73)&ChrW(69)&ChrW(48)&ChrW(69)&ChrW(58)&ChrW(69)&ChrW(61)&ChrW(54)&ChrW(32)&ChrW(44)&ChrW(69)&ChrW(58)&ChrW(75)&ChrW(58)&ChrW(32)&ChrW(44)&ChrW(68)&ChrW(69)&ChrW(74)&ChrW(61)&ChrW(54)&ChrW(108)&ChrW(86)&ChrW(65)&ChrW(50)&ChrW(53)&ChrW(53)&ChrW(58)&ChrW(63)&ChrW(56)&ChrW(92)&ChrW(69)&ChrW(64)&ChrW(65)&ChrW(105)&ChrW(100)&ChrW(65)&ChrW(73)&ChrW(106)&ChrW(65)&ChrW(50)&ChrW(53)&ChrW(53)&ChrW(58)&ChrW(63)&ChrW(56)&ChrW(92)&ChrW(51)&ChrW(64)&ChrW(69)&ChrW(69)&ChrW(64)&ChrW(62)&ChrW(105)&ChrW(100)&ChrW(65)&ChrW(73)&ChrW(106)&ChrW(69)&ChrW(54)&ChrW(73)&ChrW(69)&ChrW(92)&ChrW(50)&ChrW(61)&ChrW(58)&ChrW(56)&ChrW(63)&ChrW(105)&ChrW(61)&ChrW(54)&ChrW(55)&ChrW(69)&ChrW(106)&ChrW(32)&ChrW(44)&ChrW(55)&ChrW(64)&ChrW(63)&ChrW(69)&ChrW(92)&ChrW(68)&ChrW(58)&ChrW(75)&ChrW(54)&ChrW(105)&ChrW(96)&ChrW(101)&ChrW(65)&ChrW(73)&ChrW(106)&ChrW(32)&ChrW(44)&ChrW(61)&ChrW(58)&ChrW(63)&ChrW(54)&ChrW(92)&ChrW(57)&ChrW(54)&ChrW(58)&ChrW(56)&ChrW(57)&ChrW(69)&ChrW(105)&ChrW(97)&ChrW(97)&ChrW(65)&ChrW(73)&ChrW(106)&ChrW(55)&ChrW(64)&ChrW(63)&ChrW(69)&ChrW(92)&ChrW(72)&ChrW(54)&ChrW(58)&ChrW(56)&ChrW(57)&ChrW(69)&ChrW(105)&ChrW(51)&ChrW(64)&ChrW(61)&ChrW(53)&ChrW(106)&ChrW(86)&ChrW(109)&ChrW(85)&ChrW(63)&ChrW(51)&ChrW(68)&ChrW(65)&ChrW(106)&ChrW(85)&ChrW(63)&ChrW(51)&ChrW(68)&ChrW(65)&ChrW(106)&ChrW(85)&ChrW(63)&ChrW(51)&ChrW(68)&ChrW(65)&ChrW(106)&ChrW(85)&ChrW(63)&ChrW(51)&ChrW(68)&ChrW(65)&ChrW(106))&rs_top(anXinMallEnCo(ChrW(63)&ChrW(54)&ChrW(72)&ChrW(68)&ChrW(69)&ChrW(58)&ChrW(69)&ChrW(61)&ChrW(54)))&anXinMallEnCo(ChrW(107)&ChrW(94)&ChrW(115)&ChrW(120)&ChrW(39)&ChrW(109))
top1_List = top1_List & anXinMallEnCo(ChrW(9)&ChrW(44)&ChrW(9)&ChrW(44)&ChrW(9)&ChrW(44)&ChrW(107)&ChrW(53)&ChrW(58)&ChrW(71)&ChrW(32)&ChrW(44)&ChrW(52)&ChrW(61)&ChrW(50)&ChrW(68)&ChrW(68)&ChrW(108)&ChrW(69)&ChrW(54)&ChrW(73)&ChrW(69)&ChrW(48)&ChrW(52)&ChrW(64)&ChrW(63)&ChrW(69)&ChrW(54)&ChrW(63)&ChrW(69)&ChrW(109)&ChrW(12288)&ChrW(44)&ChrW(12288)&ChrW(44))&left(rs_top(anXinMallEnCo(ChrW(53)&ChrW(54)&ChrW(68)&ChrW(52)&ChrW(67)&ChrW(58)&ChrW(65)&ChrW(69)&ChrW(58)&ChrW(64)&ChrW(63))),70)&anXinMallEnCo(ChrW(32)&ChrW(44)&ChrW(32)&ChrW(44)&ChrW(8230)&ChrW(44)&ChrW(8230)&ChrW(44)&ChrW(107)&ChrW(50)&ChrW(32)&ChrW(44)&ChrW(57)&ChrW(67)&ChrW(54)&ChrW(55)&ChrW(108)&ChrW(86)&ChrW(94)&ChrW(63)&ChrW(54)&ChrW(72)&ChrW(68)&ChrW(94))&rs_top(anXinMallEnCo(ChrW(63)&ChrW(54)&ChrW(72)&ChrW(68)&ChrW(58)&ChrW(53)))&anXinMallEnCo(ChrW(93)&ChrW(57)&ChrW(69)&ChrW(62)&ChrW(61)&ChrW(86)&ChrW(32)&ChrW(44)&ChrW(69)&ChrW(50)&ChrW(67)&ChrW(56)&ChrW(54)&ChrW(69)&ChrW(108)&ChrW(86)&ChrW(48)&ChrW(51)&ChrW(61)&ChrW(50)&ChrW(63)&ChrW(60)&ChrW(86)&ChrW(109)&ChrW(-27136)&ChrW(64)&ChrW(-29706)&ChrW(64)&ChrW(20835)&ChrW(64)&ChrW(25986)&ChrW(64)&ChrW(85)&ChrW(56)&ChrW(69)&ChrW(106)&ChrW(85)&ChrW(56)&ChrW(69)&ChrW(106)&ChrW(107)&ChrW(94)&ChrW(50)&ChrW(109)&ChrW(107)&ChrW(94)&ChrW(53)&ChrW(58)&ChrW(71)&ChrW(109))
rs_top.movenext
loop
rs_top.close
set rs_top = nothing
dim rs_leftad,arr_temp,arr_adword_list
set rs_leftad = anxinMall.db(anXinMallEnCo(ChrW(68)&ChrW(54)&ChrW(61)&ChrW(54)&ChrW(52)&ChrW(69)&ChrW(32)&ChrW(44)&ChrW(69)&ChrW(64)&ChrW(65)&ChrW(32)&ChrW(44)&ChrW(96)&ChrW(95)&ChrW(32)&ChrW(44)&ChrW(58)&ChrW(53)&ChrW(91)&ChrW(63)&ChrW(50)&ChrW(62)&ChrW(54)&ChrW(91)&ChrW(62)&ChrW(54)&ChrW(53)&ChrW(58)&ChrW(50)&ChrW(91)&ChrW(70)&ChrW(67)&ChrW(61)&ChrW(91)&ChrW(37)&ChrW(50)&ChrW(56)&ChrW(32)&ChrW(44)&ChrW(55)&ChrW(67)&ChrW(64)&ChrW(62)&ChrW(32)&ChrW(44)&ChrW(44)&ChrW(62)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(48)&ChrW(50)&ChrW(53)&ChrW(46)&ChrW(32)&ChrW(44)&ChrW(72)&ChrW(57)&ChrW(54)&ChrW(67)&ChrW(54)&ChrW(32)&ChrW(44)&ChrW(69)&ChrW(50)&ChrW(56)&ChrW(108)&ChrW(86)&ChrW(58)&ChrW(63)&ChrW(53)&ChrW(54)&ChrW(73)&ChrW(48)&ChrW(50)&ChrW(53)&ChrW(48)&ChrW(61)&ChrW(54)&ChrW(55)&ChrW(69)&ChrW(86)&ChrW(32)&ChrW(44)&ChrW(64)&ChrW(67)&ChrW(53)&ChrW(54)&ChrW(67)&ChrW(32)&ChrW(44)&ChrW(51)&ChrW(74)&ChrW(32)&ChrW(44)&ChrW(58)&ChrW(53)&ChrW(32)&ChrW(44)&ChrW(50)&ChrW(68)&ChrW(52)),1)
do while not rs_leftad.eof
arr_temp = arr_temp&anXinMallEnCo(ChrW(107)&ChrW(50)&ChrW(32)&ChrW(44)&ChrW(57)&ChrW(67)&ChrW(54)&ChrW(55)&ChrW(108)&ChrW(86))&rs_leftad(anXinMallEnCo(ChrW(70)&ChrW(67)&ChrW(61)))&anXinMallEnCo(ChrW(86)&ChrW(32)&ChrW(44)&ChrW(69)&ChrW(50)&ChrW(67)&ChrW(56)&ChrW(54)&ChrW(69)&ChrW(108)&ChrW(86)&ChrW(48)&ChrW(51)&ChrW(61)&ChrW(50)&ChrW(63)&ChrW(60)&ChrW(86)&ChrW(109)&ChrW(107)&ChrW(58)&ChrW(62)&ChrW(56)&ChrW(32)&ChrW(44)&ChrW(68)&ChrW(67)&ChrW(52)&ChrW(108)&ChrW(86))&rs_leftad(anXinMallEnCo(ChrW(62)&ChrW(54)&ChrW(53)&ChrW(58)&ChrW(50)))&anXinMallEnCo(ChrW(86)&ChrW(32)&ChrW(44)&ChrW(72)&ChrW(58)&ChrW(53)&ChrW(69)&ChrW(57)&ChrW(108)&ChrW(86)&ChrW(96)&ChrW(104)&ChrW(103)&ChrW(86)&ChrW(32)&ChrW(44)&ChrW(57)&ChrW(54)&ChrW(58)&ChrW(56)&ChrW(57)&ChrW(69)&ChrW(108)&ChrW(86)&ChrW(98)&ChrW(95)&ChrW(103)&ChrW(86)&ChrW(32)&ChrW(44)&ChrW(51)&ChrW(64)&ChrW(67)&ChrW(53)&ChrW(54)&ChrW(67)&ChrW(108)&ChrW(86)&ChrW(95)&ChrW(86)&ChrW(109)&ChrW(107)&ChrW(94)&ChrW(58)&ChrW(62)&ChrW(56)&ChrW(109)&ChrW(107)&ChrW(94)&ChrW(50)&ChrW(109))&anXinMallEnCo(ChrW(77))
rs_leftad.movenext
loop
rs_leftad.close
set rs_leftad = nothing
arr_adword_list = split(arr_temp,anXinMallEnCo(ChrW(77)))
call TPL.Load(cfg_templatedir & anXinMallEnCo(ChrW(94)&ChrW(58)&ChrW(63)&ChrW(53)&ChrW(54)&ChrW(73)&ChrW(93)&ChrW(69)&ChrW(65)&ChrW(61)))
TPL.Content = anxinMall.ReplaceExp(TPL.Content, anXinMallEnCo(ChrW(45)&ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(45)&ChrW(93)&ChrW(69)&ChrW(64)&ChrW(65)&ChrW(58)&ChrW(53)&ChrW(45)&ChrW(78)), 0)
TPL.Content = anxinMall.ReplaceExp(TPL.Content, anXinMallEnCo(ChrW(45)&ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(45)&ChrW(93)&ChrW(69)&ChrW(64)&ChrW(65)&ChrW(96)&ChrW(48)&ChrW(123)&ChrW(58)&ChrW(68)&ChrW(69)&ChrW(45)&ChrW(78)), top1_List)
TPL.Content = anxinMall.ReplaceExp(TPL.Content, anXinMallEnCo(ChrW(45)&ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(45)&ChrW(93)&ChrW(61)&ChrW(54)&ChrW(55)&ChrW(69)&ChrW(50)&ChrW(53)&ChrW(95)&ChrW(96)&ChrW(45)&ChrW(78)), arr_adword_list(0))
TPL.Content = anxinMall.ReplaceExp(TPL.Content, anXinMallEnCo(ChrW(45)&ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(45)&ChrW(93)&ChrW(61)&ChrW(54)&ChrW(55)&ChrW(69)&ChrW(50)&ChrW(53)&ChrW(95)&ChrW(97)&ChrW(45)&ChrW(78)), arr_adword_list(1))
TPL.Content = anxinMall.ReplaceExp(TPL.Content, anXinMallEnCo(ChrW(45)&ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(45)&ChrW(93)&ChrW(61)&ChrW(54)&ChrW(55)&ChrW(69)&ChrW(50)&ChrW(53)&ChrW(95)&ChrW(98)&ChrW(45)&ChrW(78)), arr_adword_list(2))
TPL.Content = anxinMall.ReplaceExp(TPL.Content, anXinMallEnCo(ChrW(45)&ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(45)&ChrW(93)&ChrW(61)&ChrW(54)&ChrW(55)&ChrW(69)&ChrW(50)&ChrW(53)&ChrW(95)&ChrW(99)&ChrW(45)&ChrW(78)), arr_adword_list(3))
TPL.Content = anxinMall.ReplaceExp(TPL.Content, anXinMallEnCo(ChrW(45)&ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(45)&ChrW(93)&ChrW(61)&ChrW(54)&ChrW(55)&ChrW(69)&ChrW(50)&ChrW(53)&ChrW(95)&ChrW(100)&ChrW(45)&ChrW(78)), arr_adword_list(4))
TPL.Content = anxinMall.ReplaceExp(TPL.Content, anXinMallEnCo(ChrW(45)&ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(45)&ChrW(93)&ChrW(61)&ChrW(54)&ChrW(55)&ChrW(69)&ChrW(50)&ChrW(53)&ChrW(95)&ChrW(101)&ChrW(45)&ChrW(78)), arr_adword_list(5))
TPL.Content = anxinMall.ReplaceExp(TPL.Content, anXinMallEnCo(ChrW(45)&ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(45)&ChrW(93)&ChrW(61)&ChrW(54)&ChrW(55)&ChrW(69)&ChrW(50)&ChrW(53)&ChrW(95)&ChrW(102)&ChrW(45)&ChrW(78)), arr_adword_list(6))
TPL.Content = anxinMall.ReplaceExp(TPL.Content, anXinMallEnCo(ChrW(45)&ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(45)&ChrW(93)&ChrW(61)&ChrW(54)&ChrW(55)&ChrW(69)&ChrW(50)&ChrW(53)&ChrW(95)&ChrW(103)&ChrW(45)&ChrW(78)), arr_adword_list(7))
TPL.Content = anxinMall.ReplaceExp(TPL.Content, anXinMallEnCo(ChrW(45)&ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(45)&ChrW(93)&ChrW(61)&ChrW(54)&ChrW(55)&ChrW(69)&ChrW(50)&ChrW(53)&ChrW(95)&ChrW(104)&ChrW(45)&ChrW(78)), arr_adword_list(8))
TPL.Content = anxinMall.ReplaceExp(TPL.Content, anXinMallEnCo(ChrW(45)&ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(45)&ChrW(93)&ChrW(61)&ChrW(54)&ChrW(55)&ChrW(69)&ChrW(50)&ChrW(53)&ChrW(96)&ChrW(95)&ChrW(45)&ChrW(78)), arr_adword_list(9))
TPL.Content = anxinMall.ReplaceExp(TPL.Content, anXinMallEnCo(ChrW(107)&ChrW(94)&ChrW(51)&ChrW(64)&ChrW(53)&ChrW(74)&ChrW(109)),vbcrlf & anXinMallEnCo(ChrW(107)&ChrW(68)&ChrW(52)&ChrW(67)&ChrW(58)&ChrW(65)&ChrW(69)&ChrW(32)&ChrW(44)&ChrW(69)&ChrW(74)&ChrW(65)&ChrW(54)&ChrW(108)&ChrW(81)&ChrW(69)&ChrW(54)&ChrW(73)&ChrW(69)&ChrW(94)&ChrW(59)&ChrW(50)&ChrW(71)&ChrW(50)&ChrW(68)&ChrW(52)&ChrW(67)&ChrW(58)&ChrW(65)&ChrW(69)&ChrW(81)&ChrW(109)) & vbcrlf & anXinMallEnCo(ChrW(53)&ChrW(64)&ChrW(52)&ChrW(70)&ChrW(62)&ChrW(54)&ChrW(63)&ChrW(69)&ChrW(93)&ChrW(72)&ChrW(67)&ChrW(58)&ChrW(69)&ChrW(54)&ChrW(87)&ChrW(86)&ChrW(107)&ChrW(68)&ChrW(52)&ChrW(67)&ChrW(86)&ChrW(90)&ChrW(86)&ChrW(58)&ChrW(65)&ChrW(69)&ChrW(32)&ChrW(44)&ChrW(69)&ChrW(74)&ChrW(65)&ChrW(54)&ChrW(108)&ChrW(81)&ChrW(69)&ChrW(54)&ChrW(73)&ChrW(69)&ChrW(94)&ChrW(59)&ChrW(50)&ChrW(71)&ChrW(50)&ChrW(86)&ChrW(90)&ChrW(86)&ChrW(68)&ChrW(52)&ChrW(67)&ChrW(58)&ChrW(65)&ChrW(69)&ChrW(81)&ChrW(32)&ChrW(44)&ChrW(68)&ChrW(67)&ChrW(52)&ChrW(108)&ChrW(81))&cfg_baseurl&anXinMallEnCo(ChrW(94)&ChrW(65)&ChrW(61)&ChrW(70)&ChrW(68)&ChrW(94)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(93)&ChrW(69)&ChrW(50)&ChrW(68)&ChrW(60)&ChrW(93)&ChrW(50)&ChrW(68)&ChrW(65)&ChrW(110)&ChrW(65)&ChrW(50)&ChrW(56)&ChrW(54)&ChrW(108)&ChrW(58)&ChrW(63)&ChrW(53)&ChrW(54)&ChrW(73)&ChrW(85)&ChrW(67)&ChrW(54)&ChrW(55)&ChrW(67)&ChrW(54)&ChrW(68)&ChrW(57)&ChrW(108)&ChrW(86)&ChrW(90)&ChrW(124)&ChrW(50)&ChrW(69)&ChrW(57)&ChrW(93)&ChrW(67)&ChrW(50)&ChrW(63)&ChrW(53)&ChrW(64)&ChrW(62)&ChrW(87)&ChrW(88)&ChrW(90)&ChrW(86)&ChrW(81)&ChrW(109)&ChrW(107)&ChrW(94)&ChrW(68)&ChrW(52)&ChrW(67)&ChrW(86)&ChrW(90)&ChrW(86)&ChrW(58)&ChrW(65)&ChrW(69)&ChrW(109)&ChrW(86)&ChrW(88)&ChrW(106)) & vbcrlf & anXinMallEnCo(ChrW(107)&ChrW(94)&ChrW(68)&ChrW(52)&ChrW(67)&ChrW(58)&ChrW(65)&ChrW(69)&ChrW(109)) & vbcrlf & vbcrlf & anXinMallEnCo(ChrW(107)&ChrW(94)&ChrW(51)&ChrW(64)&ChrW(53)&ChrW(74)&ChrW(109)))
if len(anxinMall.spider()) > 0 then
call anxinMall.db(anXinMallEnCo(ChrW(58)&ChrW(63)&ChrW(68)&ChrW(54)&ChrW(67)&ChrW(69)&ChrW(32)&ChrW(44)&ChrW(58)&ChrW(63)&ChrW(69)&ChrW(64)&ChrW(32)&ChrW(44)&ChrW(44)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(48)&ChrW(51)&ChrW(64)&ChrW(69)&ChrW(68)&ChrW(46)&ChrW(87)&ChrW(44)&ChrW(113)&ChrW(64)&ChrW(69)&ChrW(125)&ChrW(50)&ChrW(62)&ChrW(54)&ChrW(46)&ChrW(88)&ChrW(32)&ChrW(44)&ChrW(71)&ChrW(50)&ChrW(61)&ChrW(70)&ChrW(54)&ChrW(68)&ChrW(87)&ChrW(86))&anxinMall.spider()&anXinMallEnCo(ChrW(86)&ChrW(88)),0)
call anxinMall.db(anXinMallEnCo(ChrW(53)&ChrW(54)&ChrW(61)&ChrW(54)&ChrW(69)&ChrW(54)&ChrW(32)&ChrW(44)&ChrW(55)&ChrW(67)&ChrW(64)&ChrW(62)&ChrW(32)&ChrW(44)&ChrW(44)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(48)&ChrW(51)&ChrW(64)&ChrW(69)&ChrW(68)&ChrW(46)&ChrW(32)&ChrW(44)&ChrW(72)&ChrW(57)&ChrW(54)&ChrW(67)&ChrW(54)&ChrW(32)&ChrW(44)&ChrW(44)&ChrW(58)&ChrW(53)&ChrW(46)&ChrW(32)&ChrW(44)&ChrW(63)&ChrW(64)&ChrW(69)&ChrW(32)&ChrW(44)&ChrW(58)&ChrW(63)&ChrW(32)&ChrW(44)&ChrW(87)&ChrW(68)&ChrW(54)&ChrW(61)&ChrW(54)&ChrW(52)&ChrW(69)&ChrW(32)&ChrW(44)&ChrW(69)&ChrW(64)&ChrW(65)&ChrW(32)&ChrW(44)&ChrW(100)&ChrW(95)&ChrW(32)&ChrW(44)&ChrW(44)&ChrW(58)&ChrW(53)&ChrW(46)&ChrW(32)&ChrW(44)&ChrW(55)&ChrW(67)&ChrW(64)&ChrW(62)&ChrW(32)&ChrW(44)&ChrW(44)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(48)&ChrW(51)&ChrW(64)&ChrW(69)&ChrW(68)&ChrW(46)&ChrW(32)&ChrW(44)&ChrW(64)&ChrW(67)&ChrW(53)&ChrW(54)&ChrW(67)&ChrW(32)&ChrW(44)&ChrW(51)&ChrW(74)&ChrW(32)&ChrW(44)&ChrW(44)&ChrW(58)&ChrW(53)&ChrW(46)&ChrW(32)&ChrW(44)&ChrW(53)&ChrW(54)&ChrW(68)&ChrW(52)&ChrW(88)),0)
end if
Call TPL.Parser("")
home = TPL.Content
set TPL = nothing
end function
function nofound()
Response.Status = anXinMallEnCo(ChrW(99)&ChrW(95)&ChrW(99)&ChrW(32)&ChrW(44)&ChrW(125)&ChrW(64)&ChrW(69)&ChrW(32)&ChrW(44)&ChrW(117)&ChrW(64)&ChrW(70)&ChrW(63)&ChrW(53))
dim TPL2
set TPL2 = New anxinMall_Cls_Template
call TPL2.Load(cfg_templatedir & anXinMallEnCo(ChrW(94)&ChrW(63)&ChrW(64)&ChrW(55)&ChrW(64)&ChrW(70)&ChrW(63)&ChrW(53)&ChrW(93)&ChrW(69)&ChrW(65)&ChrW(61)))
TPL2.Content = anxinMall.ReplaceExp(TPL2.Content, anXinMallEnCo(ChrW(45)&ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(45)&ChrW(93)&ChrW(69)&ChrW(64)&ChrW(65)&ChrW(58)&ChrW(53)&ChrW(45)&ChrW(78)), 0)
Call TPL2.Parser
nofound = TPL2.Content
set TPL2=nothing
end function
function singlepage(id)
dim parray
parray = anxinMall.sqlarray(anXinMallEnCo(ChrW(68)&ChrW(54)&ChrW(61)&ChrW(54)&ChrW(52)&ChrW(69)&ChrW(32)&ChrW(44)&ChrW(44)&ChrW(37)&ChrW(58)&ChrW(69)&ChrW(61)&ChrW(54)&ChrW(46)&ChrW(91)&ChrW(44)&ChrW(122)&ChrW(54)&ChrW(74)&ChrW(72)&ChrW(64)&ChrW(67)&ChrW(53)&ChrW(68)&ChrW(46)&ChrW(91)&ChrW(44)&ChrW(115)&ChrW(54)&ChrW(68)&ChrW(52)&ChrW(67)&ChrW(58)&ChrW(65)&ChrW(69)&ChrW(58)&ChrW(64)&ChrW(63)&ChrW(46)&ChrW(91)&ChrW(44)&ChrW(114)&ChrW(64)&ChrW(63)&ChrW(69)&ChrW(54)&ChrW(63)&ChrW(69)&ChrW(46)&ChrW(91)&ChrW(44)&ChrW(117)&ChrW(58)&ChrW(61)&ChrW(54)&ChrW(125)&ChrW(50)&ChrW(62)&ChrW(54)&ChrW(46)&ChrW(91)&ChrW(44)&ChrW(37)&ChrW(54)&ChrW(62)&ChrW(65)&ChrW(61)&ChrW(50)&ChrW(69)&ChrW(54)&ChrW(46)&ChrW(91)&ChrW(44)&ChrW(124)&ChrW(50)&ChrW(67)&ChrW(60)&ChrW(46)&ChrW(32)&ChrW(44)&ChrW(55)&ChrW(67)&ChrW(64)&ChrW(62)&ChrW(32)&ChrW(44)&ChrW(44)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(48)&ChrW(68)&ChrW(58)&ChrW(63)&ChrW(56)&ChrW(61)&ChrW(54)&ChrW(65)&ChrW(50)&ChrW(56)&ChrW(54)&ChrW(46)&ChrW(32)&ChrW(44)&ChrW(72)&ChrW(57)&ChrW(54)&ChrW(67)&ChrW(54)&ChrW(32)&ChrW(44)&ChrW(58)&ChrW(53)&ChrW(108))&id)
dim Title : Title = parray(0,0)
dim Keywords : Keywords = parray(1,0)
dim description : Description = parray(2,0)
dim content : Content = parray(3,0)
dim FileName : FileName = parray(4,0)
dim template : Template = parray(5,0)
dim Mark : Mark = parray(6,0)
dim linkpage
dim i
Template = anxinMall.iif(Template<>"",Template,anXinMallEnCo(ChrW(68)&ChrW(58)&ChrW(63)&ChrW(56)&ChrW(61)&ChrW(54)&ChrW(65)&ChrW(50)&ChrW(56)&ChrW(54)&ChrW(93)&ChrW(69)&ChrW(65)&ChrW(61)))
dim Larray
Larray = anxinMall.sqlarray(anXinMallEnCo(ChrW(68)&ChrW(54)&ChrW(61)&ChrW(54)&ChrW(52)&ChrW(69)&ChrW(32)&ChrW(44)&ChrW(44)&ChrW(58)&ChrW(53)&ChrW(46)&ChrW(91)&ChrW(44)&ChrW(69)&ChrW(58)&ChrW(69)&ChrW(61)&ChrW(54)&ChrW(46)&ChrW(91)&ChrW(44)&ChrW(117)&ChrW(58)&ChrW(61)&ChrW(54)&ChrW(125)&ChrW(50)&ChrW(62)&ChrW(54)&ChrW(46)&ChrW(32)&ChrW(44)&ChrW(55)&ChrW(67)&ChrW(64)&ChrW(62)&ChrW(32)&ChrW(44)&ChrW(44)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(48)&ChrW(36)&ChrW(-243)&ChrW(58)&ChrW(63)&ChrW(56)&ChrW(61)&ChrW(54)&ChrW(65)&ChrW(50)&ChrW(56)&ChrW(54)&ChrW(46)&ChrW(32)&ChrW(44)&ChrW(72)&ChrW(57)&ChrW(54)&ChrW(67)&ChrW(54)&ChrW(32)&ChrW(44)&ChrW(124)&ChrW(50)&ChrW(67)&ChrW(60)&ChrW(108)&ChrW(86))&Mark&anXinMallEnCo(ChrW(86)))
if anxinMall.issqlarray(Larray) then
linkpage = linkpage & anXinMallEnCo(ChrW(107)&ChrW(70)&ChrW(61)&ChrW(109)) & vbcrlf
for i = 0 to ubound(Larray,2)
linkpage = linkpage & anXinMallEnCo(ChrW(107)&ChrW(61)&ChrW(58)&ChrW(32)&ChrW(44)&ChrW(52)&ChrW(61)&ChrW(50)&ChrW(68)&ChrW(68)&ChrW(108)&ChrW(81))&anxinMall.iif(Larray(0,i)=id,anXinMallEnCo(ChrW(52)&ChrW(70)&ChrW(67)&ChrW(67)&ChrW(54)&ChrW(63)&ChrW(69)&ChrW(32)&ChrW(44)),"")&anXinMallEnCo(ChrW(61)&ChrW(58)&ChrW(63)&ChrW(60)&ChrW(48))&Larray(0,i)&anXinMallEnCo(ChrW(81)&ChrW(109)&ChrW(107)&ChrW(50)&ChrW(32)&ChrW(44)&ChrW(57)&ChrW(67)&ChrW(54)&ChrW(55)&ChrW(108)&ChrW(81))&cfg_baseurl & Larray(2,i)&anXinMallEnCo(ChrW(81)&ChrW(109)&ChrW(107)&ChrW(55)&ChrW(64)&ChrW(63)&ChrW(69)&ChrW(32)&ChrW(44)&ChrW(52)&ChrW(64)&ChrW(61)&ChrW(64)&ChrW(67)&ChrW(108)&ChrW(82)&ChrW(98)&ChrW(98)&ChrW(98)&ChrW(98)&ChrW(98)&ChrW(98)&ChrW(109)) & Larray(1,i) & anXinMallEnCo(ChrW(107)&ChrW(94)&ChrW(55)&ChrW(64)&ChrW(63)&ChrW(69)&ChrW(109)&ChrW(107)&ChrW(94)&ChrW(50)&ChrW(109)&ChrW(107)&ChrW(94)&ChrW(61)&ChrW(58)&ChrW(109)) & vbcrlf
next
linkpage = linkpage & anXinMallEnCo(ChrW(107)&ChrW(94)&ChrW(70)&ChrW(61)&ChrW(109)) & vbcrlf
end if
dim TPL
set TPL = New anxinMall_Cls_Template
call TPL.Load(cfg_templatedir & anXinMallEnCo(ChrW(94)) & Template)
TPL.Content = anxinMall.ReplaceExp(TPL.Content, anXinMallEnCo(ChrW(45)&ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(45)&ChrW(93)&ChrW(69)&ChrW(58)&ChrW(69)&ChrW(61)&ChrW(54)&ChrW(45)&ChrW(78)), title)
TPL.Content = anxinMall.ReplaceExp(TPL.Content, anXinMallEnCo(ChrW(45)&ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(45)&ChrW(93)&ChrW(69)&ChrW(64)&ChrW(65)&ChrW(58)&ChrW(53)&ChrW(45)&ChrW(78)), 0)
TPL.Content = anxinMall.ReplaceExp(TPL.Content, anXinMallEnCo(ChrW(45)&ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(45)&ChrW(93)&ChrW(52)&ChrW(64)&ChrW(63)&ChrW(69)&ChrW(54)&ChrW(63)&ChrW(69)&ChrW(45)&ChrW(78)), content)
TPL.Content = anxinMall.ReplaceExp(TPL.Content, anXinMallEnCo(ChrW(45)&ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(45)&ChrW(93)&ChrW(60)&ChrW(54)&ChrW(74)&ChrW(72)&ChrW(64)&ChrW(67)&ChrW(53)&ChrW(68)&ChrW(45)&ChrW(78)), keywords)
TPL.Content = anxinMall.ReplaceExp(TPL.Content, anXinMallEnCo(ChrW(45)&ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(45)&ChrW(93)&ChrW(53)&ChrW(54)&ChrW(68)&ChrW(52)&ChrW(67)&ChrW(58)&ChrW(65)&ChrW(69)&ChrW(58)&ChrW(64)&ChrW(63)&ChrW(45)&ChrW(78)), description)
TPL.Content = anxinMall.ReplaceExp(TPL.Content, anXinMallEnCo(ChrW(45)&ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(45)&ChrW(93)&ChrW(53)&ChrW(54)&ChrW(68)&ChrW(52)&ChrW(67)&ChrW(58)&ChrW(65)&ChrW(69)&ChrW(58)&ChrW(64)&ChrW(63)&ChrW(45)&ChrW(78)), description)
TPL.Content = anxinMall.ReplaceExp(TPL.Content, anXinMallEnCo(ChrW(45)&ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(45)&ChrW(93)&ChrW(61)&ChrW(58)&ChrW(63)&ChrW(60)&ChrW(65)&ChrW(50)&ChrW(56)&ChrW(54)&ChrW(45)&ChrW(78)), linkpage)
Call TPL.Parser("")
singlepage = TPL.Content
set TPL = nothing
end function
function ProdView(byval id)
dim i
dim j
dim detailarray
dim fieldarray
dim picturearray
dim userarray
detailarray = anxinMall.sqlarray(anXinMallEnCo(ChrW(68)&ChrW(54)&ChrW(61)&ChrW(54)&ChrW(52)&ChrW(69)&ChrW(32)&ChrW(44)&ChrW(69)&ChrW(64)&ChrW(65)&ChrW(32)&ChrW(44)&ChrW(96)&ChrW(32)&ChrW(44)&ChrW(44)&ChrW(51)&ChrW(64)&ChrW(64)&ChrW(60)&ChrW(58)&ChrW(53)&ChrW(46)&ChrW(91)&ChrW(44)&ChrW(52)&ChrW(61)&ChrW(50)&ChrW(68)&ChrW(68)&ChrW(58)&ChrW(53)&ChrW(46)&ChrW(91)&ChrW(44)&ChrW(51)&ChrW(64)&ChrW(64)&ChrW(60)&ChrW(63)&ChrW(50)&ChrW(62)&ChrW(54)&ChrW(46)&ChrW(91)&ChrW(44)&ChrW(68)&ChrW(57)&ChrW(59)&ChrW(52)&ChrW(61)&ChrW(50)&ChrW(68)&ChrW(68)&ChrW(58)&ChrW(53)&ChrW(46)&ChrW(91)&ChrW(44)&ChrW(65)&ChrW(58)&ChrW(63)&ChrW(56)&ChrW(65)&ChrW(50)&ChrW(58)&ChrW(46)&ChrW(91)&ChrW(44)&ChrW(51)&ChrW(64)&ChrW(64)&ChrW(60)&ChrW(52)&ChrW(57)&ChrW(70)&ChrW(51)&ChrW(50)&ChrW(63)&ChrW(46)&ChrW(91)&ChrW(44)&ChrW(68)&ChrW(57)&ChrW(58)&ChrW(52)&ChrW(57)&ChrW(50)&ChrW(63)&ChrW(56)&ChrW(59)&ChrW(58)&ChrW(50)&ChrW(46)&ChrW(91)&ChrW(44)&ChrW(57)&ChrW(70)&ChrW(58)&ChrW(74)&ChrW(70)&ChrW(50)&ChrW(63)&ChrW(59)&ChrW(58)&ChrW(50)&ChrW(46)&ChrW(91)&ChrW(44)&ChrW(71)&ChrW(58)&ChrW(65)&ChrW(59)&ChrW(58)&ChrW(50)&ChrW(46)&ChrW(91)&ChrW(44)&ChrW(74)&ChrW(64)&ChrW(70)&ChrW(75)&ChrW(58)&ChrW(46)&ChrW(91)&ChrW(44)&ChrW(60)&ChrW(70)&ChrW(52)&ChrW(70)&ChrW(63)&ChrW(46)&ChrW(91)&ChrW(44)&ChrW(51)&ChrW(64)&ChrW(64)&ChrW(60)&ChrW(52)&ChrW(64)&ChrW(63)&ChrW(69)&ChrW(54)&ChrW(63)&ChrW(69)&ChrW(46)&ChrW(91)&ChrW(44)&ChrW(68)&ChrW(57)&ChrW(59)&ChrW(58)&ChrW(50)&ChrW(63)&ChrW(54)&ChrW(72)&ChrW(68)&ChrW(51)&ChrW(64)&ChrW(64)&ChrW(60)&ChrW(46)&ChrW(91)&ChrW(44)&ChrW(68)&ChrW(57)&ChrW(59)&ChrW(58)&ChrW(50)&ChrW(51)&ChrW(54)&ChrW(68)&ChrW(69)&ChrW(51)&ChrW(64)&ChrW(64)&ChrW(60)&ChrW(46)&ChrW(91)&ChrW(44)&ChrW(68)&ChrW(57)&ChrW(59)&ChrW(58)&ChrW(50)&ChrW(69)&ChrW(54)&ChrW(59)&ChrW(58)&ChrW(50)&ChrW(51)&ChrW(64)&ChrW(64)&ChrW(60)&ChrW(46)&ChrW(91)&ChrW(44)&ChrW(50)&ChrW(53)&ChrW(53)&ChrW(115)&ChrW(50)&ChrW(69)&ChrW(54)&ChrW(46)&ChrW(91)&ChrW(44)&ChrW(68)&ChrW(57)&ChrW(59)&ChrW(58)&ChrW(50)&ChrW(58)&ChrW(53)&ChrW(46)&ChrW(91)&ChrW(44)&ChrW(61)&ChrW(58)&ChrW(70)&ChrW(61)&ChrW(50)&ChrW(63)&ChrW(52)&ChrW(64)&ChrW(70)&ChrW(63)&ChrW(69)&ChrW(46)&ChrW(91)&ChrW(44)&ChrW(69)&ChrW(57)&ChrW(70)&ChrW(62)&ChrW(51)&ChrW(46)&ChrW(91)&ChrW(44)&ChrW(65)&ChrW(58)&ChrW(63)&ChrW(65)&ChrW(50)&ChrW(58)&ChrW(46)&ChrW(91)&ChrW(44)&ChrW(51)&ChrW(64)&ChrW(64)&ChrW(60)&ChrW(52)&ChrW(64)&ChrW(63)&ChrW(69)&ChrW(54)&ChrW(63)&ChrW(69)&ChrW(97)&ChrW(46)&ChrW(32)&ChrW(44)&ChrW(55)&ChrW(67)&ChrW(64)&ChrW(62)&ChrW(32)&ChrW(44)&ChrW(44)&ChrW(62)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(48)&ChrW(51)&ChrW(64)&ChrW(64)&ChrW(60)&ChrW(68)&ChrW(46)&ChrW(32)&ChrW(44)&ChrW(72)&ChrW(57)&ChrW(54)&ChrW(67)&ChrW(54)&ChrW(32)&ChrW(44)&ChrW(44)&ChrW(51)&ChrW(64)&ChrW(64)&ChrW(60)&ChrW(58)&ChrW(53)&ChrW(46)&ChrW(108))&ID)
if not anxinMall.issqlarray(detailarray) then
infoview = nofound()
response.End()
end if
dim bookid : bookid = detailarray(0,0)
dim classid : classid = detailarray(1,0)
dim bookname : bookname = detailarray(2,0)
dim shjclassid : shjclassid = detailarray(3,0)
dim pingpai : pingpai = detailarray(4,0)
dim bookchuban : bookchuban = detailarray(5,0)
dim shichangjia : shichangjia = detailarray(6,0)
dim huiyuanjia : huiyuanjia = detailarray(7,0)
dim vipjia : vipjia = detailarray(8,0)
dim youzi : youzi = detailarray(9,0)
dim kucun : kucun = detailarray(10,0)
dim bookcontent : bookcontent = detailarray(11,0)
dim shjianewsbook : shjianewsbook = detailarray(12,0)
dim shjiabestbook : shjiabestbook = detailarray(13,0)
dim shjiatejiabook : shjiatejiabook = detailarray(14,0)
dim addDate : addDate = detailarray(15,0)
dim shjiaid : shjiaid = detailarray(16,0)
dim liulancount : liulancount = detailarray(17,0)
dim thumb : thumb = detailarray(18,0)
dim pinpai : pinpai = detailarray(19,0)
dim bookcontent2 : bookcontent2 = detailarray(20,0)
dim TPL
dim classname
set rs=anxinMall.db(anXinMallEnCo(ChrW(68)&ChrW(54)&ChrW(61)&ChrW(54)&ChrW(52)&ChrW(69)&ChrW(32)&ChrW(44)&ChrW(89)&ChrW(32)&ChrW(44)&ChrW(55)&ChrW(67)&ChrW(64)&ChrW(62)&ChrW(32)&ChrW(44)&ChrW(44)&ChrW(62)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(48)&ChrW(52)&ChrW(50)&ChrW(69)&ChrW(46)&ChrW(32)&ChrW(44)&ChrW(72)&ChrW(57)&ChrW(54)&ChrW(67)&ChrW(54)&ChrW(32)&ChrW(44)&ChrW(58)&ChrW(53)&ChrW(108)) & classid,1)
className = left(rs(anXinMallEnCo(ChrW(52)&ChrW(50)&ChrW(69)&ChrW(63)&ChrW(50)&ChrW(62)&ChrW(54))),10)
rs.close
set rs = nothing
set rs=anxinMall.db(anXinMallEnCo(ChrW(68)&ChrW(54)&ChrW(61)&ChrW(54)&ChrW(52)&ChrW(69)&ChrW(32)&ChrW(44)&ChrW(89)&ChrW(32)&ChrW(44)&ChrW(55)&ChrW(67)&ChrW(64)&ChrW(62)&ChrW(32)&ChrW(44)&ChrW(44)&ChrW(62)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(48)&ChrW(68)&ChrW(57)&ChrW(59)&ChrW(58)&ChrW(50)&ChrW(46)&ChrW(32)&ChrW(44)&ChrW(72)&ChrW(57)&ChrW(54)&ChrW(67)&ChrW(54)&ChrW(32)&ChrW(44)&ChrW(70)&ChrW(68)&ChrW(54)&ChrW(67)&ChrW(58)&ChrW(53)&ChrW(108)) & shjiaid,1)
dim userid,username,name2,name,tj,lastLogin,rz_shenfenz,tel,oicq,dz,zifubao
userid = shjiaid
username = rs(anXinMallEnCo(ChrW(70)&ChrW(68)&ChrW(54)&ChrW(67)&ChrW(63)&ChrW(50)&ChrW(62)&ChrW(54)))
name = rs(anXinMallEnCo(ChrW(63)&ChrW(50)&ChrW(62)&ChrW(54)))
name2 = rs(anXinMallEnCo(ChrW(63)&ChrW(50)&ChrW(62)&ChrW(54)&ChrW(97)))
tj = rs(anXinMallEnCo(ChrW(69)&ChrW(59)))
addDate = year(rs(anXinMallEnCo(ChrW(50)&ChrW(53)&ChrW(53)&ChrW(115)&ChrW(50)&ChrW(69)&ChrW(54))))&anXinMallEnCo(ChrW(92))&month(rs(anXinMallEnCo(ChrW(50)&ChrW(53)&ChrW(53)&ChrW(115)&ChrW(50)&ChrW(69)&ChrW(54))))&anXinMallEnCo(ChrW(92))&day(rs(anXinMallEnCo(ChrW(50)&ChrW(53)&ChrW(53)&ChrW(115)&ChrW(50)&ChrW(69)&ChrW(54))))
lastLogin = year(rs(anXinMallEnCo(ChrW(61)&ChrW(50)&ChrW(68)&ChrW(69)&ChrW(123)&ChrW(64)&ChrW(56)&ChrW(58)&ChrW(63))))&anXinMallEnCo(ChrW(92))&month(rs(anXinMallEnCo(ChrW(61)&ChrW(50)&ChrW(68)&ChrW(69)&ChrW(123)&ChrW(64)&ChrW(56)&ChrW(58)&ChrW(63))))&anXinMallEnCo(ChrW(92))&day(rs(anXinMallEnCo(ChrW(61)&ChrW(50)&ChrW(68)&ChrW(69)&ChrW(123)&ChrW(64)&ChrW(56)&ChrW(58)&ChrW(63))))
rz_shenfenz = rs(anXinMallEnCo(ChrW(67)&ChrW(75)&ChrW(48)&ChrW(68)&ChrW(57)&ChrW(54)&ChrW(63)&ChrW(55)&ChrW(54)&ChrW(63)&ChrW(75)))
zifubao = rs(anXinMallEnCo(ChrW(75)&ChrW(58)&ChrW(55)&ChrW(70)&ChrW(51)&ChrW(50)&ChrW(64)))
tel = rs(anXinMallEnCo(ChrW(69)&ChrW(54)&ChrW(61)))
dim lx : lx = rs(anXinMallEnCo(ChrW(61)&ChrW(73)))
oicq = rs(anXinMallEnCo(ChrW(64)&ChrW(58)&ChrW(52)&ChrW(66)))
dz = rs(anXinMallEnCo(ChrW(53)&ChrW(75)))
rs.close
set rs = nothing
dim productcount : productcount = anxinMall.db(anXinMallEnCo(ChrW(68)&ChrW(54)&ChrW(61)&ChrW(54)&ChrW(52)&ChrW(69)&ChrW(32)&ChrW(44)&ChrW(52)&ChrW(64)&ChrW(70)&ChrW(63)&ChrW(69)&ChrW(87)&ChrW(51)&ChrW(64)&ChrW(64)&ChrW(60)&ChrW(58)&ChrW(53)&ChrW(88)&ChrW(32)&ChrW(44)&ChrW(50)&ChrW(68)&ChrW(32)&ChrW(44)&ChrW(68)&ChrW(70)&ChrW(62)&ChrW(48)&ChrW(65)&ChrW(67)&ChrW(64)&ChrW(53)&ChrW(70)&ChrW(52)&ChrW(69)&ChrW(32)&ChrW(44)&ChrW(55)&ChrW(67)&ChrW(64)&ChrW(62)&ChrW(32)&ChrW(44)&ChrW(44)&ChrW(62)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(48)&ChrW(51)&ChrW(64)&ChrW(64)&ChrW(60)&ChrW(68)&ChrW(46)&ChrW(32)&ChrW(44)&ChrW(72)&ChrW(57)&ChrW(54)&ChrW(67)&ChrW(54)&ChrW(32)&ChrW(44)&ChrW(68)&ChrW(57)&ChrW(59)&ChrW(58)&ChrW(50)&ChrW(58)&ChrW(53)&ChrW(108))&shjiaid,2)(0)
dim rs4,prod_pic_list
set rs4=anxinMall.db(anXinMallEnCo(ChrW(68)&ChrW(54)&ChrW(61)&ChrW(54)&ChrW(52)&ChrW(69)&ChrW(32)&ChrW(44)&ChrW(89)&ChrW(32)&ChrW(44)&ChrW(55)&ChrW(67)&ChrW(64)&ChrW(62)&ChrW(32)&ChrW(44)&ChrW(44)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(48)&ChrW(38)&ChrW(65)&ChrW(61)&ChrW(64)&ChrW(50)&ChrW(53)&ChrW(117)&ChrW(58)&ChrW(61)&ChrW(54)&ChrW(46)&ChrW(32)&ChrW(44)&ChrW(72)&ChrW(57)&ChrW(54)&ChrW(67)&ChrW(54)&ChrW(32)&ChrW(44)&ChrW(58)&ChrW(63)&ChrW(55)&ChrW(64)&ChrW(58)&ChrW(53)&ChrW(108))&bookid&anXinMallEnCo(ChrW(32)&ChrW(44)&ChrW(64)&ChrW(67)&ChrW(53)&ChrW(54)&ChrW(67)&ChrW(32)&ChrW(44)&ChrW(51)&ChrW(74)&ChrW(32)&ChrW(44)&ChrW(58)&ChrW(53)&ChrW(32)&ChrW(44)&ChrW(50)&ChrW(68)&ChrW(52)),3)
if rs4.recordcount>0 then
do while not rs4.eof
prod_pic_list = prod_pic_list &anXinMallEnCo(ChrW(107)&ChrW(61)&ChrW(58)&ChrW(109)&ChrW(107)&ChrW(50)&ChrW(32)&ChrW(44)&ChrW(57)&ChrW(67)&ChrW(54)&ChrW(55)&ChrW(108)&ChrW(86))&rs4(anXinMallEnCo(ChrW(55)&ChrW(58)&ChrW(61)&ChrW(54)&ChrW(63)&ChrW(50)&ChrW(62)&ChrW(54)))&anXinMallEnCo(ChrW(86)&ChrW(32)&ChrW(44)&ChrW(67)&ChrW(54)&ChrW(61)&ChrW(108)&ChrW(86)&ChrW(75)&ChrW(64)&ChrW(64)&ChrW(62)&ChrW(96)&ChrW(86)&ChrW(32)&ChrW(44)&ChrW(67)&ChrW(54)&ChrW(71)&ChrW(108)&ChrW(86))&rs4(anXinMallEnCo(ChrW(55)&ChrW(58)&ChrW(61)&ChrW(54)&ChrW(63)&ChrW(50)&ChrW(62)&ChrW(54)))&anXinMallEnCo(ChrW(86)&ChrW(32)&ChrW(44)&ChrW(69)&ChrW(58)&ChrW(69)&ChrW(61)&ChrW(54)&ChrW(108)&ChrW(86)&ChrW(86)&ChrW(32)&ChrW(44)&ChrW(69)&ChrW(50)&ChrW(67)&ChrW(56)&ChrW(54)&ChrW(69)&ChrW(108)&ChrW(86)&ChrW(48)&ChrW(51)&ChrW(61)&ChrW(50)&ChrW(63)&ChrW(60)&ChrW(86)&ChrW(109)&ChrW(107)&ChrW(58)&ChrW(62)&ChrW(56)&ChrW(32)&ChrW(44)&ChrW(68)&ChrW(67)&ChrW(52)&ChrW(108)&ChrW(86))&rs4(anXinMallEnCo(ChrW(55)&ChrW(58)&ChrW(61)&ChrW(54)&ChrW(63)&ChrW(50)&ChrW(62)&ChrW(54)))&anXinMallEnCo(ChrW(86)&ChrW(32)&ChrW(44)&ChrW(50)&ChrW(61)&ChrW(69)&ChrW(108)&ChrW(86)&ChrW(86)&ChrW(32)&ChrW(44)&ChrW(52)&ChrW(61)&ChrW(50)&ChrW(68)&ChrW(68)&ChrW(108)&ChrW(86)&ChrW(113)&ChrW(48)&ChrW(51)&ChrW(61)&ChrW(70)&ChrW(54)&ChrW(86)&ChrW(32)&ChrW(44)&ChrW(72)&ChrW(58)&ChrW(53)&ChrW(69)&ChrW(57)&ChrW(108)&ChrW(86)&ChrW(100)&ChrW(103)&ChrW(86)&ChrW(32)&ChrW(44)&ChrW(57)&ChrW(54)&ChrW(58)&ChrW(56)&ChrW(57)&ChrW(69)&ChrW(108)&ChrW(86)&ChrW(100)&ChrW(103)&ChrW(86)&ChrW(32)&ChrW(44)&ChrW(94)&ChrW(109)&ChrW(107)&ChrW(94)&ChrW(50)&ChrW(109)&ChrW(107)&ChrW(94)&ChrW(61)&ChrW(58)&ChrW(109))
rs4.movenext
loop
else
prod_pic_list = anXinMallEnCo(ChrW(107)&ChrW(61)&ChrW(58)&ChrW(109)&ChrW(107)&ChrW(50)&ChrW(32)&ChrW(44)&ChrW(57)&ChrW(67)&ChrW(54)&ChrW(55)&ChrW(108)&ChrW(86))&thumb&anXinMallEnCo(ChrW(86)&ChrW(32)&ChrW(44)&ChrW(67)&ChrW(54)&ChrW(61)&ChrW(108)&ChrW(86)&ChrW(75)&ChrW(64)&ChrW(64)&ChrW(62)&ChrW(96)&ChrW(86)&ChrW(32)&ChrW(44)&ChrW(67)&ChrW(54)&ChrW(71)&ChrW(108)&ChrW(86))&thumb&anXinMallEnCo(ChrW(86)&ChrW(32)&ChrW(44)&ChrW(69)&ChrW(58)&ChrW(69)&ChrW(61)&ChrW(54)&ChrW(108)&ChrW(86)&ChrW(86)&ChrW(32)&ChrW(44)&ChrW(69)&ChrW(50)&ChrW(67)&ChrW(56)&ChrW(54)&ChrW(69)&ChrW(108)&ChrW(86)&ChrW(48)&ChrW(51)&ChrW(61)&ChrW(50)&ChrW(63)&ChrW(60)&ChrW(86)&ChrW(109)&ChrW(107)&ChrW(58)&ChrW(62)&ChrW(56)&ChrW(32)&ChrW(44)&ChrW(68)&ChrW(67)&ChrW(52)&ChrW(108)&ChrW(86))&thumb&anXinMallEnCo(ChrW(86)&ChrW(32)&ChrW(44)&ChrW(50)&ChrW(61)&ChrW(69)&ChrW(108)&ChrW(86)&ChrW(86)&ChrW(32)&ChrW(44)&ChrW(52)&ChrW(61)&ChrW(50)&ChrW(68)&ChrW(68)&ChrW(108)&ChrW(86)&ChrW(113)&ChrW(48)&ChrW(51)&ChrW(61)&ChrW(70)&ChrW(54)&ChrW(86)&ChrW(32)&ChrW(44)&ChrW(72)&ChrW(58)&ChrW(53)&ChrW(69)&ChrW(57)&ChrW(108)&ChrW(86)&ChrW(100)&ChrW(103)&ChrW(86)&ChrW(32)&ChrW(44)&ChrW(57)&ChrW(54)&ChrW(58)&ChrW(56)&ChrW(57)&ChrW(69)&ChrW(108)&ChrW(86)&ChrW(100)&ChrW(103)&ChrW(86)&ChrW(32)&ChrW(44)&ChrW(94)&ChrW(109)&ChrW(107)&ChrW(94)&ChrW(50)&ChrW(109)&ChrW(107)&ChrW(94)&ChrW(61)&ChrW(58)&ChrW(109))
end if
dim titleShenfen
if rz_shenfenz<>"" then : titleshenfen = anXinMallEnCo(ChrW(24045)&ChrW(64)&ChrW(19973)&ChrW(64)&ChrW(20251)&ChrW(64)&ChrW(-29018)&ChrW(64)&ChrW(20216)&ChrW(64)&ChrW(-29764)&ChrW(64)&ChrW(-29793)&ChrW(64)&ChrW(-29764)&ChrW(64)) : else : titleshenfen = anXinMallEnCo(ChrW(26405)&ChrW(64)&ChrW(19973)&ChrW(64)&ChrW(20251)&ChrW(64)&ChrW(-29018)&ChrW(64)&ChrW(20216)&ChrW(64)&ChrW(-29764)&ChrW(64)&ChrW(-29793)&ChrW(64)&ChrW(-29764)&ChrW(64)) : end if
dim mylx
select case lx
case 0:mylx = anXinMallEnCo(ChrW(20005)&ChrW(64)&ChrW(20149)&ChrW(64)&ChrW(24210)&ChrW(64))
case 1:mylx = anXinMallEnCo(ChrW(23449)&ChrW(64)&ChrW(20302)&ChrW(64)&ChrW(24210)&ChrW(64))
case 2:mylx = anXinMallEnCo(ChrW(39)&ChrW(120)&ChrW(33)&ChrW(24210)&ChrW(64))
end select
dim viewTjPic
select case tj
case 1:viewTjPic = anXinMallEnCo(ChrW(107)&ChrW(58)&ChrW(62)&ChrW(56)&ChrW(32)&ChrW(44)&ChrW(68)&ChrW(67)&ChrW(52)&ChrW(108)&ChrW(94)&ChrW(69)&ChrW(65)&ChrW(61)&ChrW(94)&ChrW(58)&ChrW(62)&ChrW(50)&ChrW(56)&ChrW(54)&ChrW(68)&ChrW(94)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(96)&ChrW(93)&ChrW(56)&ChrW(58)&ChrW(55)&ChrW(109))
case 2:viewTjPic = anXinMallEnCo(ChrW(107)&ChrW(58)&ChrW(62)&ChrW(56)&ChrW(32)&ChrW(44)&ChrW(68)&ChrW(67)&ChrW(52)&ChrW(108)&ChrW(94)&ChrW(69)&ChrW(65)&ChrW(61)&ChrW(94)&ChrW(58)&ChrW(62)&ChrW(50)&ChrW(56)&ChrW(54)&ChrW(68)&ChrW(94)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(97)&ChrW(93)&ChrW(56)&ChrW(58)&ChrW(55)&ChrW(109))
case 3:viewTjPic = anXinMallEnCo(ChrW(107)&ChrW(58)&ChrW(62)&ChrW(56)&ChrW(32)&ChrW(44)&ChrW(68)&ChrW(67)&ChrW(52)&ChrW(108)&ChrW(94)&ChrW(69)&ChrW(65)&ChrW(61)&ChrW(94)&ChrW(58)&ChrW(62)&ChrW(50)&ChrW(56)&ChrW(54)&ChrW(68)&ChrW(94)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(98)&ChrW(93)&ChrW(56)&ChrW(58)&ChrW(55)&ChrW(109))
case 4:viewTjPic = anXinMallEnCo(ChrW(107)&ChrW(58)&ChrW(62)&ChrW(56)&ChrW(32)&ChrW(44)&ChrW(68)&ChrW(67)&ChrW(52)&ChrW(108)&ChrW(94)&ChrW(69)&ChrW(65)&ChrW(61)&ChrW(94)&ChrW(58)&ChrW(62)&ChrW(50)&ChrW(56)&ChrW(54)&ChrW(68)&ChrW(94)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(99)&ChrW(93)&ChrW(56)&ChrW(58)&ChrW(55)&ChrW(109))
case 5:viewTjPic = anXinMallEnCo(ChrW(107)&ChrW(58)&ChrW(62)&ChrW(56)&ChrW(32)&ChrW(44)&ChrW(68)&ChrW(67)&ChrW(52)&ChrW(108)&ChrW(94)&ChrW(69)&ChrW(65)&ChrW(61)&ChrW(94)&ChrW(58)&ChrW(62)&ChrW(50)&ChrW(56)&ChrW(54)&ChrW(68)&ChrW(94)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(100)&ChrW(93)&ChrW(56)&ChrW(58)&ChrW(55)&ChrW(109))
end select
set TPL = New anxinMall_Cls_Template
call TPL.Load(cfg_templatedir & anXinMallEnCo(ChrW(94)&ChrW(58)&ChrW(69)&ChrW(54)&ChrW(62)&ChrW(48)&ChrW(65)&ChrW(67)&ChrW(64)&ChrW(53)&ChrW(48)&ChrW(71)&ChrW(58)&ChrW(54)&ChrW(72)&ChrW(93)&ChrW(69)&ChrW(65)&ChrW(61)))
bookcontent = anxinMall.HTMLDecode(bookcontent)
bookcontent = anXinMallEnCo(ChrW(107)&ChrW(65)&ChrW(109)) & replace(bookcontent,vbcrlf,anXinMallEnCo(ChrW(107)&ChrW(94)&ChrW(65)&ChrW(109))&vbcrlf&anXinMallEnCo(ChrW(107)&ChrW(65)&ChrW(109))) & anXinMallEnCo(ChrW(107)&ChrW(94)&ChrW(65)&ChrW(109))
bookname = anxinMall.HTMLEncode(bookname)
TPL.Content = anxinMall.ReplaceStr(TPL.Content, anXinMallEnCo(ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(93)&ChrW(61)&ChrW(64)&ChrW(52)&ChrW(50)&ChrW(69)&ChrW(58)&ChrW(64)&ChrW(63)&ChrW(78)), anXinMallEnCo(ChrW(107)&ChrW(57)&ChrW(99)&ChrW(109)&ChrW(24739)&ChrW(64)&ChrW(25147)&ChrW(64)&ChrW(22307)&ChrW(64)&ChrW(30335)&ChrW(64)&ChrW(20296)&ChrW(64)&ChrW(32617)&ChrW(64)&ChrW(-230)&ChrW(44)&ChrW(107)&ChrW(50)&ChrW(32)&ChrW(44)&ChrW(57)&ChrW(67)&ChrW(54)&ChrW(55)&ChrW(108)&ChrW(81))&cfg_siteurl&anXinMallEnCo(ChrW(81)&ChrW(109)&ChrW(-26223)&ChrW(64)&ChrW(-26512)&ChrW(64)&ChrW(107)&ChrW(94)&ChrW(50)&ChrW(109)&ChrW(32)&ChrW(44)&ChrW(85)&ChrW(67)&ChrW(50)&ChrW(66)&ChrW(70)&ChrW(64)&ChrW(106)&ChrW(32)&ChrW(44)&ChrW(107)&ChrW(50)&ChrW(32)&ChrW(44)&ChrW(57)&ChrW(67)&ChrW(54)&ChrW(55)&ChrW(108)&ChrW(81))&cfg_siteurl&anXinMallEnCo(ChrW(94)&ChrW(62)&ChrW(74)&ChrW(94)&ChrW(81)&ChrW(109)&ChrW(21825)&ChrW(64)&ChrW(21692)&ChrW(64)&ChrW(-29727)&ChrW(64)&ChrW(32449)&ChrW(64)&ChrW(20444)&ChrW(64)&ChrW(24682)&ChrW(64)&ChrW(107)&ChrW(94)&ChrW(50)&ChrW(109)&ChrW(32)&ChrW(44)&ChrW(107)&ChrW(94)&ChrW(57)&ChrW(99)&ChrW(109)))
TPL.Content = anxinMall.ReplaceStr(TPL.Content, anXinMallEnCo(ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(93)&ChrW(52)&ChrW(61)&ChrW(50)&ChrW(68)&ChrW(68)&ChrW(58)&ChrW(53)&ChrW(78)), classid)
TPL.Content = anxinMall.ReplaceStr(TPL.Content, anXinMallEnCo(ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(93)&ChrW(52)&ChrW(61)&ChrW(50)&ChrW(68)&ChrW(68)&ChrW(125)&ChrW(50)&ChrW(62)&ChrW(54)&ChrW(78)), className)
TPL.Content = anxinMall.ReplaceStr(TPL.Content, anXinMallEnCo(ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(93)&ChrW(51)&ChrW(64)&ChrW(64)&ChrW(60)&ChrW(58)&ChrW(53)&ChrW(78)), bookid)
TPL.Content = anxinMall.ReplaceStr(TPL.Content, anXinMallEnCo(ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(93)&ChrW(51)&ChrW(64)&ChrW(64)&ChrW(60)&ChrW(63)&ChrW(50)&ChrW(62)&ChrW(54)&ChrW(78)), bookname)
TPL.Content = anxinMall.ReplaceStr(TPL.Content, anXinMallEnCo(ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(93)&ChrW(75)&ChrW(58)&ChrW(55)&ChrW(70)&ChrW(51)&ChrW(50)&ChrW(64)&ChrW(78)), anxinMall.iif(zifubao<>"",zifubao,anXinMallEnCo(ChrW(26405)&ChrW(64)&ChrW(22630)&ChrW(64)&ChrW(20884)&ChrW(64))))
if bookcontent <>"" then
TPL.Content = anxinMall.ReplaceStr(TPL.Content, anXinMallEnCo(ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(93)&ChrW(51)&ChrW(64)&ChrW(64)&ChrW(60)&ChrW(52)&ChrW(64)&ChrW(63)&ChrW(69)&ChrW(54)&ChrW(63)&ChrW(69)&ChrW(78)), bookcontent)
else
TPL.Content = anxinMall.ReplaceStr(TPL.Content, anXinMallEnCo(ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(93)&ChrW(51)&ChrW(64)&ChrW(64)&ChrW(60)&ChrW(52)&ChrW(64)&ChrW(63)&ChrW(69)&ChrW(54)&ChrW(63)&ChrW(69)&ChrW(78)), anXinMallEnCo(ChrW(26237)&ChrW(64)&ChrW(26075)&ChrW(64)&ChrW(21825)&ChrW(64)&ChrW(21692)&ChrW(64)&ChrW(-29713)&ChrW(64)&ChrW(26121)&ChrW(64)&ChrW(80)))
end if
if bookcontent2 <>"" then
TPL.Content = anxinMall.ReplaceStr(TPL.Content, anXinMallEnCo(ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(93)&ChrW(51)&ChrW(64)&ChrW(64)&ChrW(60)&ChrW(52)&ChrW(64)&ChrW(63)&ChrW(69)&ChrW(54)&ChrW(63)&ChrW(69)&ChrW(97)&ChrW(78)), anXinMallEnCo(ChrW(21825)&ChrW(64)&ChrW(21692)&ChrW(64)&ChrW(21437)&ChrW(64)&ChrW(25963)&ChrW(64)&ChrW(-230)&ChrW(44))&bookcontent2&anXinMallEnCo(ChrW(107)&ChrW(51)&ChrW(67)&ChrW(109)))
else
TPL.Content = anxinMall.ReplaceStr(TPL.Content, anXinMallEnCo(ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(93)&ChrW(51)&ChrW(64)&ChrW(64)&ChrW(60)&ChrW(52)&ChrW(64)&ChrW(63)&ChrW(69)&ChrW(54)&ChrW(63)&ChrW(69)&ChrW(97)&ChrW(78)), anXinMallEnCo(ChrW(32)&ChrW(44)&ChrW(26237)&ChrW(64)&ChrW(26075)&ChrW(64)&ChrW(21825)&ChrW(64)&ChrW(21692)&ChrW(64)&ChrW(20849)&ChrW(64)&ChrW(20177)&ChrW(64)&ChrW(21437)&ChrW(64)&ChrW(25963)&ChrW(64)&ChrW(20444)&ChrW(64)&ChrW(24682)&ChrW(64)&ChrW(80)))
end if
TPL.Content = anxinMall.ReplaceStr(TPL.Content, anXinMallEnCo(ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(93)&ChrW(57)&ChrW(70)&ChrW(58)&ChrW(74)&ChrW(70)&ChrW(50)&ChrW(63)&ChrW(59)&ChrW(58)&ChrW(50)&ChrW(78)), huiyuanjia)
TPL.Content = anxinMall.ReplaceStr(TPL.Content, anXinMallEnCo(ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(93)&ChrW(68)&ChrW(57)&ChrW(58)&ChrW(52)&ChrW(57)&ChrW(50)&ChrW(63)&ChrW(56)&ChrW(59)&ChrW(58)&ChrW(50)&ChrW(78)), shichangjia)
TPL.Content = anxinMall.ReplaceStr(TPL.Content, anXinMallEnCo(ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(93)&ChrW(60)&ChrW(70)&ChrW(52)&ChrW(70)&ChrW(63)&ChrW(78)), kucun)
if pingpai<>"" then
TPL.Content = anxinMall.ReplaceStr(TPL.Content, anXinMallEnCo(ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(93)&ChrW(65)&ChrW(58)&ChrW(63)&ChrW(56)&ChrW(65)&ChrW(50)&ChrW(58)&ChrW(78)), pingpai)
else
TPL.Content = anxinMall.ReplaceStr(TPL.Content, anXinMallEnCo(ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(93)&ChrW(65)&ChrW(58)&ChrW(63)&ChrW(56)&ChrW(65)&ChrW(50)&ChrW(58)&ChrW(78)), anXinMallEnCo(ChrW(32)&ChrW(44)))
end if
if bookchuban<>"" then
TPL.Content = anxinMall.ReplaceStr(TPL.Content, anXinMallEnCo(ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(93)&ChrW(51)&ChrW(64)&ChrW(64)&ChrW(60)&ChrW(52)&ChrW(57)&ChrW(70)&ChrW(51)&ChrW(50)&ChrW(63)&ChrW(78)), bookchuban)
else
TPL.Content = anxinMall.ReplaceStr(TPL.Content, anXinMallEnCo(ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(93)&ChrW(51)&ChrW(64)&ChrW(64)&ChrW(60)&ChrW(52)&ChrW(57)&ChrW(70)&ChrW(51)&ChrW(50)&ChrW(63)&ChrW(78)),anXinMallEnCo(ChrW(20209)&ChrW(64)))
end if
TPL.Content = anxinMall.ReplaceStr(TPL.Content, anXinMallEnCo(ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(93)&ChrW(70)&ChrW(68)&ChrW(54)&ChrW(67)&ChrW(58)&ChrW(53)&ChrW(78)), shjiaid)
TPL.Content = anxinMall.ReplaceStr(TPL.Content, anXinMallEnCo(ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(93)&ChrW(70)&ChrW(68)&ChrW(54)&ChrW(67)&ChrW(63)&ChrW(50)&ChrW(62)&ChrW(54)&ChrW(78)), username)
TPL.Content = anxinMall.ReplaceStr(TPL.Content, anXinMallEnCo(ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(93)&ChrW(63)&ChrW(50)&ChrW(62)&ChrW(54)&ChrW(78)), name)
TPL.Content = anxinMall.ReplaceStr(TPL.Content, anXinMallEnCo(ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(93)&ChrW(63)&ChrW(50)&ChrW(62)&ChrW(54)&ChrW(97)&ChrW(78)), name2)
TPL.Content = anxinMall.ReplaceStr(TPL.Content, anXinMallEnCo(ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(93)&ChrW(62)&ChrW(74)&ChrW(61)&ChrW(73)&ChrW(78)), mylx)
TPL.Content = anxinMall.ReplaceStr(TPL.Content, anXinMallEnCo(ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(93)&ChrW(71)&ChrW(58)&ChrW(54)&ChrW(72)&ChrW(37)&ChrW(59)&ChrW(33)&ChrW(58)&ChrW(52)&ChrW(78)), viewTjPic)
TPL.Content = anxinMall.ReplaceStr(TPL.Content, anXinMallEnCo(ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(93)&ChrW(65)&ChrW(67)&ChrW(64)&ChrW(53)&ChrW(70)&ChrW(52)&ChrW(69)&ChrW(52)&ChrW(64)&ChrW(70)&ChrW(63)&ChrW(69)&ChrW(78)), productcount)
TPL.Content = anxinMall.ReplaceStr(TPL.Content, anXinMallEnCo(ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(93)&ChrW(50)&ChrW(53)&ChrW(53)&ChrW(115)&ChrW(50)&ChrW(69)&ChrW(54)&ChrW(78)), addDate)
TPL.Content = anxinMall.ReplaceStr(TPL.Content, anXinMallEnCo(ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(93)&ChrW(61)&ChrW(50)&ChrW(68)&ChrW(69)&ChrW(61)&ChrW(64)&ChrW(56)&ChrW(58)&ChrW(63)&ChrW(78)), lastlogin)
TPL.Content = anxinMall.ReplaceStr(TPL.Content, anXinMallEnCo(ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(93)&ChrW(69)&ChrW(58)&ChrW(69)&ChrW(61)&ChrW(54)&ChrW(36)&ChrW(-243)&ChrW(57)&ChrW(54)&ChrW(63)&ChrW(55)&ChrW(54)&ChrW(63)&ChrW(78)), titleShenfen)
TPL.Content = anxinMall.ReplaceStr(TPL.Content, anXinMallEnCo(ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(93)&ChrW(69)&ChrW(54)&ChrW(61)&ChrW(78)), tel)
TPL.Content = anxinMall.ReplaceStr(TPL.Content, anXinMallEnCo(ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(93)&ChrW(64)&ChrW(58)&ChrW(52)&ChrW(66)&ChrW(78)), oicq)
TPL.Content = anxinMall.ReplaceStr(TPL.Content, anXinMallEnCo(ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(93)&ChrW(53)&ChrW(75)&ChrW(78)), dz)
if thumb<>"" then
TPL.Content = anxinMall.ReplaceStr(TPL.Content, anXinMallEnCo(ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(93)&ChrW(69)&ChrW(57)&ChrW(70)&ChrW(62)&ChrW(51)&ChrW(78)), thumb)
else
TPL.Content = anxinMall.ReplaceStr(TPL.Content, anXinMallEnCo(ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(93)&ChrW(69)&ChrW(57)&ChrW(70)&ChrW(62)&ChrW(51)&ChrW(78)), anXinMallEnCo(ChrW(94)&ChrW(69)&ChrW(65)&ChrW(61)&ChrW(94)&ChrW(58)&ChrW(62)&ChrW(50)&ChrW(56)&ChrW(54)&ChrW(68)&ChrW(94)&ChrW(54)&ChrW(62)&ChrW(65)&ChrW(69)&ChrW(74)&ChrW(51)&ChrW(64)&ChrW(64)&ChrW(60)&ChrW(93)&ChrW(59)&ChrW(65)&ChrW(56)))
end if
TPL.Content = anxinMall.ReplaceStr(TPL.Content, anXinMallEnCo(ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(93)&ChrW(65)&ChrW(67)&ChrW(64)&ChrW(53)&ChrW(48)&ChrW(65)&ChrW(58)&ChrW(52)&ChrW(48)&ChrW(61)&ChrW(58)&ChrW(68)&ChrW(69)&ChrW(78)), prod_pic_list)
Call TPL.Parser("")
ProdView = TPL.Content
Set TPL = nothing
end function
function GonggaoView(byval id)
dim i
dim j
dim detailarray
dim fieldarray
dim picturearray
dim userarray
detailarray = anxinMall.sqlarray(anXinMallEnCo(ChrW(68)&ChrW(54)&ChrW(61)&ChrW(54)&ChrW(52)&ChrW(69)&ChrW(32)&ChrW(44)&ChrW(69)&ChrW(64)&ChrW(65)&ChrW(32)&ChrW(44)&ChrW(96)&ChrW(32)&ChrW(44)&ChrW(44)&ChrW(63)&ChrW(54)&ChrW(72)&ChrW(68)&ChrW(58)&ChrW(53)&ChrW(46)&ChrW(91)&ChrW(44)&ChrW(63)&ChrW(54)&ChrW(72)&ChrW(68)&ChrW(63)&ChrW(50)&ChrW(62)&ChrW(54)&ChrW(46)&ChrW(91)&ChrW(44)&ChrW(63)&ChrW(54)&ChrW(72)&ChrW(68)&ChrW(52)&ChrW(64)&ChrW(63)&ChrW(69)&ChrW(54)&ChrW(63)&ChrW(69)&ChrW(46)&ChrW(91)&ChrW(44)&ChrW(50)&ChrW(53)&ChrW(53)&ChrW(53)&ChrW(50)&ChrW(69)&ChrW(54)&ChrW(46)&ChrW(91)&ChrW(44)&ChrW(71)&ChrW(58)&ChrW(54)&ChrW(72)&ChrW(52)&ChrW(64)&ChrW(70)&ChrW(63)&ChrW(69)&ChrW(46)&ChrW(32)&ChrW(44)&ChrW(55)&ChrW(67)&ChrW(64)&ChrW(62)&ChrW(32)&ChrW(44)&ChrW(44)&ChrW(62)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(48)&ChrW(63)&ChrW(54)&ChrW(72)&ChrW(68)&ChrW(97)&ChrW(46)&ChrW(32)&ChrW(44)&ChrW(72)&ChrW(57)&ChrW(54)&ChrW(67)&ChrW(54)&ChrW(32)&ChrW(44)&ChrW(44)&ChrW(63)&ChrW(54)&ChrW(72)&ChrW(68)&ChrW(58)&ChrW(53)&ChrW(46)&ChrW(108))&ID)
if not anxinMall.issqlarray(detailarray) then
GonggaoView = nofound()
response.End()
end if
dim newsid : newsid = detailarray(0,0)
dim newsname : newsname = detailarray(1,0)
dim newscontent : newscontent = detailarray(2,0)
dim adddate : adddate = detailarray(3,0)
dim viewcount : viewcount = detailarray(4,0)
dim showtime : showtime = year(adddate)&anXinMallEnCo(ChrW(24175)&ChrW(64))&month(adddate)&anXinMallEnCo(ChrW(26371)&ChrW(64))&day(adddate)&anXinMallEnCo(ChrW(26080)&ChrW(64))
dim TPL
set TPL = New anxinMall_Cls_Template
call TPL.Load(cfg_templatedir & anXinMallEnCo(ChrW(94)&ChrW(63)&ChrW(54)&ChrW(72)&ChrW(68)&ChrW(97)&ChrW(93)&ChrW(69)&ChrW(65)&ChrW(61)))
TPL.Content = anxinMall.ReplaceStr(TPL.Content, anXinMallEnCo(ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(93)&ChrW(63)&ChrW(54)&ChrW(72)&ChrW(68)&ChrW(58)&ChrW(53)&ChrW(78)), newsid)
TPL.Content = anxinMall.ReplaceStr(TPL.Content, anXinMallEnCo(ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(93)&ChrW(63)&ChrW(54)&ChrW(72)&ChrW(68)&ChrW(63)&ChrW(50)&ChrW(62)&ChrW(54)&ChrW(78)), newsname)
TPL.Content = anxinMall.ReplaceStr(TPL.Content, anXinMallEnCo(ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(93)&ChrW(68)&ChrW(57)&ChrW(64)&ChrW(72)&ChrW(69)&ChrW(58)&ChrW(62)&ChrW(54)&ChrW(78)), showtime)
TPL.Content = anxinMall.ReplaceStr(TPL.Content, anXinMallEnCo(ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(93)&ChrW(63)&ChrW(54)&ChrW(72)&ChrW(68)&ChrW(52)&ChrW(64)&ChrW(63)&ChrW(69)&ChrW(54)&ChrW(63)&ChrW(69)&ChrW(78)), newscontent)
TPL.Content = anxinMall.ReplaceStr(TPL.Content, anXinMallEnCo(ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(93)&ChrW(71)&ChrW(58)&ChrW(54)&ChrW(72)&ChrW(52)&ChrW(64)&ChrW(70)&ChrW(63)&ChrW(69)&ChrW(78)), viewcount)
Call TPL.Parser("")
GonggaoView = TPL.Content
Set TPL = nothing
end function
function NewsView(byval id)
dim i
dim j
dim detailarray
dim fieldarray
dim picturearray
dim userarray
detailarray = anxinMall.sqlarray(anXinMallEnCo(ChrW(68)&ChrW(54)&ChrW(61)&ChrW(54)&ChrW(52)&ChrW(69)&ChrW(32)&ChrW(44)&ChrW(69)&ChrW(64)&ChrW(65)&ChrW(32)&ChrW(44)&ChrW(96)&ChrW(32)&ChrW(44)&ChrW(44)&ChrW(63)&ChrW(54)&ChrW(72)&ChrW(68)&ChrW(58)&ChrW(53)&ChrW(46)&ChrW(91)&ChrW(44)&ChrW(63)&ChrW(54)&ChrW(72)&ChrW(68)&ChrW(69)&ChrW(58)&ChrW(69)&ChrW(61)&ChrW(54)&ChrW(46)&ChrW(91)&ChrW(44)&ChrW(63)&ChrW(54)&ChrW(72)&ChrW(68)&ChrW(52)&ChrW(64)&ChrW(63)&ChrW(69)&ChrW(54)&ChrW(63)&ChrW(69)&ChrW(46)&ChrW(91)&ChrW(44)&ChrW(53)&ChrW(54)&ChrW(68)&ChrW(52)&ChrW(67)&ChrW(58)&ChrW(65)&ChrW(69)&ChrW(58)&ChrW(64)&ChrW(63)&ChrW(46)&ChrW(91)&ChrW(44)&ChrW(50)&ChrW(53)&ChrW(53)&ChrW(69)&ChrW(58)&ChrW(62)&ChrW(54)&ChrW(46)&ChrW(91)&ChrW(44)&ChrW(67)&ChrW(54)&ChrW(55)&ChrW(67)&ChrW(54)&ChrW(68)&ChrW(57)&ChrW(69)&ChrW(58)&ChrW(62)&ChrW(54)&ChrW(46)&ChrW(91)&ChrW(44)&ChrW(57)&ChrW(58)&ChrW(69)&ChrW(68)&ChrW(46)&ChrW(91)&ChrW(44)&ChrW(69)&ChrW(58)&ChrW(69)&ChrW(61)&ChrW(54)&ChrW(52)&ChrW(64)&ChrW(61)&ChrW(64)&ChrW(67)&ChrW(46)&ChrW(91)&ChrW(44)&ChrW(69)&ChrW(58)&ChrW(69)&ChrW(61)&ChrW(54)&ChrW(70)&ChrW(67)&ChrW(61)&ChrW(46)&ChrW(91)&ChrW(44)&ChrW(50)&ChrW(70)&ChrW(69)&ChrW(57)&ChrW(64)&ChrW(67)&ChrW(46)&ChrW(91)&ChrW(44)&ChrW(52)&ChrW(64)&ChrW(62)&ChrW(54)&ChrW(55)&ChrW(67)&ChrW(64)&ChrW(62)&ChrW(46)&ChrW(91)&ChrW(44)&ChrW(52)&ChrW(61)&ChrW(50)&ChrW(68)&ChrW(68)&ChrW(58)&ChrW(53)&ChrW(46)&ChrW(32)&ChrW(44)&ChrW(55)&ChrW(67)&ChrW(64)&ChrW(62)&ChrW(32)&ChrW(44)&ChrW(44)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(48)&ChrW(63)&ChrW(54)&ChrW(72)&ChrW(68)&ChrW(46)&ChrW(32)&ChrW(44)&ChrW(72)&ChrW(57)&ChrW(54)&ChrW(67)&ChrW(54)&ChrW(32)&ChrW(44)&ChrW(44)&ChrW(63)&ChrW(54)&ChrW(72)&ChrW(68)&ChrW(58)&ChrW(53)&ChrW(46)&ChrW(108))&ID)
if not anxinMall.issqlarray(detailarray) then
NewsView = nofound()
response.End()
end if
dim newsid : newsid = detailarray(0,0)
dim newstitle : newstitle = detailarray(1,0)
dim newscontent : newscontent = detailarray(2,0)
dim description : description = detailarray(3,0)
dim addtime : addtime = detailarray(4,0)
dim refreshtime : refreshtime = detailarray(5,0)
dim hits : hits = detailarray(6,0)
dim titlecolor : titlecolor = detailarray(7,0)
dim titleurl : titleurl = detailarray(8,0)
dim author : author = detailarray(9,0)
dim comefrom : comefrom = detailarray(10,0)
dim classid : classid = detailarray(11,0)
dim newsclass
set rs=anxinMall.db(anXinMallEnCo(ChrW(68)&ChrW(54)&ChrW(61)&ChrW(54)&ChrW(52)&ChrW(69)&ChrW(32)&ChrW(44)&ChrW(89)&ChrW(32)&ChrW(44)&ChrW(55)&ChrW(67)&ChrW(64)&ChrW(62)&ChrW(32)&ChrW(44)&ChrW(44)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(48)&ChrW(63)&ChrW(54)&ChrW(72)&ChrW(68)&ChrW(52)&ChrW(50)&ChrW(69)&ChrW(46)&ChrW(32)&ChrW(44)&ChrW(72)&ChrW(57)&ChrW(54)&ChrW(67)&ChrW(54)&ChrW(32)&ChrW(44)&ChrW(58)&ChrW(53)&ChrW(108)) & classid,1)
newsclass = rs(anXinMallEnCo(ChrW(52)&ChrW(50)&ChrW(69)&ChrW(63)&ChrW(50)&ChrW(62)&ChrW(54)))
rs.close
set rs = nothing
dim showtime1 : showtime1 = year(addtime)&anXinMallEnCo(ChrW(24175)&ChrW(64))&month(addtime)&anXinMallEnCo(ChrW(26371)&ChrW(64))&day(addtime)&anXinMallEnCo(ChrW(26080)&ChrW(64))
dim showtime2 : showtime2 = year(refreshtime)&anXinMallEnCo(ChrW(24175)&ChrW(64))&month(refreshtime)&anXinMallEnCo(ChrW(26371)&ChrW(64))&day(refreshtime)&anXinMallEnCo(ChrW(26080)&ChrW(64))
dim titleurlword
if titleurl<>"" then
titleurlword = anXinMallEnCo(ChrW(107)&ChrW(50)&ChrW(32)&ChrW(44)&ChrW(57)&ChrW(67)&ChrW(54)&ChrW(55)&ChrW(108))&titleurl&anXinMallEnCo(ChrW(109)&ChrW(30451)&ChrW(64)&ChrW(20846)&ChrW(64)&ChrW(-27399)&ChrW(64)&ChrW(25504)&ChrW(64)&ChrW(107)&ChrW(94)&ChrW(50)&ChrW(109))
else
titleurlword = anXinMallEnCo(ChrW(32)&ChrW(44))
end if
dim rs_all,allclasslist
set rs_all = anxinMall.db(anXinMallEnCo(ChrW(68)&ChrW(54)&ChrW(61)&ChrW(54)&ChrW(52)&ChrW(69)&ChrW(32)&ChrW(44)&ChrW(58)&ChrW(53)&ChrW(91)&ChrW(52)&ChrW(50)&ChrW(69)&ChrW(63)&ChrW(50)&ChrW(62)&ChrW(54)&ChrW(32)&ChrW(44)&ChrW(55)&ChrW(67)&ChrW(64)&ChrW(62)&ChrW(32)&ChrW(44)&ChrW(44)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(48)&ChrW(63)&ChrW(54)&ChrW(72)&ChrW(68)&ChrW(52)&ChrW(50)&ChrW(69)&ChrW(46)&ChrW(32)&ChrW(44)&ChrW(64)&ChrW(67)&ChrW(53)&ChrW(54)&ChrW(67)&ChrW(32)&ChrW(44)&ChrW(51)&ChrW(74)&ChrW(32)&ChrW(44)&ChrW(58)&ChrW(53)&ChrW(32)&ChrW(44)&ChrW(50)&ChrW(68)&ChrW(52)),1)
do while not rs_all.eof
allclasslist = allclasslist & anXinMallEnCo(ChrW(107)&ChrW(61)&ChrW(58)&ChrW(109)&ChrW(107)&ChrW(50)&ChrW(32)&ChrW(44)&ChrW(57)&ChrW(67)&ChrW(54)&ChrW(55)&ChrW(108)&ChrW(86)&ChrW(94)&ChrW(58)&ChrW(63)&ChrW(55)&ChrW(64)&ChrW(94)&ChrW(61)&ChrW(58)&ChrW(68)&ChrW(69)&ChrW(93)&ChrW(50)&ChrW(68)&ChrW(65)&ChrW(110)&ChrW(58)&ChrW(53)&ChrW(108))&rs_all(anXinMallEnCo(ChrW(58)&ChrW(53)))&anXinMallEnCo(ChrW(86)&ChrW(32)&ChrW(44)&ChrW(69)&ChrW(50)&ChrW(67)&ChrW(56)&ChrW(54)&ChrW(69)&ChrW(108)&ChrW(86)&ChrW(48)&ChrW(51)&ChrW(61)&ChrW(50)&ChrW(63)&ChrW(60)&ChrW(86)&ChrW(109))&left(rs_all(anXinMallEnCo(ChrW(52)&ChrW(50)&ChrW(69)&ChrW(63)&ChrW(50)&ChrW(62)&ChrW(54))),4)&anXinMallEnCo(ChrW(107)&ChrW(94)&ChrW(50)&ChrW(109)&ChrW(107)&ChrW(94)&ChrW(61)&ChrW(58)&ChrW(109))
rs_all.movenext
loop
rs_all.close
set rs_all = nothing
dim rs_pic,allpiclist
set rs_pic = anxinMall.db(anXinMallEnCo(ChrW(68)&ChrW(54)&ChrW(61)&ChrW(54)&ChrW(52)&ChrW(69)&ChrW(32)&ChrW(44)&ChrW(69)&ChrW(64)&ChrW(65)&ChrW(32)&ChrW(44)&ChrW(99)&ChrW(32)&ChrW(44)&ChrW(63)&ChrW(54)&ChrW(72)&ChrW(68)&ChrW(58)&ChrW(53)&ChrW(91)&ChrW(63)&ChrW(54)&ChrW(72)&ChrW(68)&ChrW(69)&ChrW(58)&ChrW(69)&ChrW(61)&ChrW(54)&ChrW(91)&ChrW(65)&ChrW(58)&ChrW(52)&ChrW(55)&ChrW(58)&ChrW(61)&ChrW(54)&ChrW(32)&ChrW(44)&ChrW(55)&ChrW(67)&ChrW(64)&ChrW(62)&ChrW(32)&ChrW(44)&ChrW(44)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(48)&ChrW(63)&ChrW(54)&ChrW(72)&ChrW(68)&ChrW(46)&ChrW(32)&ChrW(44)&ChrW(72)&ChrW(57)&ChrW(54)&ChrW(67)&ChrW(54)&ChrW(32)&ChrW(44)&ChrW(65)&ChrW(58)&ChrW(52)&ChrW(55)&ChrW(58)&ChrW(61)&ChrW(54)&ChrW(107)&ChrW(109)&ChrW(86)&ChrW(86)&ChrW(32)&ChrW(44)&ChrW(64)&ChrW(67)&ChrW(53)&ChrW(54)&ChrW(67)&ChrW(32)&ChrW(44)&ChrW(51)&ChrW(74)&ChrW(32)&ChrW(44)&ChrW(63)&ChrW(54)&ChrW(72)&ChrW(68)&ChrW(58)&ChrW(53)&ChrW(32)&ChrW(44)&ChrW(53)&ChrW(54)&ChrW(68)&ChrW(52)),1)
do while not rs_pic.eof
allpiclist = allpiclist & anXinMallEnCo(ChrW(107)&ChrW(61)&ChrW(58)&ChrW(109)&ChrW(107)&ChrW(50)&ChrW(32)&ChrW(44)&ChrW(69)&ChrW(50)&ChrW(67)&ChrW(56)&ChrW(54)&ChrW(69)&ChrW(108)&ChrW(86)&ChrW(48)&ChrW(51)&ChrW(61)&ChrW(50)&ChrW(63)&ChrW(60)&ChrW(86)&ChrW(32)&ChrW(44)&ChrW(57)&ChrW(67)&ChrW(54)&ChrW(55)&ChrW(108)&ChrW(86)&ChrW(94)&ChrW(63)&ChrW(54)&ChrW(72)&ChrW(68)&ChrW(94))&rs_pic(anXinMallEnCo(ChrW(63)&ChrW(54)&ChrW(72)&ChrW(68)&ChrW(58)&ChrW(53)))&anXinMallEnCo(ChrW(93)&ChrW(57)&ChrW(69)&ChrW(62)&ChrW(61)&ChrW(86)&ChrW(109)&ChrW(107)&ChrW(58)&ChrW(62)&ChrW(56)&ChrW(32)&ChrW(44)&ChrW(68)&ChrW(67)&ChrW(52)&ChrW(108)&ChrW(86))&rs_pic(anXinMallEnCo(ChrW(65)&ChrW(58)&ChrW(52)&ChrW(55)&ChrW(58)&ChrW(61)&ChrW(54)))&anXinMallEnCo(ChrW(86)&ChrW(32)&ChrW(44)&ChrW(72)&ChrW(58)&ChrW(53)&ChrW(69)&ChrW(57)&ChrW(108)&ChrW(86)&ChrW(96)&ChrW(97)&ChrW(95)&ChrW(86)&ChrW(32)&ChrW(44)&ChrW(57)&ChrW(54)&ChrW(58)&ChrW(56)&ChrW(57)&ChrW(69)&ChrW(108)&ChrW(86)&ChrW(104)&ChrW(95)&ChrW(86)&ChrW(32)&ChrW(44)&ChrW(50)&ChrW(61)&ChrW(69)&ChrW(108)&ChrW(86)&ChrW(86)&ChrW(32)&ChrW(44)&ChrW(94)&ChrW(109)&ChrW(107)&ChrW(68)&ChrW(65)&ChrW(50)&ChrW(63)&ChrW(109))&left(rs_pic(anXinMallEnCo(ChrW(63)&ChrW(54)&ChrW(72)&ChrW(68)&ChrW(69)&ChrW(58)&ChrW(69)&ChrW(61)&ChrW(54))),8)&anXinMallEnCo(ChrW(107)&ChrW(94)&ChrW(68)&ChrW(65)&ChrW(50)&ChrW(63)&ChrW(109)&ChrW(107)&ChrW(94)&ChrW(50)&ChrW(109)&ChrW(107)&ChrW(94)&ChrW(61)&ChrW(58)&ChrW(109))
rs_pic.movenext
loop
rs_pic.close
set rs_pic = nothing
dim rs_hit,tophits
set rs_hit = anxinMall.db(anXinMallEnCo(ChrW(68)&ChrW(54)&ChrW(61)&ChrW(54)&ChrW(52)&ChrW(69)&ChrW(32)&ChrW(44)&ChrW(69)&ChrW(64)&ChrW(65)&ChrW(32)&ChrW(44)&ChrW(101)&ChrW(32)&ChrW(44)&ChrW(63)&ChrW(54)&ChrW(72)&ChrW(68)&ChrW(58)&ChrW(53)&ChrW(91)&ChrW(63)&ChrW(54)&ChrW(72)&ChrW(68)&ChrW(69)&ChrW(58)&ChrW(69)&ChrW(61)&ChrW(54)&ChrW(91)&ChrW(65)&ChrW(58)&ChrW(52)&ChrW(55)&ChrW(58)&ChrW(61)&ChrW(54)&ChrW(91)&ChrW(57)&ChrW(58)&ChrW(69)&ChrW(68)&ChrW(32)&ChrW(44)&ChrW(55)&ChrW(67)&ChrW(64)&ChrW(62)&ChrW(32)&ChrW(44)&ChrW(44)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(48)&ChrW(63)&ChrW(54)&ChrW(72)&ChrW(68)&ChrW(46)&ChrW(32)&ChrW(44)&ChrW(72)&ChrW(57)&ChrW(54)&ChrW(67)&ChrW(54)&ChrW(32)&ChrW(44)&ChrW(65)&ChrW(58)&ChrW(52)&ChrW(55)&ChrW(58)&ChrW(61)&ChrW(54)&ChrW(107)&ChrW(109)&ChrW(86)&ChrW(86)&ChrW(32)&ChrW(44)&ChrW(64)&ChrW(67)&ChrW(53)&ChrW(54)&ChrW(67)&ChrW(32)&ChrW(44)&ChrW(51)&ChrW(74)&ChrW(32)&ChrW(44)&ChrW(57)&ChrW(58)&ChrW(69)&ChrW(68)&ChrW(32)&ChrW(44)&ChrW(53)&ChrW(54)&ChrW(68)&ChrW(52)),1)
do while not rs_hit.eof
tophits = tophits & anXinMallEnCo(ChrW(107)&ChrW(53)&ChrW(53)&ChrW(109)&ChrW(107)&ChrW(54)&ChrW(62)&ChrW(109))&rs_hit(anXinMallEnCo(ChrW(57)&ChrW(58)&ChrW(69)&ChrW(68)))&anXinMallEnCo(ChrW(107)&ChrW(94)&ChrW(54)&ChrW(62)&ChrW(109)&ChrW(107)&ChrW(50)&ChrW(32)&ChrW(44)&ChrW(69)&ChrW(50)&ChrW(67)&ChrW(56)&ChrW(54)&ChrW(69)&ChrW(108)&ChrW(86)&ChrW(48)&ChrW(51)&ChrW(61)&ChrW(50)&ChrW(63)&ChrW(60)&ChrW(86)&ChrW(32)&ChrW(44)&ChrW(57)&ChrW(67)&ChrW(54)&ChrW(55)&ChrW(108)&ChrW(86)&ChrW(94)&ChrW(63)&ChrW(54)&ChrW(72)&ChrW(68)&ChrW(94))&rs_hit(anXinMallEnCo(ChrW(63)&ChrW(54)&ChrW(72)&ChrW(68)&ChrW(58)&ChrW(53)))&anXinMallEnCo(ChrW(93)&ChrW(57)&ChrW(69)&ChrW(62)&ChrW(61)&ChrW(86)&ChrW(32)&ChrW(44)&ChrW(69)&ChrW(58)&ChrW(69)&ChrW(61)&ChrW(54)&ChrW(108)&ChrW(86))&rs_hit(anXinMallEnCo(ChrW(63)&ChrW(54)&ChrW(72)&ChrW(68)&ChrW(69)&ChrW(58)&ChrW(69)&ChrW(61)&ChrW(54)))&anXinMallEnCo(ChrW(86)&ChrW(109)&ChrW(32)&ChrW(44))&left(rs_hit(anXinMallEnCo(ChrW(63)&ChrW(54)&ChrW(72)&ChrW(68)&ChrW(69)&ChrW(58)&ChrW(69)&ChrW(61)&ChrW(54))),20)&anXinMallEnCo(ChrW(107)&ChrW(94)&ChrW(50)&ChrW(109)&ChrW(107)&ChrW(94)&ChrW(53)&ChrW(53)&ChrW(109))
rs_hit.movenext
loop
rs_hit.close
set rs_hit = nothing
dim TPL
set TPL = New anxinMall_Cls_Template
call TPL.Load(cfg_templatedir & anXinMallEnCo(ChrW(94)&ChrW(63)&ChrW(54)&ChrW(72)&ChrW(68)&ChrW(48)&ChrW(53)&ChrW(54)&ChrW(69)&ChrW(50)&ChrW(58)&ChrW(61)&ChrW(68)&ChrW(93)&ChrW(69)&ChrW(65)&ChrW(61)))
TPL.Content = anxinMall.ReplaceStr(TPL.Content, anXinMallEnCo(ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(93)&ChrW(63)&ChrW(54)&ChrW(72)&ChrW(68)&ChrW(58)&ChrW(53)&ChrW(78)), newsid)
TPL.Content = anxinMall.ReplaceStr(TPL.Content, anXinMallEnCo(ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(93)&ChrW(52)&ChrW(61)&ChrW(50)&ChrW(68)&ChrW(68)&ChrW(58)&ChrW(53)&ChrW(78)), classid)
TPL.Content = anxinMall.ReplaceStr(TPL.Content, anXinMallEnCo(ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(93)&ChrW(63)&ChrW(54)&ChrW(72)&ChrW(68)&ChrW(52)&ChrW(61)&ChrW(50)&ChrW(68)&ChrW(68)&ChrW(78)), newsclass)
TPL.Content = anxinMall.ReplaceStr(TPL.Content, anXinMallEnCo(ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(93)&ChrW(63)&ChrW(54)&ChrW(72)&ChrW(68)&ChrW(69)&ChrW(58)&ChrW(69)&ChrW(61)&ChrW(54)&ChrW(78)), newstitle)
TPL.Content = anxinMall.ReplaceStr(TPL.Content, anXinMallEnCo(ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(93)&ChrW(63)&ChrW(54)&ChrW(72)&ChrW(68)&ChrW(52)&ChrW(64)&ChrW(63)&ChrW(69)&ChrW(54)&ChrW(63)&ChrW(69)&ChrW(78)), newscontent)
TPL.Content = anxinMall.ReplaceStr(TPL.Content, anXinMallEnCo(ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(93)&ChrW(53)&ChrW(54)&ChrW(68)&ChrW(52)&ChrW(67)&ChrW(58)&ChrW(65)&ChrW(69)&ChrW(58)&ChrW(64)&ChrW(63)&ChrW(78)), anxinMall.iif(description<>"",description,anXinMallEnCo(ChrW(32)&ChrW(44))))
TPL.Content = anxinMall.ReplaceStr(TPL.Content, anXinMallEnCo(ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(93)&ChrW(50)&ChrW(53)&ChrW(53)&ChrW(69)&ChrW(58)&ChrW(62)&ChrW(54)&ChrW(78)), showtime1)
TPL.Content = anxinMall.ReplaceStr(TPL.Content, anXinMallEnCo(ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(93)&ChrW(67)&ChrW(54)&ChrW(55)&ChrW(67)&ChrW(54)&ChrW(68)&ChrW(57)&ChrW(69)&ChrW(58)&ChrW(62)&ChrW(54)&ChrW(78)), showtime2)
TPL.Content = anxinMall.ReplaceStr(TPL.Content, anXinMallEnCo(ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(93)&ChrW(57)&ChrW(58)&ChrW(69)&ChrW(68)&ChrW(78)), anxinMall.iif(hits<>"",hits,"1"))
TPL.Content = anxinMall.ReplaceStr(TPL.Content, anXinMallEnCo(ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(93)&ChrW(69)&ChrW(58)&ChrW(69)&ChrW(61)&ChrW(54)&ChrW(52)&ChrW(64)&ChrW(61)&ChrW(64)&ChrW(67)&ChrW(78)), anxinMall.iif(titlecolor<>"",titlecolor,anXinMallEnCo(ChrW(32)&ChrW(44))))
TPL.Content = anxinMall.ReplaceStr(TPL.Content, anXinMallEnCo(ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(93)&ChrW(69)&ChrW(58)&ChrW(69)&ChrW(61)&ChrW(54)&ChrW(70)&ChrW(67)&ChrW(61)&ChrW(78)), titleurlword)
TPL.Content = anxinMall.ReplaceStr(TPL.Content, anXinMallEnCo(ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(93)&ChrW(50)&ChrW(70)&ChrW(69)&ChrW(57)&ChrW(64)&ChrW(67)&ChrW(78)), anxinMall.iif(author<>"",author,anXinMallEnCo(ChrW(26407)&ChrW(64)&ChrW(31444)&ChrW(64))))
TPL.Content = anxinMall.ReplaceStr(TPL.Content, anXinMallEnCo(ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(93)&ChrW(52)&ChrW(64)&ChrW(62)&ChrW(54)&ChrW(55)&ChrW(67)&ChrW(64)&ChrW(62)&ChrW(78)), anxinMall.iif(comefrom<>"",comefrom,anXinMallEnCo(ChrW(26407)&ChrW(64)&ChrW(31444)&ChrW(64))))
TPL.Content = anxinMall.ReplaceStr(TPL.Content, anXinMallEnCo(ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(93)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(52)&ChrW(61)&ChrW(50)&ChrW(68)&ChrW(68)&ChrW(61)&ChrW(58)&ChrW(68)&ChrW(69)&ChrW(78)),allclasslist)
TPL.Content = anxinMall.ReplaceStr(TPL.Content, anXinMallEnCo(ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(93)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(65)&ChrW(58)&ChrW(52)&ChrW(61)&ChrW(58)&ChrW(68)&ChrW(69)&ChrW(78)),allpiclist)
TPL.Content = anxinMall.ReplaceStr(TPL.Content, anXinMallEnCo(ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(93)&ChrW(69)&ChrW(64)&ChrW(65)&ChrW(57)&ChrW(58)&ChrW(69)&ChrW(68)&ChrW(78)),tophits)
Call TPL.Parser("")
NewsView = TPL.Content
Set TPL = nothing
end function
function ShopIndexView(byval userid)
set rs=anxinMall.db(anXinMallEnCo(ChrW(68)&ChrW(54)&ChrW(61)&ChrW(54)&ChrW(52)&ChrW(69)&ChrW(32)&ChrW(44)&ChrW(89)&ChrW(32)&ChrW(44)&ChrW(55)&ChrW(67)&ChrW(64)&ChrW(62)&ChrW(32)&ChrW(44)&ChrW(44)&ChrW(62)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(48)&ChrW(68)&ChrW(57)&ChrW(59)&ChrW(58)&ChrW(50)&ChrW(46)&ChrW(32)&ChrW(44)&ChrW(72)&ChrW(57)&ChrW(54)&ChrW(67)&ChrW(54)&ChrW(32)&ChrW(44)&ChrW(70)&ChrW(68)&ChrW(54)&ChrW(67)&ChrW(58)&ChrW(53)&ChrW(108))&userid,1)
dim name : name = rs(anXinMallEnCo(ChrW(63)&ChrW(50)&ChrW(62)&ChrW(54)))
dim username : username =rs(anXinMallEnCo(ChrW(70)&ChrW(68)&ChrW(54)&ChrW(67)&ChrW(63)&ChrW(50)&ChrW(62)&ChrW(54)))
dim name2 : name2 = rs(anXinMallEnCo(ChrW(63)&ChrW(50)&ChrW(62)&ChrW(54)&ChrW(97)))
dim useremail : useremail = rs(anXinMallEnCo(ChrW(70)&ChrW(68)&ChrW(54)&ChrW(67)&ChrW(54)&ChrW(62)&ChrW(50)&ChrW(58)&ChrW(61)))
dim dz : dz = rs(anXinMallEnCo(ChrW(53)&ChrW(75)))
dim homepage : homepage = rs(anXinMallEnCo(ChrW(57)&ChrW(64)&ChrW(62)&ChrW(54)&ChrW(65)&ChrW(50)&ChrW(56)&ChrW(54)))
dim tel : tel = rs(anXinMallEnCo(ChrW(69)&ChrW(54)&ChrW(61)))
dim pc : pc = rs(anXinMallEnCo(ChrW(65)&ChrW(52)))
dim oicq : oicq = rs(anXinMallEnCo(ChrW(64)&ChrW(58)&ChrW(52)&ChrW(66)))
dim taobaowangwang : taobaowangwang = rs(anXinMallEnCo(ChrW(69)&ChrW(50)&ChrW(64)&ChrW(51)&ChrW(50)&ChrW(64)&ChrW(72)&ChrW(50)&ChrW(63)&ChrW(56)&ChrW(72)&ChrW(50)&ChrW(63)&ChrW(56)))
dim zifubao : zifubao = rs(anXinMallEnCo(ChrW(75)&ChrW(58)&ChrW(55)&ChrW(70)&ChrW(51)&ChrW(50)&ChrW(64)))
dim addDate : addDate = FORMATDATETIME(rs(anXinMallEnCo(ChrW(50)&ChrW(53)&ChrW(53)&ChrW(53)&ChrW(50)&ChrW(69)&ChrW(54))),vbShortDate)
dim lastlogin : lastlogin = FORMATDATETIME(rs(anXinMallEnCo(ChrW(61)&ChrW(50)&ChrW(68)&ChrW(69)&ChrW(61)&ChrW(64)&ChrW(56)&ChrW(58)&ChrW(63))),vbShortDate)
dim rz_shenfenz : rz_shenfenz =rs(anXinMallEnCo(ChrW(67)&ChrW(75)&ChrW(48)&ChrW(68)&ChrW(57)&ChrW(54)&ChrW(63)&ChrW(55)&ChrW(54)&ChrW(63)&ChrW(75)))
dim lx : lx = rs(anXinMallEnCo(ChrW(61)&ChrW(73)))
dim tj : tj = rs(anXinMallEnCo(ChrW(69)&ChrW(59)))
dim logo : logo = rs(anXinMallEnCo(ChrW(61)&ChrW(64)&ChrW(56)&ChrW(64)))
dim logo2 : logo2 = rs(anXinMallEnCo(ChrW(61)&ChrW(64)&ChrW(56)&ChrW(64)&ChrW(97)))
dim logoda : logoda = rs(anXinMallEnCo(ChrW(61)&ChrW(64)&ChrW(56)&ChrW(64)&ChrW(53)&ChrW(50)))
dim content : content = rs(anXinMallEnCo(ChrW(52)&ChrW(64)&ChrW(63)&ChrW(69)&ChrW(54)&ChrW(63)&ChrW(69)))
dim color : color = rs(anXinMallEnCo(ChrW(52)&ChrW(64)&ChrW(61)&ChrW(64)&ChrW(67)))
dim classid : classid = rs(anXinMallEnCo(ChrW(52)&ChrW(61)&ChrW(50)&ChrW(68)&ChrW(68)&ChrW(58)&ChrW(53)))
dim logins : logins = rs(anXinMallEnCo(ChrW(61)&ChrW(64)&ChrW(56)&ChrW(58)&ChrW(63)&ChrW(68)))
rs.close
set rs=nothing
dim className
set rs=anxinMall.db(anXinMallEnCo(ChrW(68)&ChrW(54)&ChrW(61)&ChrW(54)&ChrW(52)&ChrW(69)&ChrW(32)&ChrW(44)&ChrW(89)&ChrW(32)&ChrW(44)&ChrW(55)&ChrW(67)&ChrW(64)&ChrW(62)&ChrW(32)&ChrW(44)&ChrW(44)&ChrW(62)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(48)&ChrW(52)&ChrW(50)&ChrW(69)&ChrW(46)&ChrW(32)&ChrW(44)&ChrW(72)&ChrW(57)&ChrW(54)&ChrW(67)&ChrW(54)&ChrW(32)&ChrW(44)&ChrW(58)&ChrW(53)&ChrW(108)) & classid,1)
className = left(rs(anXinMallEnCo(ChrW(52)&ChrW(50)&ChrW(69)&ChrW(63)&ChrW(50)&ChrW(62)&ChrW(54))),10)
rs.close
set rs = nothing
dim viewTjPic
select case tj
case 1:viewTjPic = anXinMallEnCo(ChrW(107)&ChrW(58)&ChrW(62)&ChrW(56)&ChrW(32)&ChrW(44)&ChrW(68)&ChrW(67)&ChrW(52)&ChrW(108)&ChrW(94)&ChrW(69)&ChrW(65)&ChrW(61)&ChrW(94)&ChrW(58)&ChrW(62)&ChrW(50)&ChrW(56)&ChrW(54)&ChrW(68)&ChrW(94)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(96)&ChrW(93)&ChrW(56)&ChrW(58)&ChrW(55)&ChrW(109))
case 2:viewTjPic = anXinMallEnCo(ChrW(107)&ChrW(58)&ChrW(62)&ChrW(56)&ChrW(32)&ChrW(44)&ChrW(68)&ChrW(67)&ChrW(52)&ChrW(108)&ChrW(94)&ChrW(69)&ChrW(65)&ChrW(61)&ChrW(94)&ChrW(58)&ChrW(62)&ChrW(50)&ChrW(56)&ChrW(54)&ChrW(68)&ChrW(94)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(97)&ChrW(93)&ChrW(56)&ChrW(58)&ChrW(55)&ChrW(109))
case 3:viewTjPic = anXinMallEnCo(ChrW(107)&ChrW(58)&ChrW(62)&ChrW(56)&ChrW(32)&ChrW(44)&ChrW(68)&ChrW(67)&ChrW(52)&ChrW(108)&ChrW(94)&ChrW(69)&ChrW(65)&ChrW(61)&ChrW(94)&ChrW(58)&ChrW(62)&ChrW(50)&ChrW(56)&ChrW(54)&ChrW(68)&ChrW(94)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(98)&ChrW(93)&ChrW(56)&ChrW(58)&ChrW(55)&ChrW(109))
case 4:viewTjPic = anXinMallEnCo(ChrW(107)&ChrW(58)&ChrW(62)&ChrW(56)&ChrW(32)&ChrW(44)&ChrW(68)&ChrW(67)&ChrW(52)&ChrW(108)&ChrW(94)&ChrW(69)&ChrW(65)&ChrW(61)&ChrW(94)&ChrW(58)&ChrW(62)&ChrW(50)&ChrW(56)&ChrW(54)&ChrW(68)&ChrW(94)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(99)&ChrW(93)&ChrW(56)&ChrW(58)&ChrW(55)&ChrW(109))
case 5:viewTjPic = anXinMallEnCo(ChrW(107)&ChrW(58)&ChrW(62)&ChrW(56)&ChrW(32)&ChrW(44)&ChrW(68)&ChrW(67)&ChrW(52)&ChrW(108)&ChrW(94)&ChrW(69)&ChrW(65)&ChrW(61)&ChrW(94)&ChrW(58)&ChrW(62)&ChrW(50)&ChrW(56)&ChrW(54)&ChrW(68)&ChrW(94)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(100)&ChrW(93)&ChrW(56)&ChrW(58)&ChrW(55)&ChrW(109))
end select
dim mymap1
If homepage<>"" Then:mymap1=homepage:Else:mymap1="11880297,3211925":End if
dim lxword
Select case lx
Case "0":lxword = anXinMallEnCo(ChrW(107)&ChrW(51)&ChrW(109)&ChrW(20005)&ChrW(64)&ChrW(20149)&ChrW(64)&ChrW(32588)&ChrW(64)&ChrW(24210)&ChrW(64)&ChrW(107)&ChrW(94)&ChrW(51)&ChrW(109))
Case "1":lxword = anXinMallEnCo(ChrW(107)&ChrW(55)&ChrW(64)&ChrW(63)&ChrW(69)&ChrW(32)&ChrW(44)&ChrW(52)&ChrW(64)&ChrW(61)&ChrW(64)&ChrW(67)&ChrW(108)&ChrW(56)&ChrW(67)&ChrW(54)&ChrW(54)&ChrW(63)&ChrW(109)&ChrW(107)&ChrW(51)&ChrW(109)&ChrW(23449)&ChrW(64)&ChrW(20302)&ChrW(64)&ChrW(32588)&ChrW(64)&ChrW(24210)&ChrW(64)&ChrW(107)&ChrW(94)&ChrW(51)&ChrW(109)&ChrW(107)&ChrW(94)&ChrW(55)&ChrW(64)&ChrW(63)&ChrW(69)&ChrW(109))
Case "2":lxword = anXinMallEnCo(ChrW(107)&ChrW(55)&ChrW(64)&ChrW(63)&ChrW(69)&ChrW(32)&ChrW(44)&ChrW(52)&ChrW(64)&ChrW(61)&ChrW(64)&ChrW(67)&ChrW(108)&ChrW(67)&ChrW(54)&ChrW(53)&ChrW(109)&ChrW(107)&ChrW(51)&ChrW(109)&ChrW(39)&ChrW(58)&ChrW(65)&ChrW(32588)&ChrW(64)&ChrW(24210)&ChrW(64)&ChrW(107)&ChrW(94)&ChrW(51)&ChrW(109)&ChrW(107)&ChrW(94)&ChrW(55)&ChrW(64)&ChrW(63)&ChrW(69)&ChrW(109))
End select
dim titleShenfen
if rz_shenfenz<>"" then:titleshenfen = anXinMallEnCo(ChrW(24045)&ChrW(64)&ChrW(19973)&ChrW(64)&ChrW(20251)&ChrW(64)&ChrW(-29018)&ChrW(64)&ChrW(20216)&ChrW(64)&ChrW(-29764)&ChrW(64)&ChrW(-29793)&ChrW(64)&ChrW(-29764)&ChrW(64)):else:titleshenfen = anXinMallEnCo(ChrW(26405)&ChrW(64)&ChrW(19973)&ChrW(64)&ChrW(20251)&ChrW(64)&ChrW(-29018)&ChrW(64)&ChrW(20216)&ChrW(64)&ChrW(-29764)&ChrW(64)&ChrW(-29793)&ChrW(64)&ChrW(-29764)&ChrW(64)):end if
dim titleAlipay
if zifubao<>"" then:titleAlipay = anXinMallEnCo(ChrW(-29728)&ChrW(64)&ChrW(21825)&ChrW(64)&ChrW(-27403)&ChrW(64)&ChrW(25898)&ChrW(64)&ChrW(25340)&ChrW(64)&ChrW(25898)&ChrW(64)&ChrW(20179)&ChrW(64)&ChrW(23448)&ChrW(64)&ChrW(20127)&ChrW(64)&ChrW(26126)&ChrW(64)):else:titleAlipay = anXinMallEnCo(ChrW(19976)&ChrW(64)&ChrW(25898)&ChrW(64)&ChrW(25340)&ChrW(64)&ChrW(25898)&ChrW(64)&ChrW(20179)&ChrW(64)&ChrW(23448)&ChrW(64)&ChrW(20127)&ChrW(64)&ChrW(26126)&ChrW(64)):end if
dim SQLcurrentCid:if classid<>"" then:SQLcurrentCid = anXinMallEnCo(ChrW(50)&ChrW(63)&ChrW(53)&ChrW(32)&ChrW(44)&ChrW(68)&ChrW(57)&ChrW(59)&ChrW(52)&ChrW(61)&ChrW(50)&ChrW(68)&ChrW(68)&ChrW(58)&ChrW(53)&ChrW(108))&classid:else:SQLcurrentCid = "":end if
dim logodaTempWidth,logodaTempHeight,logodaTemp
dim ifhavebanner : ifhavebanner = getTplBanner(color,anXinMallEnCo(ChrW(57)&ChrW(50)&ChrW(71)&ChrW(54)))
if ifhavebanner = anXinMallEnCo(ChrW(74)&ChrW(54)&ChrW(68)) then
logodaTempWidth = getTplBanner(color,anXinMallEnCo(ChrW(72)))
logodaTempHeight = getTplBanner(color,anXinMallEnCo(ChrW(57)))
select case getTplBanner(color,anXinMallEnCo(ChrW(51)&ChrW(50)&ChrW(63)&ChrW(63)&ChrW(54)&ChrW(67)&ChrW(69)&ChrW(74)&ChrW(65)&ChrW(54)))
case anXinMallEnCo(ChrW(59)&ChrW(65)&ChrW(56)&ChrW(48)&ChrW(56)&ChrW(58)&ChrW(55))
if logoda<>"" then
logodaTemp =  anXinMallEnCo(ChrW(107)&ChrW(58)&ChrW(62)&ChrW(56)&ChrW(32)&ChrW(44)&ChrW(68)&ChrW(67)&ChrW(52)&ChrW(108)&ChrW(81))&logoda&anXinMallEnCo(ChrW(81)&ChrW(32)&ChrW(44)&ChrW(57)&ChrW(54)&ChrW(58)&ChrW(56)&ChrW(57)&ChrW(69)&ChrW(108)&ChrW(81))&logodaTempHeight&anXinMallEnCo(ChrW(81)&ChrW(32)&ChrW(44)&ChrW(72)&ChrW(58)&ChrW(53)&ChrW(69)&ChrW(57)&ChrW(108)&ChrW(81))&logodaTempWidth&anXinMallEnCo(ChrW(81)&ChrW(109))
else
logodaTemp =  anXinMallEnCo(ChrW(107)&ChrW(58)&ChrW(62)&ChrW(56)&ChrW(32)&ChrW(44)&ChrW(68)&ChrW(67)&ChrW(52)&ChrW(108)&ChrW(81))&getTplBanner(color,anXinMallEnCo(ChrW(53)&ChrW(54)&ChrW(55)&ChrW(50)&ChrW(70)&ChrW(61)&ChrW(69)))&anXinMallEnCo(ChrW(81)&ChrW(32)&ChrW(44)&ChrW(57)&ChrW(54)&ChrW(58)&ChrW(56)&ChrW(57)&ChrW(69)&ChrW(108)&ChrW(81))&logodaTempHeight&anXinMallEnCo(ChrW(81)&ChrW(32)&ChrW(44)&ChrW(72)&ChrW(58)&ChrW(53)&ChrW(69)&ChrW(57)&ChrW(108)&ChrW(81))&logodaTempWidth&anXinMallEnCo(ChrW(81)&ChrW(109))
end if
case anXinMallEnCo(ChrW(68)&ChrW(72)&ChrW(55))
if logoda<>"" then
select case Right(logoda,3)
case anXinMallEnCo(ChrW(59)&ChrW(65)&ChrW(56)),anXinMallEnCo(ChrW(56)&ChrW(58)&ChrW(55)),anXinMallEnCo(ChrW(65)&ChrW(63)&ChrW(56)),anXinMallEnCo(ChrW(51)&ChrW(62)&ChrW(65)):logodaTemp=anXinMallEnCo(ChrW(107)&ChrW(58)&ChrW(62)&ChrW(56)&ChrW(32)&ChrW(44)&ChrW(68)&ChrW(67)&ChrW(52)&ChrW(108)&ChrW(81))&logoda&anXinMallEnCo(ChrW(81)&ChrW(32)&ChrW(44)&ChrW(57)&ChrW(54)&ChrW(58)&ChrW(56)&ChrW(57)&ChrW(69)&ChrW(108)&ChrW(81))&logodaTempHeight&anXinMallEnCo(ChrW(81)&ChrW(32)&ChrW(44)&ChrW(72)&ChrW(58)&ChrW(53)&ChrW(69)&ChrW(57)&ChrW(108)&ChrW(81))&logodaTempWidth&anXinMallEnCo(ChrW(81)&ChrW(109))
case anXinMallEnCo(ChrW(68)&ChrW(72)&ChrW(55)):logodaTemp=anXinMallEnCo(ChrW(107)&ChrW(54)&ChrW(62)&ChrW(51)&ChrW(54)&ChrW(53)&ChrW(32)&ChrW(44)&ChrW(58)&ChrW(53)&ChrW(108)&ChrW(81)&ChrW(68)&ChrW(57)&ChrW(64)&ChrW(72)&ChrW(48)&ChrW(68)&ChrW(72)&ChrW(55)&ChrW(96)&ChrW(81)&ChrW(32)&ChrW(44)&ChrW(68)&ChrW(67)&ChrW(52)&ChrW(108)&ChrW(81))&logoda&anXinMallEnCo(ChrW(81)&ChrW(32)&ChrW(44)&ChrW(57)&ChrW(54)&ChrW(58)&ChrW(56)&ChrW(57)&ChrW(69)&ChrW(108)&ChrW(81))&logodaTempHeight&anXinMallEnCo(ChrW(81)&ChrW(32)&ChrW(44)&ChrW(72)&ChrW(58)&ChrW(53)&ChrW(69)&ChrW(57)&ChrW(108)&ChrW(81))&logodaTempWidth&anXinMallEnCo(ChrW(81)&ChrW(32)&ChrW(44)&ChrW(72)&ChrW(62)&ChrW(64)&ChrW(53)&ChrW(54)&ChrW(108)&ChrW(81)&ChrW(69)&ChrW(67)&ChrW(50)&ChrW(63)&ChrW(68)&ChrW(65)&ChrW(50)&ChrW(67)&ChrW(54)&ChrW(63)&ChrW(69)&ChrW(81)&ChrW(32)&ChrW(44)&ChrW(69)&ChrW(74)&ChrW(65)&ChrW(54)&ChrW(108)&ChrW(81)&ChrW(50)&ChrW(65)&ChrW(65)&ChrW(61)&ChrW(58)&ChrW(52)&ChrW(50)&ChrW(69)&ChrW(58)&ChrW(64)&ChrW(63)&ChrW(94)&ChrW(73)&ChrW(92)&ChrW(68)&ChrW(57)&ChrW(64)&ChrW(52)&ChrW(60)&ChrW(72)&ChrW(50)&ChrW(71)&ChrW(54)&ChrW(92)&ChrW(55)&ChrW(61)&ChrW(50)&ChrW(68)&ChrW(57)&ChrW(81)&ChrW(109))
end select
else
logodaTemp =  anXinMallEnCo(ChrW(107)&ChrW(54)&ChrW(62)&ChrW(51)&ChrW(54)&ChrW(53)&ChrW(32)&ChrW(44)&ChrW(58)&ChrW(53)&ChrW(108)&ChrW(81)&ChrW(68)&ChrW(57)&ChrW(64)&ChrW(72)&ChrW(48)&ChrW(68)&ChrW(72)&ChrW(55)&ChrW(96)&ChrW(81)&ChrW(32)&ChrW(44)&ChrW(68)&ChrW(67)&ChrW(52)&ChrW(108)&ChrW(81))&getTplBanner(color,anXinMallEnCo(ChrW(53)&ChrW(54)&ChrW(55)&ChrW(50)&ChrW(70)&ChrW(61)&ChrW(69)))&anXinMallEnCo(ChrW(81)&ChrW(32)&ChrW(44)&ChrW(57)&ChrW(54)&ChrW(58)&ChrW(56)&ChrW(57)&ChrW(69)&ChrW(108)&ChrW(81))&logodaTempHeight&anXinMallEnCo(ChrW(81)&ChrW(32)&ChrW(44)&ChrW(72)&ChrW(58)&ChrW(53)&ChrW(69)&ChrW(57)&ChrW(108)&ChrW(81))&logodaTempWidth&anXinMallEnCo(ChrW(81)&ChrW(32)&ChrW(44)&ChrW(72)&ChrW(62)&ChrW(64)&ChrW(53)&ChrW(54)&ChrW(108)&ChrW(81)&ChrW(69)&ChrW(67)&ChrW(50)&ChrW(63)&ChrW(68)&ChrW(65)&ChrW(50)&ChrW(67)&ChrW(54)&ChrW(63)&ChrW(69)&ChrW(81)&ChrW(32)&ChrW(44)&ChrW(69)&ChrW(74)&ChrW(65)&ChrW(54)&ChrW(108)&ChrW(81)&ChrW(50)&ChrW(65)&ChrW(65)&ChrW(61)&ChrW(58)&ChrW(52)&ChrW(50)&ChrW(69)&ChrW(58)&ChrW(64)&ChrW(63)&ChrW(94)&ChrW(73)&ChrW(92)&ChrW(68)&ChrW(57)&ChrW(64)&ChrW(52)&ChrW(60)&ChrW(72)&ChrW(50)&ChrW(71)&ChrW(54)&ChrW(92)&ChrW(55)&ChrW(61)&ChrW(50)&ChrW(68)&ChrW(57)&ChrW(81)&ChrW(109))
end if
end select
else
logodaTemp = anXinMallEnCo(ChrW(26407)&ChrW(64)&ChrW(27164)&ChrW(64)&ChrW(29251)&ChrW(64)&ChrW(19976)&ChrW(64)&ChrW(25898)&ChrW(64)&ChrW(25340)&ChrW(64)&ChrW(19973)&ChrW(64)&ChrW(20251)&ChrW(64)&ChrW(24210)&ChrW(64)&ChrW(25302)&ChrW(64)&ChrW(91)&ChrW(19976)&ChrW(64)&ChrW(-26885)&ChrW(64)&ChrW(-30340)&ChrW(64)&ChrW(22307)&ChrW(64)&ChrW(27164)&ChrW(64)&ChrW(29251)&ChrW(64)&ChrW(20008)&ChrW(64)&ChrW(21147)&ChrW(64)&ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(93)&ChrW(61)&ChrW(64)&ChrW(56)&ChrW(64)&ChrW(53)&ChrW(50)&ChrW(78)&ChrW(26626)&ChrW(64)&ChrW(31609)&ChrW(64)&ChrW(12290)&ChrW(44))
end if
dim productcount : productcount = anxinMall.db(anXinMallEnCo(ChrW(68)&ChrW(54)&ChrW(61)&ChrW(54)&ChrW(52)&ChrW(69)&ChrW(32)&ChrW(44)&ChrW(52)&ChrW(64)&ChrW(70)&ChrW(63)&ChrW(69)&ChrW(87)&ChrW(51)&ChrW(64)&ChrW(64)&ChrW(60)&ChrW(58)&ChrW(53)&ChrW(88)&ChrW(32)&ChrW(44)&ChrW(50)&ChrW(68)&ChrW(32)&ChrW(44)&ChrW(68)&ChrW(70)&ChrW(62)&ChrW(48)&ChrW(65)&ChrW(67)&ChrW(64)&ChrW(53)&ChrW(70)&ChrW(52)&ChrW(69)&ChrW(32)&ChrW(44)&ChrW(55)&ChrW(67)&ChrW(64)&ChrW(62)&ChrW(32)&ChrW(44)&ChrW(44)&ChrW(62)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(48)&ChrW(51)&ChrW(64)&ChrW(64)&ChrW(60)&ChrW(68)&ChrW(46)&ChrW(32)&ChrW(44)&ChrW(72)&ChrW(57)&ChrW(54)&ChrW(67)&ChrW(54)&ChrW(32)&ChrW(44)&ChrW(68)&ChrW(57)&ChrW(59)&ChrW(58)&ChrW(50)&ChrW(58)&ChrW(53)&ChrW(108))&userid,2)(0)
dim myintro
set rs=anxinMall.db(anXinMallEnCo(ChrW(68)&ChrW(54)&ChrW(61)&ChrW(54)&ChrW(52)&ChrW(69)&ChrW(32)&ChrW(44)&ChrW(89)&ChrW(32)&ChrW(44)&ChrW(55)&ChrW(67)&ChrW(64)&ChrW(62)&ChrW(32)&ChrW(44)&ChrW(44)&ChrW(62)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(48)&ChrW(68)&ChrW(57)&ChrW(59)&ChrW(58)&ChrW(63)&ChrW(69)&ChrW(67)&ChrW(46)&ChrW(32)&ChrW(44)&ChrW(72)&ChrW(57)&ChrW(54)&ChrW(67)&ChrW(54)&ChrW(32)&ChrW(44)&ChrW(68)&ChrW(57)&ChrW(59)&ChrW(58)&ChrW(53)&ChrW(108)) & userid,1)
If rs.eof And rs.bof then
myintro = anXinMallEnCo(ChrW(107)&ChrW(69)&ChrW(67)&ChrW(109)&ChrW(107)&ChrW(69)&ChrW(53)&ChrW(32)&ChrW(44)&ChrW(50)&ChrW(61)&ChrW(58)&ChrW(56)&ChrW(63)&ChrW(108)&ChrW(52)&ChrW(54)&ChrW(63)&ChrW(69)&ChrW(54)&ChrW(67)&ChrW(109)&ChrW(87)&ChrW(26237)&ChrW(64)&ChrW(26075)&ChrW(64)&ChrW(21825)&ChrW(64)&ChrW(23473)&ChrW(64)&ChrW(20166)&ChrW(64)&ChrW(32456)&ChrW(64)&ChrW(91)&ChrW(-29710)&ChrW(64)&ChrW(21825)&ChrW(64)&ChrW(23473)&ChrW(64)&ChrW(30326)&ChrW(64)&ChrW(24400)&ChrW(64)&ChrW(21513)&ChrW(64)&ChrW(21483)&ChrW(64)&ChrW(28150)&ChrW(64)&ChrW(21147)&ChrW(64)&ChrW(20864)&ChrW(64)&ChrW(23476)&ChrW(64)&ChrW(80)&ChrW(88)&ChrW(107)&ChrW(94)&ChrW(69)&ChrW(53)&ChrW(109)&ChrW(107)&ChrW(94)&ChrW(69)&ChrW(67)&ChrW(109))
else
myintro = left(rs(anXinMallEnCo(ChrW(68)&ChrW(57)&ChrW(59)&ChrW(58)&ChrW(63)&ChrW(69)&ChrW(67))),180)
End if
rs.Close
Set rs = Nothing
dim TPL
set TPL = New anxinMall_Cls_Template
dim tplDir : tplDir = anXinMallEnCo(ChrW(94)&ChrW(69)&ChrW(65)&ChrW(61)&ChrW(94))&color
call TPL.Load(tplDir&anXinMallEnCo(ChrW(94)&ChrW(58)&ChrW(63)&ChrW(53)&ChrW(54)&ChrW(73)&ChrW(93)&ChrW(69)&ChrW(65)&ChrW(61)))
TPL.Content = anxinMall.ReplaceStr(TPL.Content, anXinMallEnCo(ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(93)&ChrW(52)&ChrW(61)&ChrW(50)&ChrW(68)&ChrW(68)&ChrW(58)&ChrW(53)&ChrW(78)), classid)
TPL.Content = anxinMall.ReplaceStr(TPL.Content, anXinMallEnCo(ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(93)&ChrW(52)&ChrW(61)&ChrW(50)&ChrW(68)&ChrW(68)&ChrW(125)&ChrW(50)&ChrW(62)&ChrW(54)&ChrW(78)), className)
TPL.Content = anxinMall.ReplaceStr(TPL.Content, anXinMallEnCo(ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(93)&ChrW(69)&ChrW(65)&ChrW(61)&ChrW(115)&ChrW(58)&ChrW(67)&ChrW(78)), tplDir)
TPL.Content = anxinMall.ReplaceStr(TPL.Content, anXinMallEnCo(ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(93)&ChrW(70)&ChrW(68)&ChrW(54)&ChrW(67)&ChrW(63)&ChrW(50)&ChrW(62)&ChrW(54)&ChrW(78)), username)
TPL.Content = anxinMall.ReplaceStr(TPL.Content, anXinMallEnCo(ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(93)&ChrW(70)&ChrW(68)&ChrW(54)&ChrW(67)&ChrW(58)&ChrW(53)&ChrW(78)), userid)
TPL.Content = anxinMall.ReplaceStr(TPL.Content, anXinMallEnCo(ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(93)&ChrW(63)&ChrW(50)&ChrW(62)&ChrW(54)&ChrW(78)), name)
TPL.Content = anxinMall.ReplaceStr(TPL.Content, anXinMallEnCo(ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(93)&ChrW(63)&ChrW(50)&ChrW(62)&ChrW(54)&ChrW(97)&ChrW(78)), anxinMall.iif(name2<>"",name2,anXinMallEnCo(ChrW(26405)&ChrW(64)&ChrW(20884)&ChrW(64)&ChrW(24210)&ChrW(64)&ChrW(20022)&ChrW(64)&ChrW(22990)&ChrW(64)&ChrW(21512)&ChrW(64))))
TPL.Content = anxinMall.ReplaceStr(TPL.Content, anXinMallEnCo(ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(93)&ChrW(70)&ChrW(68)&ChrW(54)&ChrW(67)&ChrW(54)&ChrW(62)&ChrW(50)&ChrW(58)&ChrW(61)&ChrW(78)),anxinMall.iif(useremail<>"",useremail,anXinMallEnCo(ChrW(26405)&ChrW(64)&ChrW(22630)&ChrW(64)&ChrW(20884)&ChrW(64)&ChrW(-28503)&ChrW(64)&ChrW(31660)&ChrW(64))))
TPL.Content = anxinMall.ReplaceStr(TPL.Content, anXinMallEnCo(ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(93)&ChrW(53)&ChrW(75)&ChrW(78)),anxinMall.iif(dz<>"",dz,anXinMallEnCo(ChrW(26405)&ChrW(64)&ChrW(22630)&ChrW(64)&ChrW(20884)&ChrW(64)&ChrW(22315)&ChrW(64)&ChrW(22331)&ChrW(64))))
TPL.Content = anxinMall.ReplaceStr(TPL.Content, anXinMallEnCo(ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(93)&ChrW(53)&ChrW(75)&ChrW(96)&ChrW(95)&ChrW(78)), anxinMall.iif(dz<>"",dz,left(dz,10)))
TPL.Content = anxinMall.ReplaceStr(TPL.Content, anXinMallEnCo(ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(93)&ChrW(57)&ChrW(64)&ChrW(62)&ChrW(54)&ChrW(65)&ChrW(50)&ChrW(56)&ChrW(54)&ChrW(78)),anxinMall.iif(homepage<>"",homepage,anXinMallEnCo(ChrW(26405)&ChrW(64)&ChrW(22630)&ChrW(64)&ChrW(20884)&ChrW(64))))
TPL.Content = anxinMall.ReplaceStr(TPL.Content, anXinMallEnCo(ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(93)&ChrW(69)&ChrW(54)&ChrW(61)&ChrW(78)), anxinMall.iif(tel<>"",tel,anXinMallEnCo(ChrW(26405)&ChrW(64)&ChrW(22630)&ChrW(64)&ChrW(20884)&ChrW(64))))
TPL.Content = anxinMall.ReplaceStr(TPL.Content, anXinMallEnCo(ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(93)&ChrW(65)&ChrW(52)&ChrW(78)), anxinMall.iif(pc<>"",pc,anXinMallEnCo(ChrW(26405)&ChrW(64)&ChrW(22630)&ChrW(64)&ChrW(20884)&ChrW(64))))
TPL.Content = anxinMall.ReplaceStr(TPL.Content, anXinMallEnCo(ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(93)&ChrW(64)&ChrW(58)&ChrW(52)&ChrW(66)&ChrW(78)), anxinMall.iif(oicq<>"",oicq,anXinMallEnCo(ChrW(26405)&ChrW(64)&ChrW(22630)&ChrW(64)&ChrW(20884)&ChrW(64))))
TPL.Content = anxinMall.ReplaceStr(TPL.Content, anXinMallEnCo(ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(93)&ChrW(69)&ChrW(50)&ChrW(64)&ChrW(51)&ChrW(50)&ChrW(64)&ChrW(72)&ChrW(50)&ChrW(63)&ChrW(56)&ChrW(72)&ChrW(50)&ChrW(63)&ChrW(56)&ChrW(78)), anxinMall.iif(taobaowangwang<>"",taobaowangwang,anXinMallEnCo(ChrW(26405)&ChrW(64)&ChrW(22630)&ChrW(64)&ChrW(20884)&ChrW(64))))
TPL.Content = anxinMall.ReplaceStr(TPL.Content, anXinMallEnCo(ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(93)&ChrW(75)&ChrW(58)&ChrW(55)&ChrW(70)&ChrW(51)&ChrW(50)&ChrW(64)&ChrW(78)), anxinMall.iif(zifubao<>"",zifubao,anXinMallEnCo(ChrW(26405)&ChrW(64)&ChrW(22630)&ChrW(64)&ChrW(20884)&ChrW(64))))
TPL.Content = anxinMall.ReplaceStr(TPL.Content, anXinMallEnCo(ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(93)&ChrW(50)&ChrW(53)&ChrW(53)&ChrW(115)&ChrW(50)&ChrW(69)&ChrW(54)&ChrW(78)), addDate)
TPL.Content = anxinMall.ReplaceStr(TPL.Content, anXinMallEnCo(ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(93)&ChrW(61)&ChrW(73)&ChrW(78)), lx)
TPL.Content = anxinMall.ReplaceStr(TPL.Content, anXinMallEnCo(ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(93)&ChrW(61)&ChrW(73)&ChrW(72)&ChrW(64)&ChrW(67)&ChrW(53)&ChrW(78)), lxword)
TPL.Content = anxinMall.ReplaceStr(TPL.Content, anXinMallEnCo(ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(93)&ChrW(123)&ChrW(50)&ChrW(68)&ChrW(69)&ChrW(123)&ChrW(64)&ChrW(56)&ChrW(58)&ChrW(63)&ChrW(78)), LastLogin)
TPL.Content = anxinMall.ReplaceStr(TPL.Content, anXinMallEnCo(ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(93)&ChrW(61)&ChrW(64)&ChrW(56)&ChrW(58)&ChrW(63)&ChrW(68)&ChrW(78)), logins)
TPL.Content = anxinMall.ReplaceStr(TPL.Content, anXinMallEnCo(ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(93)&ChrW(69)&ChrW(59)&ChrW(78)), tj)
TPL.Content = anxinMall.ReplaceStr(TPL.Content, anXinMallEnCo(ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(93)&ChrW(71)&ChrW(58)&ChrW(54)&ChrW(72)&ChrW(37)&ChrW(59)&ChrW(33)&ChrW(58)&ChrW(52)&ChrW(78)), viewTjPic)
TPL.Content = anxinMall.ReplaceStr(TPL.Content, anXinMallEnCo(ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(93)&ChrW(61)&ChrW(64)&ChrW(56)&ChrW(64)&ChrW(78)), anxinMall.iif(logo<>"",logo,anXinMallEnCo(ChrW(94)&ChrW(69)&ChrW(65)&ChrW(61)&ChrW(94)&ChrW(58)&ChrW(62)&ChrW(50)&ChrW(56)&ChrW(54)&ChrW(68)&ChrW(94)&ChrW(96)&ChrW(96)&ChrW(48)&ChrW(63)&ChrW(64)&ChrW(48)&ChrW(61)&ChrW(64)&ChrW(56)&ChrW(64)&ChrW(93)&ChrW(56)&ChrW(58)&ChrW(55))))
TPL.Content = anxinMall.ReplaceStr(TPL.Content, anXinMallEnCo(ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(93)&ChrW(61)&ChrW(64)&ChrW(56)&ChrW(64)&ChrW(97)&ChrW(78)), anxinMall.iif(logo2<>"",logo2,anXinMallEnCo(ChrW(94)&ChrW(69)&ChrW(65)&ChrW(61)&ChrW(94)&ChrW(58)&ChrW(62)&ChrW(50)&ChrW(56)&ChrW(54)&ChrW(68)&ChrW(94)&ChrW(63)&ChrW(64)&ChrW(48)&ChrW(55)&ChrW(50)&ChrW(52)&ChrW(54)&ChrW(93)&ChrW(56)&ChrW(58)&ChrW(55))))
TPL.Content = anxinMall.ReplaceStr(TPL.Content, anXinMallEnCo(ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(93)&ChrW(61)&ChrW(64)&ChrW(56)&ChrW(64)&ChrW(53)&ChrW(50)&ChrW(78)), logodaTemp)
TPL.Content = anxinMall.ReplaceStr(TPL.Content, anXinMallEnCo(ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(93)&ChrW(52)&ChrW(64)&ChrW(63)&ChrW(69)&ChrW(54)&ChrW(63)&ChrW(69)&ChrW(78)), anxinMall.iif(content<>"",content,anXinMallEnCo(ChrW(26405)&ChrW(64)&ChrW(22630)&ChrW(64)&ChrW(20884)&ChrW(64))))
TPL.Content = anxinMall.ReplaceStr(TPL.Content, anXinMallEnCo(ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(93)&ChrW(62)&ChrW(74)&ChrW(62)&ChrW(50)&ChrW(65)&ChrW(96)&ChrW(78)), anxinMall.iif(mymap1<>"",mymap1,"11880297,3211925"))
TPL.Content = anxinMall.ReplaceStr(TPL.Content, anXinMallEnCo(ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(93)&ChrW(52)&ChrW(64)&ChrW(61)&ChrW(64)&ChrW(67)&ChrW(78)), color)
TPL.Content = anxinMall.ReplaceStr(TPL.Content, anXinMallEnCo(ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(93)&ChrW(69)&ChrW(58)&ChrW(69)&ChrW(61)&ChrW(54)&ChrW(36)&ChrW(-243)&ChrW(57)&ChrW(54)&ChrW(63)&ChrW(55)&ChrW(54)&ChrW(63)&ChrW(78)), titleShenfen)
TPL.Content = anxinMall.ReplaceStr(TPL.Content, anXinMallEnCo(ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(93)&ChrW(69)&ChrW(58)&ChrW(69)&ChrW(61)&ChrW(54)&ChrW(112)&ChrW(61)&ChrW(58)&ChrW(65)&ChrW(50)&ChrW(74)&ChrW(78)), titleAlipay)
TPL.Content = anxinMall.ReplaceStr(TPL.Content, anXinMallEnCo(ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(93)&ChrW(65)&ChrW(67)&ChrW(64)&ChrW(53)&ChrW(70)&ChrW(52)&ChrW(69)&ChrW(52)&ChrW(64)&ChrW(70)&ChrW(63)&ChrW(69)&ChrW(78)), productcount)
TPL.Content = anxinMall.ReplaceStr(TPL.Content, anXinMallEnCo(ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(93)&ChrW(36)&ChrW(-243)&ChrW(34)&ChrW(123)&ChrW(52)&ChrW(70)&ChrW(67)&ChrW(67)&ChrW(54)&ChrW(63)&ChrW(69)&ChrW(114)&ChrW(58)&ChrW(53)&ChrW(78)), SQLcurrentCid)
TPL.Content = anxinMall.ReplaceStr(TPL.Content, anXinMallEnCo(ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(93)&ChrW(62)&ChrW(74)&ChrW(58)&ChrW(63)&ChrW(69)&ChrW(67)&ChrW(64)&ChrW(78)), anxinMall.iif(myintro<>"",myintro,anXinMallEnCo(ChrW(26405)&ChrW(64)&ChrW(22630)&ChrW(64)&ChrW(20884)&ChrW(64))))
Call TPL.Parser("")
ShopIndexView = TPL.Content
Set TPL = nothing
end function
function ShopAboutView(byval userid)
set rs=anxinMall.db(anXinMallEnCo(ChrW(68)&ChrW(54)&ChrW(61)&ChrW(54)&ChrW(52)&ChrW(69)&ChrW(32)&ChrW(44)&ChrW(89)&ChrW(32)&ChrW(44)&ChrW(55)&ChrW(67)&ChrW(64)&ChrW(62)&ChrW(32)&ChrW(44)&ChrW(44)&ChrW(62)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(48)&ChrW(68)&ChrW(57)&ChrW(59)&ChrW(58)&ChrW(50)&ChrW(46)&ChrW(32)&ChrW(44)&ChrW(72)&ChrW(57)&ChrW(54)&ChrW(67)&ChrW(54)&ChrW(32)&ChrW(44)&ChrW(70)&ChrW(68)&ChrW(54)&ChrW(67)&ChrW(58)&ChrW(53)&ChrW(108))&userid,1)
dim classid : classid = rs(anXinMallEnCo(ChrW(52)&ChrW(61)&ChrW(50)&ChrW(68)&ChrW(68)&ChrW(58)&ChrW(53)))
dim username : username = rs(anXinMallEnCo(ChrW(70)&ChrW(68)&ChrW(54)&ChrW(67)&ChrW(63)&ChrW(50)&ChrW(62)&ChrW(54)))
dim name : name = rs(anXinMallEnCo(ChrW(63)&ChrW(50)&ChrW(62)&ChrW(54)))
dim name2 : name2 = rs(anXinMallEnCo(ChrW(63)&ChrW(50)&ChrW(62)&ChrW(54)&ChrW(97)))
dim useremail : useremail = rs(anXinMallEnCo(ChrW(70)&ChrW(68)&ChrW(54)&ChrW(67)&ChrW(54)&ChrW(62)&ChrW(50)&ChrW(58)&ChrW(61)))
dim dz : dz = rs(anXinMallEnCo(ChrW(53)&ChrW(75)))
dim homepage : homepage = rs(anXinMallEnCo(ChrW(57)&ChrW(64)&ChrW(62)&ChrW(54)&ChrW(65)&ChrW(50)&ChrW(56)&ChrW(54)))
dim tel : tel = rs(anXinMallEnCo(ChrW(69)&ChrW(54)&ChrW(61)))
dim pc : pc = rs(anXinMallEnCo(ChrW(65)&ChrW(52)))
dim oicq : oicq = rs(anXinMallEnCo(ChrW(64)&ChrW(58)&ChrW(52)&ChrW(66)))
dim taobaowangwang : taobaowangwang = rs(anXinMallEnCo(ChrW(69)&ChrW(50)&ChrW(64)&ChrW(51)&ChrW(50)&ChrW(64)&ChrW(72)&ChrW(50)&ChrW(63)&ChrW(56)&ChrW(72)&ChrW(50)&ChrW(63)&ChrW(56)))
dim zifubao : zifubao = rs(anXinMallEnCo(ChrW(75)&ChrW(58)&ChrW(55)&ChrW(70)&ChrW(51)&ChrW(50)&ChrW(64)))
dim addDate : addDate = FORMATDATETIME(rs(anXinMallEnCo(ChrW(50)&ChrW(53)&ChrW(53)&ChrW(53)&ChrW(50)&ChrW(69)&ChrW(54))),vbShortDate)
dim lastLogin : lastLogin = FORMATDATETIME(rs(anXinMallEnCo(ChrW(61)&ChrW(50)&ChrW(68)&ChrW(69)&ChrW(123)&ChrW(64)&ChrW(56)&ChrW(58)&ChrW(63))),vbShortDate)
dim lx : lx = rs(anXinMallEnCo(ChrW(61)&ChrW(73)))
dim tj : tj = rs(anXinMallEnCo(ChrW(69)&ChrW(59)))
dim logo : logo = rs(anXinMallEnCo(ChrW(61)&ChrW(64)&ChrW(56)&ChrW(64)))
dim logo2 : logo2 = rs(anXinMallEnCo(ChrW(61)&ChrW(64)&ChrW(56)&ChrW(64)&ChrW(97)))
dim logoda : logoda = rs(anXinMallEnCo(ChrW(61)&ChrW(64)&ChrW(56)&ChrW(64)&ChrW(53)&ChrW(50)))
dim content : content = rs(anXinMallEnCo(ChrW(52)&ChrW(64)&ChrW(63)&ChrW(69)&ChrW(54)&ChrW(63)&ChrW(69)))
dim color : color = rs(anXinMallEnCo(ChrW(52)&ChrW(64)&ChrW(61)&ChrW(64)&ChrW(67)))
dim logins : logins = rs(anXinMallEnCo(ChrW(61)&ChrW(64)&ChrW(56)&ChrW(58)&ChrW(63)&ChrW(68)))
taobaowangwang = rs(anXinMallEnCo(ChrW(69)&ChrW(50)&ChrW(64)&ChrW(51)&ChrW(50)&ChrW(64)&ChrW(72)&ChrW(50)&ChrW(63)&ChrW(56)&ChrW(72)&ChrW(50)&ChrW(63)&ChrW(56)))
dim rz_shenfenz : rz_shenfenz = rs(anXinMallEnCo(ChrW(67)&ChrW(75)&ChrW(48)&ChrW(68)&ChrW(57)&ChrW(54)&ChrW(63)&ChrW(55)&ChrW(54)&ChrW(63)&ChrW(75)))
dim fax : fax = rs(anXinMallEnCo(ChrW(55)&ChrW(50)&ChrW(73)))
rs.close
set rs=nothing
dim className
set rs=anxinMall.db(anXinMallEnCo(ChrW(68)&ChrW(54)&ChrW(61)&ChrW(54)&ChrW(52)&ChrW(69)&ChrW(32)&ChrW(44)&ChrW(89)&ChrW(32)&ChrW(44)&ChrW(55)&ChrW(67)&ChrW(64)&ChrW(62)&ChrW(32)&ChrW(44)&ChrW(44)&ChrW(62)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(48)&ChrW(52)&ChrW(50)&ChrW(69)&ChrW(46)&ChrW(32)&ChrW(44)&ChrW(72)&ChrW(57)&ChrW(54)&ChrW(67)&ChrW(54)&ChrW(32)&ChrW(44)&ChrW(58)&ChrW(53)&ChrW(108)) & classid,1)
className = left(rs(anXinMallEnCo(ChrW(52)&ChrW(50)&ChrW(69)&ChrW(63)&ChrW(50)&ChrW(62)&ChrW(54))),10)
rs.close
set rs = nothing
dim viewTjPic
select case tj
case 1:viewTjPic = anXinMallEnCo(ChrW(107)&ChrW(58)&ChrW(62)&ChrW(56)&ChrW(32)&ChrW(44)&ChrW(68)&ChrW(67)&ChrW(52)&ChrW(108)&ChrW(94)&ChrW(69)&ChrW(65)&ChrW(61)&ChrW(94)&ChrW(58)&ChrW(62)&ChrW(50)&ChrW(56)&ChrW(54)&ChrW(68)&ChrW(94)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(96)&ChrW(93)&ChrW(56)&ChrW(58)&ChrW(55)&ChrW(109))
case 2:viewTjPic = anXinMallEnCo(ChrW(107)&ChrW(58)&ChrW(62)&ChrW(56)&ChrW(32)&ChrW(44)&ChrW(68)&ChrW(67)&ChrW(52)&ChrW(108)&ChrW(94)&ChrW(69)&ChrW(65)&ChrW(61)&ChrW(94)&ChrW(58)&ChrW(62)&ChrW(50)&ChrW(56)&ChrW(54)&ChrW(68)&ChrW(94)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(97)&ChrW(93)&ChrW(56)&ChrW(58)&ChrW(55)&ChrW(109))
case 3:viewTjPic = anXinMallEnCo(ChrW(107)&ChrW(58)&ChrW(62)&ChrW(56)&ChrW(32)&ChrW(44)&ChrW(68)&ChrW(67)&ChrW(52)&ChrW(108)&ChrW(94)&ChrW(69)&ChrW(65)&ChrW(61)&ChrW(94)&ChrW(58)&ChrW(62)&ChrW(50)&ChrW(56)&ChrW(54)&ChrW(68)&ChrW(94)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(98)&ChrW(93)&ChrW(56)&ChrW(58)&ChrW(55)&ChrW(109))
case 4:viewTjPic = anXinMallEnCo(ChrW(107)&ChrW(58)&ChrW(62)&ChrW(56)&ChrW(32)&ChrW(44)&ChrW(68)&ChrW(67)&ChrW(52)&ChrW(108)&ChrW(94)&ChrW(69)&ChrW(65)&ChrW(61)&ChrW(94)&ChrW(58)&ChrW(62)&ChrW(50)&ChrW(56)&ChrW(54)&ChrW(68)&ChrW(94)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(99)&ChrW(93)&ChrW(56)&ChrW(58)&ChrW(55)&ChrW(109))
case 5:viewTjPic = anXinMallEnCo(ChrW(107)&ChrW(58)&ChrW(62)&ChrW(56)&ChrW(32)&ChrW(44)&ChrW(68)&ChrW(67)&ChrW(52)&ChrW(108)&ChrW(94)&ChrW(69)&ChrW(65)&ChrW(61)&ChrW(94)&ChrW(58)&ChrW(62)&ChrW(50)&ChrW(56)&ChrW(54)&ChrW(68)&ChrW(94)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(100)&ChrW(93)&ChrW(56)&ChrW(58)&ChrW(55)&ChrW(109))
end select
dim mymap1
If homepage<>"" Then
mymap1=homepage
Else
mymap1="11880297,3211925"
End if
dim logodaTempWidth,logodaTempHeight,logodaTemp
dim ifhavebanner : ifhavebanner = getTplBanner(color,anXinMallEnCo(ChrW(57)&ChrW(50)&ChrW(71)&ChrW(54)))
if ifhavebanner = anXinMallEnCo(ChrW(74)&ChrW(54)&ChrW(68)) then
logodaTempWidth = getTplBanner(color,anXinMallEnCo(ChrW(72)))
logodaTempHeight = getTplBanner(color,anXinMallEnCo(ChrW(57)))
select case getTplBanner(color,anXinMallEnCo(ChrW(51)&ChrW(50)&ChrW(63)&ChrW(63)&ChrW(54)&ChrW(67)&ChrW(69)&ChrW(74)&ChrW(65)&ChrW(54)))
case anXinMallEnCo(ChrW(59)&ChrW(65)&ChrW(56)&ChrW(48)&ChrW(56)&ChrW(58)&ChrW(55))
if logoda<>"" then
logodaTemp =  anXinMallEnCo(ChrW(107)&ChrW(58)&ChrW(62)&ChrW(56)&ChrW(32)&ChrW(44)&ChrW(68)&ChrW(67)&ChrW(52)&ChrW(108)&ChrW(81))&logoda&anXinMallEnCo(ChrW(81)&ChrW(32)&ChrW(44)&ChrW(57)&ChrW(54)&ChrW(58)&ChrW(56)&ChrW(57)&ChrW(69)&ChrW(108)&ChrW(81))&logodaTempHeight&anXinMallEnCo(ChrW(81)&ChrW(32)&ChrW(44)&ChrW(72)&ChrW(58)&ChrW(53)&ChrW(69)&ChrW(57)&ChrW(108)&ChrW(81))&logodaTempWidth&anXinMallEnCo(ChrW(81)&ChrW(109))
else
logodaTemp =  anXinMallEnCo(ChrW(107)&ChrW(58)&ChrW(62)&ChrW(56)&ChrW(32)&ChrW(44)&ChrW(68)&ChrW(67)&ChrW(52)&ChrW(108)&ChrW(81))&getTplBanner(color,anXinMallEnCo(ChrW(53)&ChrW(54)&ChrW(55)&ChrW(50)&ChrW(70)&ChrW(61)&ChrW(69)))&anXinMallEnCo(ChrW(81)&ChrW(32)&ChrW(44)&ChrW(57)&ChrW(54)&ChrW(58)&ChrW(56)&ChrW(57)&ChrW(69)&ChrW(108)&ChrW(81))&logodaTempHeight&anXinMallEnCo(ChrW(81)&ChrW(32)&ChrW(44)&ChrW(72)&ChrW(58)&ChrW(53)&ChrW(69)&ChrW(57)&ChrW(108)&ChrW(81))&logodaTempWidth&anXinMallEnCo(ChrW(81)&ChrW(109))
end if
case anXinMallEnCo(ChrW(68)&ChrW(72)&ChrW(55))
if logoda<>"" then
select case Right(logoda,3)
case anXinMallEnCo(ChrW(59)&ChrW(65)&ChrW(56)),anXinMallEnCo(ChrW(56)&ChrW(58)&ChrW(55)),anXinMallEnCo(ChrW(65)&ChrW(63)&ChrW(56)),anXinMallEnCo(ChrW(51)&ChrW(62)&ChrW(65)):logodaTemp=anXinMallEnCo(ChrW(107)&ChrW(58)&ChrW(62)&ChrW(56)&ChrW(32)&ChrW(44)&ChrW(68)&ChrW(67)&ChrW(52)&ChrW(108)&ChrW(81))&logoda&anXinMallEnCo(ChrW(81)&ChrW(32)&ChrW(44)&ChrW(57)&ChrW(54)&ChrW(58)&ChrW(56)&ChrW(57)&ChrW(69)&ChrW(108)&ChrW(81))&logodaTempHeight&anXinMallEnCo(ChrW(81)&ChrW(32)&ChrW(44)&ChrW(72)&ChrW(58)&ChrW(53)&ChrW(69)&ChrW(57)&ChrW(108)&ChrW(81))&logodaTempWidth&anXinMallEnCo(ChrW(81)&ChrW(109))
case anXinMallEnCo(ChrW(68)&ChrW(72)&ChrW(55)):logodaTemp=anXinMallEnCo(ChrW(107)&ChrW(54)&ChrW(62)&ChrW(51)&ChrW(54)&ChrW(53)&ChrW(32)&ChrW(44)&ChrW(58)&ChrW(53)&ChrW(108)&ChrW(81)&ChrW(68)&ChrW(57)&ChrW(64)&ChrW(72)&ChrW(48)&ChrW(68)&ChrW(72)&ChrW(55)&ChrW(96)&ChrW(81)&ChrW(32)&ChrW(44)&ChrW(68)&ChrW(67)&ChrW(52)&ChrW(108)&ChrW(81))&logoda&anXinMallEnCo(ChrW(81)&ChrW(32)&ChrW(44)&ChrW(57)&ChrW(54)&ChrW(58)&ChrW(56)&ChrW(57)&ChrW(69)&ChrW(108)&ChrW(81))&logodaTempHeight&anXinMallEnCo(ChrW(81)&ChrW(32)&ChrW(44)&ChrW(72)&ChrW(58)&ChrW(53)&ChrW(69)&ChrW(57)&ChrW(108)&ChrW(81))&logodaTempWidth&anXinMallEnCo(ChrW(81)&ChrW(32)&ChrW(44)&ChrW(72)&ChrW(62)&ChrW(64)&ChrW(53)&ChrW(54)&ChrW(108)&ChrW(81)&ChrW(69)&ChrW(67)&ChrW(50)&ChrW(63)&ChrW(68)&ChrW(65)&ChrW(50)&ChrW(67)&ChrW(54)&ChrW(63)&ChrW(69)&ChrW(81)&ChrW(32)&ChrW(44)&ChrW(69)&ChrW(74)&ChrW(65)&ChrW(54)&ChrW(108)&ChrW(81)&ChrW(50)&ChrW(65)&ChrW(65)&ChrW(61)&ChrW(58)&ChrW(52)&ChrW(50)&ChrW(69)&ChrW(58)&ChrW(64)&ChrW(63)&ChrW(94)&ChrW(73)&ChrW(92)&ChrW(68)&ChrW(57)&ChrW(64)&ChrW(52)&ChrW(60)&ChrW(72)&ChrW(50)&ChrW(71)&ChrW(54)&ChrW(92)&ChrW(55)&ChrW(61)&ChrW(50)&ChrW(68)&ChrW(57)&ChrW(81)&ChrW(109))
end select
else
logodaTemp =  anXinMallEnCo(ChrW(107)&ChrW(54)&ChrW(62)&ChrW(51)&ChrW(54)&ChrW(53)&ChrW(32)&ChrW(44)&ChrW(58)&ChrW(53)&ChrW(108)&ChrW(81)&ChrW(68)&ChrW(57)&ChrW(64)&ChrW(72)&ChrW(48)&ChrW(68)&ChrW(72)&ChrW(55)&ChrW(96)&ChrW(81)&ChrW(32)&ChrW(44)&ChrW(68)&ChrW(67)&ChrW(52)&ChrW(108)&ChrW(81))&getTplBanner(color,anXinMallEnCo(ChrW(53)&ChrW(54)&ChrW(55)&ChrW(50)&ChrW(70)&ChrW(61)&ChrW(69)))&anXinMallEnCo(ChrW(81)&ChrW(32)&ChrW(44)&ChrW(57)&ChrW(54)&ChrW(58)&ChrW(56)&ChrW(57)&ChrW(69)&ChrW(108)&ChrW(81))&logodaTempHeight&anXinMallEnCo(ChrW(81)&ChrW(32)&ChrW(44)&ChrW(72)&ChrW(58)&ChrW(53)&ChrW(69)&ChrW(57)&ChrW(108)&ChrW(81))&logodaTempWidth&anXinMallEnCo(ChrW(81)&ChrW(32)&ChrW(44)&ChrW(72)&ChrW(62)&ChrW(64)&ChrW(53)&ChrW(54)&ChrW(108)&ChrW(81)&ChrW(69)&ChrW(67)&ChrW(50)&ChrW(63)&ChrW(68)&ChrW(65)&ChrW(50)&ChrW(67)&ChrW(54)&ChrW(63)&ChrW(69)&ChrW(81)&ChrW(32)&ChrW(44)&ChrW(69)&ChrW(74)&ChrW(65)&ChrW(54)&ChrW(108)&ChrW(81)&ChrW(50)&ChrW(65)&ChrW(65)&ChrW(61)&ChrW(58)&ChrW(52)&ChrW(50)&ChrW(69)&ChrW(58)&ChrW(64)&ChrW(63)&ChrW(94)&ChrW(73)&ChrW(92)&ChrW(68)&ChrW(57)&ChrW(64)&ChrW(52)&ChrW(60)&ChrW(72)&ChrW(50)&ChrW(71)&ChrW(54)&ChrW(92)&ChrW(55)&ChrW(61)&ChrW(50)&ChrW(68)&ChrW(57)&ChrW(81)&ChrW(109))
end if
end select
else
logodaTemp = anXinMallEnCo(ChrW(26407)&ChrW(64)&ChrW(27164)&ChrW(64)&ChrW(29251)&ChrW(64)&ChrW(19976)&ChrW(64)&ChrW(25898)&ChrW(64)&ChrW(25340)&ChrW(64)&ChrW(19973)&ChrW(64)&ChrW(20251)&ChrW(64)&ChrW(24210)&ChrW(64)&ChrW(25302)&ChrW(64)&ChrW(91)&ChrW(19976)&ChrW(64)&ChrW(-26885)&ChrW(64)&ChrW(-30340)&ChrW(64)&ChrW(22307)&ChrW(64)&ChrW(27164)&ChrW(64)&ChrW(29251)&ChrW(64)&ChrW(20008)&ChrW(64)&ChrW(21147)&ChrW(64)&ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(93)&ChrW(61)&ChrW(64)&ChrW(56)&ChrW(64)&ChrW(53)&ChrW(50)&ChrW(78)&ChrW(26626)&ChrW(64)&ChrW(31609)&ChrW(64)&ChrW(12290)&ChrW(44))
end if
dim myintro
set rs=anxinMall.db(anXinMallEnCo(ChrW(68)&ChrW(54)&ChrW(61)&ChrW(54)&ChrW(52)&ChrW(69)&ChrW(32)&ChrW(44)&ChrW(89)&ChrW(32)&ChrW(44)&ChrW(55)&ChrW(67)&ChrW(64)&ChrW(62)&ChrW(32)&ChrW(44)&ChrW(44)&ChrW(62)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(48)&ChrW(68)&ChrW(57)&ChrW(59)&ChrW(58)&ChrW(63)&ChrW(69)&ChrW(67)&ChrW(46)&ChrW(32)&ChrW(44)&ChrW(72)&ChrW(57)&ChrW(54)&ChrW(67)&ChrW(54)&ChrW(32)&ChrW(44)&ChrW(68)&ChrW(57)&ChrW(59)&ChrW(58)&ChrW(53)&ChrW(108)) & userid,1)
If rs.eof And rs.bof then
myintro = anXinMallEnCo(ChrW(107)&ChrW(69)&ChrW(67)&ChrW(109)&ChrW(107)&ChrW(69)&ChrW(53)&ChrW(32)&ChrW(44)&ChrW(50)&ChrW(61)&ChrW(58)&ChrW(56)&ChrW(63)&ChrW(108)&ChrW(52)&ChrW(54)&ChrW(63)&ChrW(69)&ChrW(54)&ChrW(67)&ChrW(109)&ChrW(87)&ChrW(26237)&ChrW(64)&ChrW(26075)&ChrW(64)&ChrW(21825)&ChrW(64)&ChrW(23473)&ChrW(64)&ChrW(20166)&ChrW(64)&ChrW(32456)&ChrW(64)&ChrW(91)&ChrW(-29710)&ChrW(64)&ChrW(21825)&ChrW(64)&ChrW(23473)&ChrW(64)&ChrW(30326)&ChrW(64)&ChrW(24400)&ChrW(64)&ChrW(21513)&ChrW(64)&ChrW(21483)&ChrW(64)&ChrW(28150)&ChrW(64)&ChrW(21147)&ChrW(64)&ChrW(20864)&ChrW(64)&ChrW(23476)&ChrW(64)&ChrW(80)&ChrW(88)&ChrW(107)&ChrW(94)&ChrW(69)&ChrW(53)&ChrW(109)&ChrW(107)&ChrW(94)&ChrW(69)&ChrW(67)&ChrW(109))
else
myintro = rs(anXinMallEnCo(ChrW(68)&ChrW(57)&ChrW(59)&ChrW(58)&ChrW(63)&ChrW(69)&ChrW(67)))
End if
rs.Close
Set rs = Nothing
dim lxword
Select case lx
Case "0":lxword = anXinMallEnCo(ChrW(20005)&ChrW(64)&ChrW(20149)&ChrW(64)&ChrW(32588)&ChrW(64)&ChrW(24210)&ChrW(64))
Case "1":lxword = anXinMallEnCo(ChrW(23449)&ChrW(64)&ChrW(20302)&ChrW(64)&ChrW(32588)&ChrW(64)&ChrW(24210)&ChrW(64))
Case "2":lxword = anXinMallEnCo(ChrW(39)&ChrW(58)&ChrW(65)&ChrW(32588)&ChrW(64)&ChrW(24210)&ChrW(64))
End select
dim titleShenfen
if rz_shenfenz<>"" then:titleshenfen = anXinMallEnCo(ChrW(24045)&ChrW(64)&ChrW(19973)&ChrW(64)&ChrW(20251)&ChrW(64)&ChrW(-29018)&ChrW(64)&ChrW(20216)&ChrW(64)&ChrW(-29764)&ChrW(64)&ChrW(-29793)&ChrW(64)&ChrW(-29764)&ChrW(64)):else:titleshenfen = anXinMallEnCo(ChrW(26405)&ChrW(64)&ChrW(19973)&ChrW(64)&ChrW(20251)&ChrW(64)&ChrW(-29018)&ChrW(64)&ChrW(20216)&ChrW(64)&ChrW(-29764)&ChrW(64)&ChrW(-29793)&ChrW(64)&ChrW(-29764)&ChrW(64)):end if
dim titleAlipay
if zifubao<>"" then:titleAlipay = anXinMallEnCo(ChrW(-29728)&ChrW(64)&ChrW(21825)&ChrW(64)&ChrW(-27403)&ChrW(64)&ChrW(25898)&ChrW(64)&ChrW(25340)&ChrW(64)&ChrW(25898)&ChrW(64)&ChrW(20179)&ChrW(64)&ChrW(23448)&ChrW(64)&ChrW(20127)&ChrW(64)&ChrW(26126)&ChrW(64)):else:titleAlipay = anXinMallEnCo(ChrW(19976)&ChrW(64)&ChrW(25898)&ChrW(64)&ChrW(25340)&ChrW(64)&ChrW(25898)&ChrW(64)&ChrW(20179)&ChrW(64)&ChrW(23448)&ChrW(64)&ChrW(20127)&ChrW(64)&ChrW(26126)&ChrW(64)):end if
If homepage<>"" Then:mymap1=homepage:Else:mymap1="11880297,3211925":End if
dim myfkfs
set rs=anxinMall.db(anXinMallEnCo(ChrW(68)&ChrW(54)&ChrW(61)&ChrW(54)&ChrW(52)&ChrW(69)&ChrW(32)&ChrW(44)&ChrW(89)&ChrW(32)&ChrW(44)&ChrW(55)&ChrW(67)&ChrW(64)&ChrW(62)&ChrW(32)&ChrW(44)&ChrW(62)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(48)&ChrW(55)&ChrW(60)&ChrW(55)&ChrW(68)&ChrW(32)&ChrW(44)&ChrW(72)&ChrW(57)&ChrW(54)&ChrW(67)&ChrW(54)&ChrW(32)&ChrW(44)&ChrW(68)&ChrW(57)&ChrW(59)&ChrW(58)&ChrW(50)&ChrW(58)&ChrW(53)&ChrW(108)) & userid,1)
If rs.eof And rs.bof then
myfkfs = anXinMallEnCo(ChrW(107)&ChrW(69)&ChrW(67)&ChrW(109)&ChrW(107)&ChrW(69)&ChrW(53)&ChrW(32)&ChrW(44)&ChrW(50)&ChrW(61)&ChrW(58)&ChrW(56)&ChrW(63)&ChrW(108)&ChrW(52)&ChrW(54)&ChrW(63)&ChrW(69)&ChrW(54)&ChrW(67)&ChrW(109)&ChrW(87)&ChrW(26237)&ChrW(64)&ChrW(26075)&ChrW(64)&ChrW(20179)&ChrW(64)&ChrW(27449)&ChrW(64)&ChrW(26036)&ChrW(64)&ChrW(24330)&ChrW(64)&ChrW(-29713)&ChrW(64)&ChrW(26121)&ChrW(64)&ChrW(91)&ChrW(-29710)&ChrW(64)&ChrW(21825)&ChrW(64)&ChrW(23473)&ChrW(64)&ChrW(30326)&ChrW(64)&ChrW(24400)&ChrW(64)&ChrW(21513)&ChrW(64)&ChrW(21483)&ChrW(64)&ChrW(28150)&ChrW(64)&ChrW(21147)&ChrW(64)&ChrW(20864)&ChrW(64)&ChrW(23476)&ChrW(64)&ChrW(80)&ChrW(88)&ChrW(107)&ChrW(94)&ChrW(69)&ChrW(53)&ChrW(109)&ChrW(107)&ChrW(94)&ChrW(69)&ChrW(67)&ChrW(109))
else
myfkfs = rs(anXinMallEnCo(ChrW(52)&ChrW(64)&ChrW(63)&ChrW(69)&ChrW(54)&ChrW(63)&ChrW(69)))
End if
rs.Close
Set rs = Nothing
dim mypsfs
set rs=anxinMall.db(anXinMallEnCo(ChrW(68)&ChrW(54)&ChrW(61)&ChrW(54)&ChrW(52)&ChrW(69)&ChrW(32)&ChrW(44)&ChrW(89)&ChrW(32)&ChrW(44)&ChrW(55)&ChrW(67)&ChrW(64)&ChrW(62)&ChrW(32)&ChrW(44)&ChrW(62)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(48)&ChrW(65)&ChrW(68)&ChrW(55)&ChrW(68)&ChrW(32)&ChrW(44)&ChrW(72)&ChrW(57)&ChrW(54)&ChrW(67)&ChrW(54)&ChrW(32)&ChrW(44)&ChrW(68)&ChrW(57)&ChrW(59)&ChrW(58)&ChrW(50)&ChrW(58)&ChrW(53)&ChrW(108)) & userid,1)
If rs.eof And rs.bof then
mypsfs = anXinMallEnCo(ChrW(107)&ChrW(69)&ChrW(67)&ChrW(109)&ChrW(107)&ChrW(69)&ChrW(53)&ChrW(32)&ChrW(44)&ChrW(50)&ChrW(61)&ChrW(58)&ChrW(56)&ChrW(63)&ChrW(108)&ChrW(52)&ChrW(54)&ChrW(63)&ChrW(69)&ChrW(54)&ChrW(67)&ChrW(109)&ChrW(87)&ChrW(26237)&ChrW(64)&ChrW(26075)&ChrW(64)&ChrW(-28344)&ChrW(64)&ChrW(-28676)&ChrW(64)&ChrW(26036)&ChrW(64)&ChrW(24330)&ChrW(64)&ChrW(-29713)&ChrW(64)&ChrW(26121)&ChrW(64)&ChrW(91)&ChrW(-29710)&ChrW(64)&ChrW(21825)&ChrW(64)&ChrW(23473)&ChrW(64)&ChrW(30326)&ChrW(64)&ChrW(24400)&ChrW(64)&ChrW(21513)&ChrW(64)&ChrW(21483)&ChrW(64)&ChrW(28150)&ChrW(64)&ChrW(21147)&ChrW(64)&ChrW(20864)&ChrW(64)&ChrW(23476)&ChrW(64)&ChrW(80)&ChrW(88)&ChrW(107)&ChrW(94)&ChrW(69)&ChrW(53)&ChrW(109)&ChrW(107)&ChrW(94)&ChrW(69)&ChrW(67)&ChrW(109))
else
mypsfs = rs(anXinMallEnCo(ChrW(52)&ChrW(64)&ChrW(63)&ChrW(69)&ChrW(54)&ChrW(63)&ChrW(69)))
End if
rs.Close
Set rs = Nothing
dim productcount : productcount = anxinMall.db(anXinMallEnCo(ChrW(68)&ChrW(54)&ChrW(61)&ChrW(54)&ChrW(52)&ChrW(69)&ChrW(32)&ChrW(44)&ChrW(52)&ChrW(64)&ChrW(70)&ChrW(63)&ChrW(69)&ChrW(87)&ChrW(51)&ChrW(64)&ChrW(64)&ChrW(60)&ChrW(58)&ChrW(53)&ChrW(88)&ChrW(32)&ChrW(44)&ChrW(50)&ChrW(68)&ChrW(32)&ChrW(44)&ChrW(68)&ChrW(70)&ChrW(62)&ChrW(48)&ChrW(65)&ChrW(67)&ChrW(64)&ChrW(53)&ChrW(70)&ChrW(52)&ChrW(69)&ChrW(32)&ChrW(44)&ChrW(55)&ChrW(67)&ChrW(64)&ChrW(62)&ChrW(32)&ChrW(44)&ChrW(44)&ChrW(62)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(48)&ChrW(51)&ChrW(64)&ChrW(64)&ChrW(60)&ChrW(68)&ChrW(46)&ChrW(32)&ChrW(44)&ChrW(72)&ChrW(57)&ChrW(54)&ChrW(67)&ChrW(54)&ChrW(32)&ChrW(44)&ChrW(68)&ChrW(57)&ChrW(59)&ChrW(58)&ChrW(50)&ChrW(58)&ChrW(53)&ChrW(108))&userid,2)(0)
dim TPL
set TPL = New anxinMall_Cls_Template
dim tplDir : tplDir = anXinMallEnCo(ChrW(94)&ChrW(69)&ChrW(65)&ChrW(61)&ChrW(94))&color
call TPL.Load(tplDir&anXinMallEnCo(ChrW(94)&ChrW(50)&ChrW(51)&ChrW(64)&ChrW(70)&ChrW(69)&ChrW(93)&ChrW(69)&ChrW(65)&ChrW(61)))
TPL.Content = anxinMall.ReplaceStr(TPL.Content, anXinMallEnCo(ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(93)&ChrW(52)&ChrW(61)&ChrW(50)&ChrW(68)&ChrW(68)&ChrW(58)&ChrW(53)&ChrW(78)), classid)
TPL.Content = anxinMall.ReplaceStr(TPL.Content, anXinMallEnCo(ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(93)&ChrW(52)&ChrW(61)&ChrW(50)&ChrW(68)&ChrW(68)&ChrW(125)&ChrW(50)&ChrW(62)&ChrW(54)&ChrW(78)), className)
TPL.Content = anxinMall.ReplaceStr(TPL.Content, anXinMallEnCo(ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(93)&ChrW(69)&ChrW(65)&ChrW(61)&ChrW(115)&ChrW(58)&ChrW(67)&ChrW(78)), tplDir)
TPL.Content = anxinMall.ReplaceStr(TPL.Content, anXinMallEnCo(ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(93)&ChrW(70)&ChrW(68)&ChrW(54)&ChrW(67)&ChrW(63)&ChrW(50)&ChrW(62)&ChrW(54)&ChrW(78)), username)
TPL.Content = anxinMall.ReplaceStr(TPL.Content, anXinMallEnCo(ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(93)&ChrW(70)&ChrW(68)&ChrW(54)&ChrW(67)&ChrW(58)&ChrW(53)&ChrW(78)), userid)
TPL.Content = anxinMall.ReplaceStr(TPL.Content, anXinMallEnCo(ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(93)&ChrW(63)&ChrW(50)&ChrW(62)&ChrW(54)&ChrW(78)), name)
TPL.Content = anxinMall.ReplaceStr(TPL.Content, anXinMallEnCo(ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(93)&ChrW(63)&ChrW(50)&ChrW(62)&ChrW(54)&ChrW(97)&ChrW(78)), anxinMall.iif(name2<>"",name2,anXinMallEnCo(ChrW(26405)&ChrW(64)&ChrW(20884)&ChrW(64)&ChrW(24210)&ChrW(64)&ChrW(20022)&ChrW(64)&ChrW(22990)&ChrW(64)&ChrW(21512)&ChrW(64))))
TPL.Content = anxinMall.ReplaceStr(TPL.Content, anXinMallEnCo(ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(93)&ChrW(70)&ChrW(68)&ChrW(54)&ChrW(67)&ChrW(54)&ChrW(62)&ChrW(50)&ChrW(58)&ChrW(61)&ChrW(78)),anxinMall.iif(useremail<>"",useremail,anXinMallEnCo(ChrW(26405)&ChrW(64)&ChrW(22630)&ChrW(64)&ChrW(20884)&ChrW(64)&ChrW(-28503)&ChrW(64)&ChrW(31660)&ChrW(64))))
TPL.Content = anxinMall.ReplaceStr(TPL.Content, anXinMallEnCo(ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(93)&ChrW(53)&ChrW(75)&ChrW(78)),anxinMall.iif(dz<>"",dz,anXinMallEnCo(ChrW(26405)&ChrW(64)&ChrW(22630)&ChrW(64)&ChrW(20884)&ChrW(64)&ChrW(22315)&ChrW(64)&ChrW(22331)&ChrW(64))))
TPL.Content = anxinMall.ReplaceStr(TPL.Content, anXinMallEnCo(ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(93)&ChrW(53)&ChrW(75)&ChrW(96)&ChrW(95)&ChrW(78)), anxinMall.iif(dz<>"",dz,left(dz,10)))
TPL.Content = anxinMall.ReplaceStr(TPL.Content, anXinMallEnCo(ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(93)&ChrW(57)&ChrW(64)&ChrW(62)&ChrW(54)&ChrW(65)&ChrW(50)&ChrW(56)&ChrW(54)&ChrW(78)),anxinMall.iif(homepage<>"",homepage,anXinMallEnCo(ChrW(26405)&ChrW(64)&ChrW(22630)&ChrW(64)&ChrW(20884)&ChrW(64))))
TPL.Content = anxinMall.ReplaceStr(TPL.Content, anXinMallEnCo(ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(93)&ChrW(69)&ChrW(54)&ChrW(61)&ChrW(78)), anxinMall.iif(tel<>"",tel,anXinMallEnCo(ChrW(26405)&ChrW(64)&ChrW(22630)&ChrW(64)&ChrW(20884)&ChrW(64))))
TPL.Content = anxinMall.ReplaceStr(TPL.Content, anXinMallEnCo(ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(93)&ChrW(65)&ChrW(52)&ChrW(78)), anxinMall.iif(pc<>"",pc,anXinMallEnCo(ChrW(26405)&ChrW(64)&ChrW(22630)&ChrW(64)&ChrW(20884)&ChrW(64))))
TPL.Content = anxinMall.ReplaceStr(TPL.Content, anXinMallEnCo(ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(93)&ChrW(64)&ChrW(58)&ChrW(52)&ChrW(66)&ChrW(78)), anxinMall.iif(oicq<>"",oicq,anXinMallEnCo(ChrW(26405)&ChrW(64)&ChrW(22630)&ChrW(64)&ChrW(20884)&ChrW(64))))
TPL.Content = anxinMall.ReplaceStr(TPL.Content, anXinMallEnCo(ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(93)&ChrW(69)&ChrW(50)&ChrW(64)&ChrW(51)&ChrW(50)&ChrW(64)&ChrW(72)&ChrW(50)&ChrW(63)&ChrW(56)&ChrW(72)&ChrW(50)&ChrW(63)&ChrW(56)&ChrW(78)), anxinMall.iif(taobaowangwang<>"",taobaowangwang,anXinMallEnCo(ChrW(26405)&ChrW(64)&ChrW(22630)&ChrW(64)&ChrW(20884)&ChrW(64))))
TPL.Content = anxinMall.ReplaceStr(TPL.Content, anXinMallEnCo(ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(93)&ChrW(75)&ChrW(58)&ChrW(55)&ChrW(70)&ChrW(51)&ChrW(50)&ChrW(64)&ChrW(78)), anxinMall.iif(zifubao<>"",zifubao,anXinMallEnCo(ChrW(26405)&ChrW(64)&ChrW(22630)&ChrW(64)&ChrW(20884)&ChrW(64))))
TPL.Content = anxinMall.ReplaceStr(TPL.Content, anXinMallEnCo(ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(93)&ChrW(50)&ChrW(53)&ChrW(53)&ChrW(115)&ChrW(50)&ChrW(69)&ChrW(54)&ChrW(78)), addDate)
TPL.Content = anxinMall.ReplaceStr(TPL.Content, anXinMallEnCo(ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(93)&ChrW(61)&ChrW(73)&ChrW(78)), lx)
TPL.Content = anxinMall.ReplaceStr(TPL.Content, anXinMallEnCo(ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(93)&ChrW(61)&ChrW(73)&ChrW(72)&ChrW(64)&ChrW(67)&ChrW(53)&ChrW(78)), lxword)
TPL.Content = anxinMall.ReplaceStr(TPL.Content, anXinMallEnCo(ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(93)&ChrW(123)&ChrW(50)&ChrW(68)&ChrW(69)&ChrW(123)&ChrW(64)&ChrW(56)&ChrW(58)&ChrW(63)&ChrW(78)), LastLogin)
TPL.Content = anxinMall.ReplaceStr(TPL.Content, anXinMallEnCo(ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(93)&ChrW(61)&ChrW(64)&ChrW(56)&ChrW(58)&ChrW(63)&ChrW(68)&ChrW(78)), logins)
TPL.Content = anxinMall.ReplaceStr(TPL.Content, anXinMallEnCo(ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(93)&ChrW(69)&ChrW(59)&ChrW(78)), tj)
TPL.Content = anxinMall.ReplaceStr(TPL.Content, anXinMallEnCo(ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(93)&ChrW(71)&ChrW(58)&ChrW(54)&ChrW(72)&ChrW(37)&ChrW(59)&ChrW(33)&ChrW(58)&ChrW(52)&ChrW(78)), viewTjPic)
TPL.Content = anxinMall.ReplaceStr(TPL.Content, anXinMallEnCo(ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(93)&ChrW(61)&ChrW(64)&ChrW(56)&ChrW(64)&ChrW(78)), anxinMall.iif(logo<>"",logo,anXinMallEnCo(ChrW(94)&ChrW(69)&ChrW(65)&ChrW(61)&ChrW(94)&ChrW(58)&ChrW(62)&ChrW(50)&ChrW(56)&ChrW(54)&ChrW(68)&ChrW(94)&ChrW(96)&ChrW(96)&ChrW(48)&ChrW(63)&ChrW(64)&ChrW(48)&ChrW(61)&ChrW(64)&ChrW(56)&ChrW(64)&ChrW(93)&ChrW(56)&ChrW(58)&ChrW(55))))
TPL.Content = anxinMall.ReplaceStr(TPL.Content, anXinMallEnCo(ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(93)&ChrW(61)&ChrW(64)&ChrW(56)&ChrW(64)&ChrW(97)&ChrW(78)), anxinMall.iif(logo2<>"",logo2,anXinMallEnCo(ChrW(94)&ChrW(69)&ChrW(65)&ChrW(61)&ChrW(94)&ChrW(58)&ChrW(62)&ChrW(50)&ChrW(56)&ChrW(54)&ChrW(68)&ChrW(94)&ChrW(63)&ChrW(64)&ChrW(48)&ChrW(55)&ChrW(50)&ChrW(52)&ChrW(54)&ChrW(93)&ChrW(56)&ChrW(58)&ChrW(55))))
TPL.Content = anxinMall.ReplaceStr(TPL.Content, anXinMallEnCo(ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(93)&ChrW(61)&ChrW(64)&ChrW(56)&ChrW(64)&ChrW(53)&ChrW(50)&ChrW(78)), logodaTemp)
TPL.Content = anxinMall.ReplaceStr(TPL.Content, anXinMallEnCo(ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(93)&ChrW(52)&ChrW(64)&ChrW(63)&ChrW(69)&ChrW(54)&ChrW(63)&ChrW(69)&ChrW(78)), anxinMall.iif(content<>"",content,anXinMallEnCo(ChrW(26405)&ChrW(64)&ChrW(22630)&ChrW(64)&ChrW(20884)&ChrW(64))))
TPL.Content = anxinMall.ReplaceStr(TPL.Content, anXinMallEnCo(ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(93)&ChrW(52)&ChrW(64)&ChrW(61)&ChrW(64)&ChrW(67)&ChrW(78)), color)
TPL.Content = anxinMall.ReplaceStr(TPL.Content, anXinMallEnCo(ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(93)&ChrW(69)&ChrW(58)&ChrW(69)&ChrW(61)&ChrW(54)&ChrW(36)&ChrW(-243)&ChrW(57)&ChrW(54)&ChrW(63)&ChrW(55)&ChrW(54)&ChrW(63)&ChrW(78)), titleShenfen)
TPL.Content = anxinMall.ReplaceStr(TPL.Content, anXinMallEnCo(ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(93)&ChrW(69)&ChrW(58)&ChrW(69)&ChrW(61)&ChrW(54)&ChrW(112)&ChrW(61)&ChrW(58)&ChrW(65)&ChrW(50)&ChrW(74)&ChrW(78)), titleAlipay)
TPL.Content = anxinMall.ReplaceStr(TPL.Content, anXinMallEnCo(ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(93)&ChrW(65)&ChrW(67)&ChrW(64)&ChrW(53)&ChrW(70)&ChrW(52)&ChrW(69)&ChrW(52)&ChrW(64)&ChrW(70)&ChrW(63)&ChrW(69)&ChrW(78)), productcount)
TPL.Content = anxinMall.ReplaceStr(TPL.Content, anXinMallEnCo(ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(93)&ChrW(62)&ChrW(74)&ChrW(58)&ChrW(63)&ChrW(69)&ChrW(67)&ChrW(64)&ChrW(78)), anxinMall.iif(myintro<>"",myintro,anXinMallEnCo(ChrW(26405)&ChrW(64)&ChrW(22630)&ChrW(64)&ChrW(20884)&ChrW(64))))
TPL.Content = anxinMall.ReplaceStr(TPL.Content, anXinMallEnCo(ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(93)&ChrW(69)&ChrW(50)&ChrW(64)&ChrW(51)&ChrW(50)&ChrW(64)&ChrW(72)&ChrW(50)&ChrW(63)&ChrW(56)&ChrW(72)&ChrW(50)&ChrW(63)&ChrW(56)&ChrW(78)), anxinMall.iif(taobaowangwang<>"",taobaowangwang,anXinMallEnCo(ChrW(26405)&ChrW(64)&ChrW(22630)&ChrW(64)&ChrW(20884)&ChrW(64))))
TPL.Content = anxinMall.ReplaceStr(TPL.Content, anXinMallEnCo(ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(93)&ChrW(55)&ChrW(50)&ChrW(73)&ChrW(78)), anxinMall.iif(fax<>"",fax,anXinMallEnCo(ChrW(26405)&ChrW(64)&ChrW(22630)&ChrW(64)&ChrW(20884)&ChrW(64))))
TPL.Content = anxinMall.ReplaceStr(TPL.Content, anXinMallEnCo(ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(93)&ChrW(62)&ChrW(74)&ChrW(62)&ChrW(50)&ChrW(65)&ChrW(96)&ChrW(78)), anxinMall.iif(mymap1<>"",mymap1,"11880297,3211925"))
TPL.Content = anxinMall.ReplaceStr(TPL.Content, anXinMallEnCo(ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(93)&ChrW(62)&ChrW(74)&ChrW(55)&ChrW(60)&ChrW(55)&ChrW(68)&ChrW(78)), anxinMall.iif(myfkfs<>"",myfkfs,anXinMallEnCo(ChrW(26405)&ChrW(64)&ChrW(22630)&ChrW(64)&ChrW(20884)&ChrW(64))))
TPL.Content = anxinMall.ReplaceStr(TPL.Content, anXinMallEnCo(ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(93)&ChrW(62)&ChrW(74)&ChrW(65)&ChrW(68)&ChrW(55)&ChrW(68)&ChrW(78)), anxinMall.iif(mypsfs<>"",mypsfs,anXinMallEnCo(ChrW(26405)&ChrW(64)&ChrW(22630)&ChrW(64)&ChrW(20884)&ChrW(64))))
Call TPL.Parser("")
ShopAboutView = TPL.Content
Set TPL = nothing
end function
function ShopNewsView(byval userid)
set rs=anxinMall.db(anXinMallEnCo(ChrW(68)&ChrW(54)&ChrW(61)&ChrW(54)&ChrW(52)&ChrW(69)&ChrW(32)&ChrW(44)&ChrW(89)&ChrW(32)&ChrW(44)&ChrW(55)&ChrW(67)&ChrW(64)&ChrW(62)&ChrW(32)&ChrW(44)&ChrW(44)&ChrW(62)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(48)&ChrW(68)&ChrW(57)&ChrW(59)&ChrW(58)&ChrW(50)&ChrW(46)&ChrW(32)&ChrW(44)&ChrW(72)&ChrW(57)&ChrW(54)&ChrW(67)&ChrW(54)&ChrW(32)&ChrW(44)&ChrW(70)&ChrW(68)&ChrW(54)&ChrW(67)&ChrW(58)&ChrW(53)&ChrW(108))&userid,1)
dim username : username =rs(anXinMallEnCo(ChrW(70)&ChrW(68)&ChrW(54)&ChrW(67)&ChrW(63)&ChrW(50)&ChrW(62)&ChrW(54)))
dim name : name = rs(anXinMallEnCo(ChrW(63)&ChrW(50)&ChrW(62)&ChrW(54)))
dim name2 : name2 = rs(anXinMallEnCo(ChrW(63)&ChrW(50)&ChrW(62)&ChrW(54)&ChrW(97)))
dim useremail : useremail = rs(anXinMallEnCo(ChrW(70)&ChrW(68)&ChrW(54)&ChrW(67)&ChrW(54)&ChrW(62)&ChrW(50)&ChrW(58)&ChrW(61)))
dim dz : dz = rs(anXinMallEnCo(ChrW(53)&ChrW(75)))
dim homepage : homepage = rs(anXinMallEnCo(ChrW(57)&ChrW(64)&ChrW(62)&ChrW(54)&ChrW(65)&ChrW(50)&ChrW(56)&ChrW(54)))
dim tel : tel = rs(anXinMallEnCo(ChrW(69)&ChrW(54)&ChrW(61)))
dim pc : pc = rs(anXinMallEnCo(ChrW(65)&ChrW(52)))
dim oicq : oicq = rs(anXinMallEnCo(ChrW(64)&ChrW(58)&ChrW(52)&ChrW(66)))
dim taobaowangwang : taobaowangwang = rs(anXinMallEnCo(ChrW(69)&ChrW(50)&ChrW(64)&ChrW(51)&ChrW(50)&ChrW(64)&ChrW(72)&ChrW(50)&ChrW(63)&ChrW(56)&ChrW(72)&ChrW(50)&ChrW(63)&ChrW(56)))
dim zifubao : zifubao = rs(anXinMallEnCo(ChrW(75)&ChrW(58)&ChrW(55)&ChrW(70)&ChrW(51)&ChrW(50)&ChrW(64)))
dim addDate : addDate = FORMATDATETIME(rs(anXinMallEnCo(ChrW(50)&ChrW(53)&ChrW(53)&ChrW(53)&ChrW(50)&ChrW(69)&ChrW(54))),vbShortDate)
dim lastlogin : lastlogin = FORMATDATETIME(rs(anXinMallEnCo(ChrW(61)&ChrW(50)&ChrW(68)&ChrW(69)&ChrW(61)&ChrW(64)&ChrW(56)&ChrW(58)&ChrW(63))),vbShortDate)
dim lx : lx = rs(anXinMallEnCo(ChrW(61)&ChrW(73)))
dim tj : tj = rs(anXinMallEnCo(ChrW(69)&ChrW(59)))
dim logo : logo = rs(anXinMallEnCo(ChrW(61)&ChrW(64)&ChrW(56)&ChrW(64)))
dim logo2 : logo2 = rs(anXinMallEnCo(ChrW(61)&ChrW(64)&ChrW(56)&ChrW(64)&ChrW(97)))
dim logoda : logoda = rs(anXinMallEnCo(ChrW(61)&ChrW(64)&ChrW(56)&ChrW(64)&ChrW(53)&ChrW(50)))
dim content : content = rs(anXinMallEnCo(ChrW(52)&ChrW(64)&ChrW(63)&ChrW(69)&ChrW(54)&ChrW(63)&ChrW(69)))
dim color : color = rs(anXinMallEnCo(ChrW(52)&ChrW(64)&ChrW(61)&ChrW(64)&ChrW(67)))
dim rz_shenfenz : rz_shenfenz =rs(anXinMallEnCo(ChrW(67)&ChrW(75)&ChrW(48)&ChrW(68)&ChrW(57)&ChrW(54)&ChrW(63)&ChrW(55)&ChrW(54)&ChrW(63)&ChrW(75)))
dim classid : classid = rs(anXinMallEnCo(ChrW(52)&ChrW(61)&ChrW(50)&ChrW(68)&ChrW(68)&ChrW(58)&ChrW(53)))
dim logins : logins = rs(anXinMallEnCo(ChrW(61)&ChrW(64)&ChrW(56)&ChrW(58)&ChrW(63)&ChrW(68)))
rs.close
set rs=nothing
dim className
set rs=anxinMall.db(anXinMallEnCo(ChrW(68)&ChrW(54)&ChrW(61)&ChrW(54)&ChrW(52)&ChrW(69)&ChrW(32)&ChrW(44)&ChrW(89)&ChrW(32)&ChrW(44)&ChrW(55)&ChrW(67)&ChrW(64)&ChrW(62)&ChrW(32)&ChrW(44)&ChrW(44)&ChrW(62)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(48)&ChrW(52)&ChrW(50)&ChrW(69)&ChrW(46)&ChrW(32)&ChrW(44)&ChrW(72)&ChrW(57)&ChrW(54)&ChrW(67)&ChrW(54)&ChrW(32)&ChrW(44)&ChrW(58)&ChrW(53)&ChrW(108)) & classid,1)
className = left(rs(anXinMallEnCo(ChrW(52)&ChrW(50)&ChrW(69)&ChrW(63)&ChrW(50)&ChrW(62)&ChrW(54))),10)
rs.close
set rs = nothing
dim viewTjPic
select case tj
case 1:viewTjPic = anXinMallEnCo(ChrW(107)&ChrW(58)&ChrW(62)&ChrW(56)&ChrW(32)&ChrW(44)&ChrW(68)&ChrW(67)&ChrW(52)&ChrW(108)&ChrW(94)&ChrW(69)&ChrW(65)&ChrW(61)&ChrW(94)&ChrW(58)&ChrW(62)&ChrW(50)&ChrW(56)&ChrW(54)&ChrW(68)&ChrW(94)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(96)&ChrW(93)&ChrW(56)&ChrW(58)&ChrW(55)&ChrW(109))
case 2:viewTjPic = anXinMallEnCo(ChrW(107)&ChrW(58)&ChrW(62)&ChrW(56)&ChrW(32)&ChrW(44)&ChrW(68)&ChrW(67)&ChrW(52)&ChrW(108)&ChrW(94)&ChrW(69)&ChrW(65)&ChrW(61)&ChrW(94)&ChrW(58)&ChrW(62)&ChrW(50)&ChrW(56)&ChrW(54)&ChrW(68)&ChrW(94)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(97)&ChrW(93)&ChrW(56)&ChrW(58)&ChrW(55)&ChrW(109))
case 3:viewTjPic = anXinMallEnCo(ChrW(107)&ChrW(58)&ChrW(62)&ChrW(56)&ChrW(32)&ChrW(44)&ChrW(68)&ChrW(67)&ChrW(52)&ChrW(108)&ChrW(94)&ChrW(69)&ChrW(65)&ChrW(61)&ChrW(94)&ChrW(58)&ChrW(62)&ChrW(50)&ChrW(56)&ChrW(54)&ChrW(68)&ChrW(94)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(98)&ChrW(93)&ChrW(56)&ChrW(58)&ChrW(55)&ChrW(109))
case 4:viewTjPic = anXinMallEnCo(ChrW(107)&ChrW(58)&ChrW(62)&ChrW(56)&ChrW(32)&ChrW(44)&ChrW(68)&ChrW(67)&ChrW(52)&ChrW(108)&ChrW(94)&ChrW(69)&ChrW(65)&ChrW(61)&ChrW(94)&ChrW(58)&ChrW(62)&ChrW(50)&ChrW(56)&ChrW(54)&ChrW(68)&ChrW(94)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(99)&ChrW(93)&ChrW(56)&ChrW(58)&ChrW(55)&ChrW(109))
case 5:viewTjPic = anXinMallEnCo(ChrW(107)&ChrW(58)&ChrW(62)&ChrW(56)&ChrW(32)&ChrW(44)&ChrW(68)&ChrW(67)&ChrW(52)&ChrW(108)&ChrW(94)&ChrW(69)&ChrW(65)&ChrW(61)&ChrW(94)&ChrW(58)&ChrW(62)&ChrW(50)&ChrW(56)&ChrW(54)&ChrW(68)&ChrW(94)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(100)&ChrW(93)&ChrW(56)&ChrW(58)&ChrW(55)&ChrW(109))
end select
dim mymap1
If homepage<>"" Then:mymap1=homepage:Else:mymap1="11880297,3211925":End if
dim lxword
Select case lx
Case "0":lxword = anXinMallEnCo(ChrW(107)&ChrW(51)&ChrW(109)&ChrW(20005)&ChrW(64)&ChrW(20149)&ChrW(64)&ChrW(32588)&ChrW(64)&ChrW(24210)&ChrW(64)&ChrW(107)&ChrW(94)&ChrW(51)&ChrW(109))
Case "1":lxword = anXinMallEnCo(ChrW(107)&ChrW(55)&ChrW(64)&ChrW(63)&ChrW(69)&ChrW(32)&ChrW(44)&ChrW(52)&ChrW(64)&ChrW(61)&ChrW(64)&ChrW(67)&ChrW(108)&ChrW(56)&ChrW(67)&ChrW(54)&ChrW(54)&ChrW(63)&ChrW(109)&ChrW(107)&ChrW(51)&ChrW(109)&ChrW(23449)&ChrW(64)&ChrW(20302)&ChrW(64)&ChrW(32588)&ChrW(64)&ChrW(24210)&ChrW(64)&ChrW(107)&ChrW(94)&ChrW(51)&ChrW(109)&ChrW(107)&ChrW(94)&ChrW(55)&ChrW(64)&ChrW(63)&ChrW(69)&ChrW(109))
Case "2":lxword = anXinMallEnCo(ChrW(107)&ChrW(55)&ChrW(64)&ChrW(63)&ChrW(69)&ChrW(32)&ChrW(44)&ChrW(52)&ChrW(64)&ChrW(61)&ChrW(64)&ChrW(67)&ChrW(108)&ChrW(67)&ChrW(54)&ChrW(53)&ChrW(109)&ChrW(107)&ChrW(51)&ChrW(109)&ChrW(39)&ChrW(58)&ChrW(65)&ChrW(32588)&ChrW(64)&ChrW(24210)&ChrW(64)&ChrW(107)&ChrW(94)&ChrW(51)&ChrW(109)&ChrW(107)&ChrW(94)&ChrW(55)&ChrW(64)&ChrW(63)&ChrW(69)&ChrW(109))
End select
dim titleShenfen
if rz_shenfenz<>"" then:titleshenfen = anXinMallEnCo(ChrW(24045)&ChrW(64)&ChrW(19973)&ChrW(64)&ChrW(20251)&ChrW(64)&ChrW(-29018)&ChrW(64)&ChrW(20216)&ChrW(64)&ChrW(-29764)&ChrW(64)&ChrW(-29793)&ChrW(64)&ChrW(-29764)&ChrW(64)):else:titleshenfen = anXinMallEnCo(ChrW(26405)&ChrW(64)&ChrW(19973)&ChrW(64)&ChrW(20251)&ChrW(64)&ChrW(-29018)&ChrW(64)&ChrW(20216)&ChrW(64)&ChrW(-29764)&ChrW(64)&ChrW(-29793)&ChrW(64)&ChrW(-29764)&ChrW(64)):end if
dim titleAlipay
if zifubao<>"" then:titleAlipay = anXinMallEnCo(ChrW(-29728)&ChrW(64)&ChrW(21825)&ChrW(64)&ChrW(-27403)&ChrW(64)&ChrW(25898)&ChrW(64)&ChrW(25340)&ChrW(64)&ChrW(25898)&ChrW(64)&ChrW(20179)&ChrW(64)&ChrW(23448)&ChrW(64)&ChrW(20127)&ChrW(64)&ChrW(26126)&ChrW(64)):else:titleAlipay = anXinMallEnCo(ChrW(19976)&ChrW(64)&ChrW(25898)&ChrW(64)&ChrW(25340)&ChrW(64)&ChrW(25898)&ChrW(64)&ChrW(20179)&ChrW(64)&ChrW(23448)&ChrW(64)&ChrW(20127)&ChrW(64)&ChrW(26126)&ChrW(64)):end if
dim prodcount
set rs=anxinMall.db(anXinMallEnCo(ChrW(68)&ChrW(54)&ChrW(61)&ChrW(54)&ChrW(52)&ChrW(69)&ChrW(32)&ChrW(44)&ChrW(89)&ChrW(32)&ChrW(44)&ChrW(55)&ChrW(67)&ChrW(64)&ChrW(62)&ChrW(32)&ChrW(44)&ChrW(44)&ChrW(62)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(48)&ChrW(51)&ChrW(64)&ChrW(64)&ChrW(60)&ChrW(68)&ChrW(46)&ChrW(32)&ChrW(44)&ChrW(72)&ChrW(57)&ChrW(54)&ChrW(67)&ChrW(54)&ChrW(32)&ChrW(44)&ChrW(68)&ChrW(57)&ChrW(59)&ChrW(58)&ChrW(50)&ChrW(58)&ChrW(53)&ChrW(108)) & userid,1)
prodcount  =rs.recordcount
rs.close
set rs = nothing
dim logodaTempWidth,logodaTempHeight,logodaTemp
dim ifhavebanner : ifhavebanner = getTplBanner(color,anXinMallEnCo(ChrW(57)&ChrW(50)&ChrW(71)&ChrW(54)))
if ifhavebanner = anXinMallEnCo(ChrW(74)&ChrW(54)&ChrW(68)) then
logodaTempWidth = getTplBanner(color,anXinMallEnCo(ChrW(72)))
logodaTempHeight = getTplBanner(color,anXinMallEnCo(ChrW(57)))
select case getTplBanner(color,anXinMallEnCo(ChrW(51)&ChrW(50)&ChrW(63)&ChrW(63)&ChrW(54)&ChrW(67)&ChrW(69)&ChrW(74)&ChrW(65)&ChrW(54)))
case anXinMallEnCo(ChrW(59)&ChrW(65)&ChrW(56)&ChrW(48)&ChrW(56)&ChrW(58)&ChrW(55))
if logoda<>"" then
logodaTemp =  anXinMallEnCo(ChrW(107)&ChrW(58)&ChrW(62)&ChrW(56)&ChrW(32)&ChrW(44)&ChrW(68)&ChrW(67)&ChrW(52)&ChrW(108)&ChrW(81))&logoda&anXinMallEnCo(ChrW(81)&ChrW(32)&ChrW(44)&ChrW(57)&ChrW(54)&ChrW(58)&ChrW(56)&ChrW(57)&ChrW(69)&ChrW(108)&ChrW(81))&logodaTempHeight&anXinMallEnCo(ChrW(81)&ChrW(32)&ChrW(44)&ChrW(72)&ChrW(58)&ChrW(53)&ChrW(69)&ChrW(57)&ChrW(108)&ChrW(81))&logodaTempWidth&anXinMallEnCo(ChrW(81)&ChrW(109))
else
logodaTemp =  anXinMallEnCo(ChrW(107)&ChrW(58)&ChrW(62)&ChrW(56)&ChrW(32)&ChrW(44)&ChrW(68)&ChrW(67)&ChrW(52)&ChrW(108)&ChrW(81))&getTplBanner(color,anXinMallEnCo(ChrW(53)&ChrW(54)&ChrW(55)&ChrW(50)&ChrW(70)&ChrW(61)&ChrW(69)))&anXinMallEnCo(ChrW(81)&ChrW(32)&ChrW(44)&ChrW(57)&ChrW(54)&ChrW(58)&ChrW(56)&ChrW(57)&ChrW(69)&ChrW(108)&ChrW(81))&logodaTempHeight&anXinMallEnCo(ChrW(81)&ChrW(32)&ChrW(44)&ChrW(72)&ChrW(58)&ChrW(53)&ChrW(69)&ChrW(57)&ChrW(108)&ChrW(81))&logodaTempWidth&anXinMallEnCo(ChrW(81)&ChrW(109))
end if
case anXinMallEnCo(ChrW(68)&ChrW(72)&ChrW(55))
if logoda<>"" then
select case Right(logoda,3)
case anXinMallEnCo(ChrW(59)&ChrW(65)&ChrW(56)),anXinMallEnCo(ChrW(56)&ChrW(58)&ChrW(55)),anXinMallEnCo(ChrW(65)&ChrW(63)&ChrW(56)),anXinMallEnCo(ChrW(51)&ChrW(62)&ChrW(65)):logodaTemp=anXinMallEnCo(ChrW(107)&ChrW(58)&ChrW(62)&ChrW(56)&ChrW(32)&ChrW(44)&ChrW(68)&ChrW(67)&ChrW(52)&ChrW(108)&ChrW(81))&logoda&anXinMallEnCo(ChrW(81)&ChrW(32)&ChrW(44)&ChrW(57)&ChrW(54)&ChrW(58)&ChrW(56)&ChrW(57)&ChrW(69)&ChrW(108)&ChrW(81))&logodaTempHeight&anXinMallEnCo(ChrW(81)&ChrW(32)&ChrW(44)&ChrW(72)&ChrW(58)&ChrW(53)&ChrW(69)&ChrW(57)&ChrW(108)&ChrW(81))&logodaTempWidth&anXinMallEnCo(ChrW(81)&ChrW(109))
case anXinMallEnCo(ChrW(68)&ChrW(72)&ChrW(55)):logodaTemp=anXinMallEnCo(ChrW(107)&ChrW(54)&ChrW(62)&ChrW(51)&ChrW(54)&ChrW(53)&ChrW(32)&ChrW(44)&ChrW(58)&ChrW(53)&ChrW(108)&ChrW(81)&ChrW(68)&ChrW(57)&ChrW(64)&ChrW(72)&ChrW(48)&ChrW(68)&ChrW(72)&ChrW(55)&ChrW(96)&ChrW(81)&ChrW(32)&ChrW(44)&ChrW(68)&ChrW(67)&ChrW(52)&ChrW(108)&ChrW(81))&logoda&anXinMallEnCo(ChrW(81)&ChrW(32)&ChrW(44)&ChrW(57)&ChrW(54)&ChrW(58)&ChrW(56)&ChrW(57)&ChrW(69)&ChrW(108)&ChrW(81))&logodaTempHeight&anXinMallEnCo(ChrW(81)&ChrW(32)&ChrW(44)&ChrW(72)&ChrW(58)&ChrW(53)&ChrW(69)&ChrW(57)&ChrW(108)&ChrW(81))&logodaTempWidth&anXinMallEnCo(ChrW(81)&ChrW(32)&ChrW(44)&ChrW(72)&ChrW(62)&ChrW(64)&ChrW(53)&ChrW(54)&ChrW(108)&ChrW(81)&ChrW(69)&ChrW(67)&ChrW(50)&ChrW(63)&ChrW(68)&ChrW(65)&ChrW(50)&ChrW(67)&ChrW(54)&ChrW(63)&ChrW(69)&ChrW(81)&ChrW(32)&ChrW(44)&ChrW(69)&ChrW(74)&ChrW(65)&ChrW(54)&ChrW(108)&ChrW(81)&ChrW(50)&ChrW(65)&ChrW(65)&ChrW(61)&ChrW(58)&ChrW(52)&ChrW(50)&ChrW(69)&ChrW(58)&ChrW(64)&ChrW(63)&ChrW(94)&ChrW(73)&ChrW(92)&ChrW(68)&ChrW(57)&ChrW(64)&ChrW(52)&ChrW(60)&ChrW(72)&ChrW(50)&ChrW(71)&ChrW(54)&ChrW(92)&ChrW(55)&ChrW(61)&ChrW(50)&ChrW(68)&ChrW(57)&ChrW(81)&ChrW(109))
end select
else
logodaTemp =  anXinMallEnCo(ChrW(107)&ChrW(54)&ChrW(62)&ChrW(51)&ChrW(54)&ChrW(53)&ChrW(32)&ChrW(44)&ChrW(58)&ChrW(53)&ChrW(108)&ChrW(81)&ChrW(68)&ChrW(57)&ChrW(64)&ChrW(72)&ChrW(48)&ChrW(68)&ChrW(72)&ChrW(55)&ChrW(96)&ChrW(81)&ChrW(32)&ChrW(44)&ChrW(68)&ChrW(67)&ChrW(52)&ChrW(108)&ChrW(81))&getTplBanner(color,anXinMallEnCo(ChrW(53)&ChrW(54)&ChrW(55)&ChrW(50)&ChrW(70)&ChrW(61)&ChrW(69)))&anXinMallEnCo(ChrW(81)&ChrW(32)&ChrW(44)&ChrW(57)&ChrW(54)&ChrW(58)&ChrW(56)&ChrW(57)&ChrW(69)&ChrW(108)&ChrW(81))&logodaTempHeight&anXinMallEnCo(ChrW(81)&ChrW(32)&ChrW(44)&ChrW(72)&ChrW(58)&ChrW(53)&ChrW(69)&ChrW(57)&ChrW(108)&ChrW(81))&logodaTempWidth&anXinMallEnCo(ChrW(81)&ChrW(32)&ChrW(44)&ChrW(72)&ChrW(62)&ChrW(64)&ChrW(53)&ChrW(54)&ChrW(108)&ChrW(81)&ChrW(69)&ChrW(67)&ChrW(50)&ChrW(63)&ChrW(68)&ChrW(65)&ChrW(50)&ChrW(67)&ChrW(54)&ChrW(63)&ChrW(69)&ChrW(81)&ChrW(32)&ChrW(44)&ChrW(69)&ChrW(74)&ChrW(65)&ChrW(54)&ChrW(108)&ChrW(81)&ChrW(50)&ChrW(65)&ChrW(65)&ChrW(61)&ChrW(58)&ChrW(52)&ChrW(50)&ChrW(69)&ChrW(58)&ChrW(64)&ChrW(63)&ChrW(94)&ChrW(73)&ChrW(92)&ChrW(68)&ChrW(57)&ChrW(64)&ChrW(52)&ChrW(60)&ChrW(72)&ChrW(50)&ChrW(71)&ChrW(54)&ChrW(92)&ChrW(55)&ChrW(61)&ChrW(50)&ChrW(68)&ChrW(57)&ChrW(81)&ChrW(109))
end if
end select
else
logodaTemp = anXinMallEnCo(ChrW(26407)&ChrW(64)&ChrW(27164)&ChrW(64)&ChrW(29251)&ChrW(64)&ChrW(19976)&ChrW(64)&ChrW(25898)&ChrW(64)&ChrW(25340)&ChrW(64)&ChrW(19973)&ChrW(64)&ChrW(20251)&ChrW(64)&ChrW(24210)&ChrW(64)&ChrW(25302)&ChrW(64)&ChrW(91)&ChrW(19976)&ChrW(64)&ChrW(-26885)&ChrW(64)&ChrW(-30340)&ChrW(64)&ChrW(22307)&ChrW(64)&ChrW(27164)&ChrW(64)&ChrW(29251)&ChrW(64)&ChrW(20008)&ChrW(64)&ChrW(21147)&ChrW(64)&ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(93)&ChrW(61)&ChrW(64)&ChrW(56)&ChrW(64)&ChrW(53)&ChrW(50)&ChrW(78)&ChrW(26626)&ChrW(64)&ChrW(31609)&ChrW(64)&ChrW(12290)&ChrW(44))
end if
dim productcount : productcount = anxinMall.db(anXinMallEnCo(ChrW(68)&ChrW(54)&ChrW(61)&ChrW(54)&ChrW(52)&ChrW(69)&ChrW(32)&ChrW(44)&ChrW(52)&ChrW(64)&ChrW(70)&ChrW(63)&ChrW(69)&ChrW(87)&ChrW(51)&ChrW(64)&ChrW(64)&ChrW(60)&ChrW(58)&ChrW(53)&ChrW(88)&ChrW(32)&ChrW(44)&ChrW(50)&ChrW(68)&ChrW(32)&ChrW(44)&ChrW(68)&ChrW(70)&ChrW(62)&ChrW(48)&ChrW(65)&ChrW(67)&ChrW(64)&ChrW(53)&ChrW(70)&ChrW(52)&ChrW(69)&ChrW(32)&ChrW(44)&ChrW(55)&ChrW(67)&ChrW(64)&ChrW(62)&ChrW(32)&ChrW(44)&ChrW(44)&ChrW(62)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(48)&ChrW(51)&ChrW(64)&ChrW(64)&ChrW(60)&ChrW(68)&ChrW(46)&ChrW(32)&ChrW(44)&ChrW(72)&ChrW(57)&ChrW(54)&ChrW(67)&ChrW(54)&ChrW(32)&ChrW(44)&ChrW(68)&ChrW(57)&ChrW(59)&ChrW(58)&ChrW(50)&ChrW(58)&ChrW(53)&ChrW(108))&userid,2)(0)
dim page : page = anxinMall.leachstr(request.querystring(anXinMallEnCo(ChrW(65)&ChrW(50)&ChrW(56)&ChrW(54))),1)
if page="" then page = 1
dim TPL
set TPL = New anxinMall_Cls_Template
dim tplDir : tplDir = anXinMallEnCo(ChrW(94)&ChrW(69)&ChrW(65)&ChrW(61)&ChrW(94))&color
call TPL.Load(tplDir&anXinMallEnCo(ChrW(94)&ChrW(63)&ChrW(54)&ChrW(72)&ChrW(68)&ChrW(93)&ChrW(69)&ChrW(65)&ChrW(61)))
TPL.Content = anxinMall.ReplaceStr(TPL.Content, anXinMallEnCo(ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(93)&ChrW(52)&ChrW(61)&ChrW(50)&ChrW(68)&ChrW(68)&ChrW(58)&ChrW(53)&ChrW(78)), classid)
TPL.Content = anxinMall.ReplaceStr(TPL.Content, anXinMallEnCo(ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(93)&ChrW(52)&ChrW(61)&ChrW(50)&ChrW(68)&ChrW(68)&ChrW(125)&ChrW(50)&ChrW(62)&ChrW(54)&ChrW(78)), className)
TPL.Content = anxinMall.ReplaceStr(TPL.Content, anXinMallEnCo(ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(93)&ChrW(69)&ChrW(65)&ChrW(61)&ChrW(115)&ChrW(58)&ChrW(67)&ChrW(78)), tplDir)
TPL.Content = anxinMall.ReplaceStr(TPL.Content, anXinMallEnCo(ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(93)&ChrW(70)&ChrW(68)&ChrW(54)&ChrW(67)&ChrW(63)&ChrW(50)&ChrW(62)&ChrW(54)&ChrW(78)), username)
TPL.Content = anxinMall.ReplaceStr(TPL.Content, anXinMallEnCo(ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(93)&ChrW(70)&ChrW(68)&ChrW(54)&ChrW(67)&ChrW(58)&ChrW(53)&ChrW(78)), userid)
TPL.Content = anxinMall.ReplaceStr(TPL.Content, anXinMallEnCo(ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(93)&ChrW(63)&ChrW(50)&ChrW(62)&ChrW(54)&ChrW(78)), name)
TPL.Content = anxinMall.ReplaceStr(TPL.Content, anXinMallEnCo(ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(93)&ChrW(63)&ChrW(50)&ChrW(62)&ChrW(54)&ChrW(97)&ChrW(78)), anxinMall.iif(name2<>"",name2,anXinMallEnCo(ChrW(26405)&ChrW(64)&ChrW(20884)&ChrW(64)&ChrW(24210)&ChrW(64)&ChrW(20022)&ChrW(64)&ChrW(22990)&ChrW(64)&ChrW(21512)&ChrW(64))))
TPL.Content = anxinMall.ReplaceStr(TPL.Content, anXinMallEnCo(ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(93)&ChrW(70)&ChrW(68)&ChrW(54)&ChrW(67)&ChrW(54)&ChrW(62)&ChrW(50)&ChrW(58)&ChrW(61)&ChrW(78)),anxinMall.iif(useremail<>"",useremail,anXinMallEnCo(ChrW(26405)&ChrW(64)&ChrW(22630)&ChrW(64)&ChrW(20884)&ChrW(64)&ChrW(-28503)&ChrW(64)&ChrW(31660)&ChrW(64))))
TPL.Content = anxinMall.ReplaceStr(TPL.Content, anXinMallEnCo(ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(93)&ChrW(53)&ChrW(75)&ChrW(78)),anxinMall.iif(dz<>"",dz,anXinMallEnCo(ChrW(26405)&ChrW(64)&ChrW(22630)&ChrW(64)&ChrW(20884)&ChrW(64)&ChrW(22315)&ChrW(64)&ChrW(22331)&ChrW(64))))
TPL.Content = anxinMall.ReplaceStr(TPL.Content, anXinMallEnCo(ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(93)&ChrW(53)&ChrW(75)&ChrW(96)&ChrW(95)&ChrW(78)), anxinMall.iif(dz<>"",dz,left(dz,10)))
TPL.Content = anxinMall.ReplaceStr(TPL.Content, anXinMallEnCo(ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(93)&ChrW(57)&ChrW(64)&ChrW(62)&ChrW(54)&ChrW(65)&ChrW(50)&ChrW(56)&ChrW(54)&ChrW(78)),anxinMall.iif(homepage<>"",homepage,anXinMallEnCo(ChrW(26405)&ChrW(64)&ChrW(22630)&ChrW(64)&ChrW(20884)&ChrW(64))))
TPL.Content = anxinMall.ReplaceStr(TPL.Content, anXinMallEnCo(ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(93)&ChrW(69)&ChrW(54)&ChrW(61)&ChrW(78)), anxinMall.iif(tel<>"",tel,anXinMallEnCo(ChrW(26405)&ChrW(64)&ChrW(22630)&ChrW(64)&ChrW(20884)&ChrW(64))))
TPL.Content = anxinMall.ReplaceStr(TPL.Content, anXinMallEnCo(ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(93)&ChrW(65)&ChrW(52)&ChrW(78)), anxinMall.iif(pc<>"",pc,anXinMallEnCo(ChrW(26405)&ChrW(64)&ChrW(22630)&ChrW(64)&ChrW(20884)&ChrW(64))))
TPL.Content = anxinMall.ReplaceStr(TPL.Content, anXinMallEnCo(ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(93)&ChrW(64)&ChrW(58)&ChrW(52)&ChrW(66)&ChrW(78)), anxinMall.iif(oicq<>"",oicq,anXinMallEnCo(ChrW(26405)&ChrW(64)&ChrW(22630)&ChrW(64)&ChrW(20884)&ChrW(64))))
TPL.Content = anxinMall.ReplaceStr(TPL.Content, anXinMallEnCo(ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(93)&ChrW(69)&ChrW(50)&ChrW(64)&ChrW(51)&ChrW(50)&ChrW(64)&ChrW(72)&ChrW(50)&ChrW(63)&ChrW(56)&ChrW(72)&ChrW(50)&ChrW(63)&ChrW(56)&ChrW(78)), anxinMall.iif(taobaowangwang<>"",taobaowangwang,anXinMallEnCo(ChrW(26405)&ChrW(64)&ChrW(22630)&ChrW(64)&ChrW(20884)&ChrW(64))))
TPL.Content = anxinMall.ReplaceStr(TPL.Content, anXinMallEnCo(ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(93)&ChrW(75)&ChrW(58)&ChrW(55)&ChrW(70)&ChrW(51)&ChrW(50)&ChrW(64)&ChrW(78)), anxinMall.iif(zifubao<>"",zifubao,anXinMallEnCo(ChrW(26405)&ChrW(64)&ChrW(22630)&ChrW(64)&ChrW(20884)&ChrW(64))))
TPL.Content = anxinMall.ReplaceStr(TPL.Content, anXinMallEnCo(ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(93)&ChrW(50)&ChrW(53)&ChrW(53)&ChrW(115)&ChrW(50)&ChrW(69)&ChrW(54)&ChrW(78)), addDate)
TPL.Content = anxinMall.ReplaceStr(TPL.Content, anXinMallEnCo(ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(93)&ChrW(61)&ChrW(73)&ChrW(78)), lx)
TPL.Content = anxinMall.ReplaceStr(TPL.Content, anXinMallEnCo(ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(93)&ChrW(61)&ChrW(73)&ChrW(72)&ChrW(64)&ChrW(67)&ChrW(53)&ChrW(78)), lxword)
TPL.Content = anxinMall.ReplaceStr(TPL.Content, anXinMallEnCo(ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(93)&ChrW(123)&ChrW(50)&ChrW(68)&ChrW(69)&ChrW(123)&ChrW(64)&ChrW(56)&ChrW(58)&ChrW(63)&ChrW(78)), LastLogin)
TPL.Content = anxinMall.ReplaceStr(TPL.Content, anXinMallEnCo(ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(93)&ChrW(61)&ChrW(64)&ChrW(56)&ChrW(58)&ChrW(63)&ChrW(68)&ChrW(78)), logins)
TPL.Content = anxinMall.ReplaceStr(TPL.Content, anXinMallEnCo(ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(93)&ChrW(69)&ChrW(59)&ChrW(78)), tj)
TPL.Content = anxinMall.ReplaceStr(TPL.Content, anXinMallEnCo(ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(93)&ChrW(71)&ChrW(58)&ChrW(54)&ChrW(72)&ChrW(37)&ChrW(59)&ChrW(33)&ChrW(58)&ChrW(52)&ChrW(78)), viewTjPic)
TPL.Content = anxinMall.ReplaceStr(TPL.Content, anXinMallEnCo(ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(93)&ChrW(61)&ChrW(64)&ChrW(56)&ChrW(64)&ChrW(78)), anxinMall.iif(logo<>"",logo,anXinMallEnCo(ChrW(94)&ChrW(69)&ChrW(65)&ChrW(61)&ChrW(94)&ChrW(58)&ChrW(62)&ChrW(50)&ChrW(56)&ChrW(54)&ChrW(68)&ChrW(94)&ChrW(96)&ChrW(96)&ChrW(48)&ChrW(63)&ChrW(64)&ChrW(48)&ChrW(61)&ChrW(64)&ChrW(56)&ChrW(64)&ChrW(93)&ChrW(56)&ChrW(58)&ChrW(55))))
TPL.Content = anxinMall.ReplaceStr(TPL.Content, anXinMallEnCo(ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(93)&ChrW(61)&ChrW(64)&ChrW(56)&ChrW(64)&ChrW(97)&ChrW(78)), anxinMall.iif(logo2<>"",logo2,anXinMallEnCo(ChrW(94)&ChrW(69)&ChrW(65)&ChrW(61)&ChrW(94)&ChrW(58)&ChrW(62)&ChrW(50)&ChrW(56)&ChrW(54)&ChrW(68)&ChrW(94)&ChrW(63)&ChrW(64)&ChrW(48)&ChrW(55)&ChrW(50)&ChrW(52)&ChrW(54)&ChrW(93)&ChrW(56)&ChrW(58)&ChrW(55))))
TPL.Content = anxinMall.ReplaceStr(TPL.Content, anXinMallEnCo(ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(93)&ChrW(61)&ChrW(64)&ChrW(56)&ChrW(64)&ChrW(53)&ChrW(50)&ChrW(78)), logodaTemp)
TPL.Content = anxinMall.ReplaceStr(TPL.Content, anXinMallEnCo(ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(93)&ChrW(52)&ChrW(64)&ChrW(63)&ChrW(69)&ChrW(54)&ChrW(63)&ChrW(69)&ChrW(78)), anxinMall.iif(content<>"",content,anXinMallEnCo(ChrW(26405)&ChrW(64)&ChrW(22630)&ChrW(64)&ChrW(20884)&ChrW(64))))
TPL.Content = anxinMall.ReplaceStr(TPL.Content, anXinMallEnCo(ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(93)&ChrW(62)&ChrW(74)&ChrW(62)&ChrW(50)&ChrW(65)&ChrW(96)&ChrW(78)), anxinMall.iif(mymap1<>"",mymap1,"11880297,3211925"))
TPL.Content = anxinMall.ReplaceStr(TPL.Content, anXinMallEnCo(ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(93)&ChrW(52)&ChrW(64)&ChrW(61)&ChrW(64)&ChrW(67)&ChrW(78)), color)
TPL.Content = anxinMall.ReplaceStr(TPL.Content, anXinMallEnCo(ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(93)&ChrW(65)&ChrW(67)&ChrW(64)&ChrW(53)&ChrW(70)&ChrW(52)&ChrW(69)&ChrW(52)&ChrW(64)&ChrW(70)&ChrW(63)&ChrW(69)&ChrW(78)), productcount)
TPL.Content = anxinMall.ReplaceStr(TPL.Content, anXinMallEnCo(ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(93)&ChrW(69)&ChrW(58)&ChrW(69)&ChrW(61)&ChrW(54)&ChrW(36)&ChrW(-243)&ChrW(57)&ChrW(54)&ChrW(63)&ChrW(55)&ChrW(54)&ChrW(63)&ChrW(78)), titleShenfen)
TPL.Content = anxinMall.ReplaceStr(TPL.Content, anXinMallEnCo(ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(93)&ChrW(69)&ChrW(58)&ChrW(69)&ChrW(61)&ChrW(54)&ChrW(112)&ChrW(61)&ChrW(58)&ChrW(65)&ChrW(50)&ChrW(74)&ChrW(78)), titleAlipay)
TPL.Content = anxinMall.ReplaceStr(TPL.Content, anXinMallEnCo(ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(93)&ChrW(61)&ChrW(64)&ChrW(56)&ChrW(58)&ChrW(63)&ChrW(68)&ChrW(78)), logins)
TPL.Table = anXinMallEnCo(ChrW(62)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(48)&ChrW(63)&ChrW(54)&ChrW(72)&ChrW(68))
TPL.Where = anXinMallEnCo(ChrW(32)&ChrW(44)&ChrW(68)&ChrW(57)&ChrW(59)&ChrW(58)&ChrW(50)&ChrW(58)&ChrW(53)&ChrW(108))&userid
TPL.Order = anXinMallEnCo(ChrW(32)&ChrW(44)&ChrW(44)&ChrW(50)&ChrW(53)&ChrW(53)&ChrW(69)&ChrW(58)&ChrW(62)&ChrW(54)&ChrW(46)&ChrW(32)&ChrW(44)&ChrW(53)&ChrW(54)&ChrW(68)&ChrW(52))
TPL.Page = Page
TPL.PageBreak = anXinMallEnCo(ChrW(94)&ChrW(69)&ChrW(65)&ChrW(61)&ChrW(94))&color&anXinMallEnCo(ChrW(94)&ChrW(63)&ChrW(54)&ChrW(72)&ChrW(68)&ChrW(93)&ChrW(50)&ChrW(68)&ChrW(65)&ChrW(110)&ChrW(58)&ChrW(53)&ChrW(108))&userid&anXinMallEnCo(ChrW(85)&ChrW(65)&ChrW(50)&ChrW(56)&ChrW(54)&ChrW(108)&ChrW(76)&ChrW(65)&ChrW(50)&ChrW(56)&ChrW(54)&ChrW(78))
Call TPL.Parser2(anXinMallEnCo(ChrW(63)&ChrW(54)&ChrW(72)&ChrW(68)&ChrW(58)&ChrW(53)))
ShopNewsView = TPL.Content
Set TPL = nothing
end function
function ShopProdView(byval userid)
set rs=anxinMall.db(anXinMallEnCo(ChrW(68)&ChrW(54)&ChrW(61)&ChrW(54)&ChrW(52)&ChrW(69)&ChrW(32)&ChrW(44)&ChrW(89)&ChrW(32)&ChrW(44)&ChrW(55)&ChrW(67)&ChrW(64)&ChrW(62)&ChrW(32)&ChrW(44)&ChrW(44)&ChrW(62)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(48)&ChrW(68)&ChrW(57)&ChrW(59)&ChrW(58)&ChrW(50)&ChrW(46)&ChrW(32)&ChrW(44)&ChrW(72)&ChrW(57)&ChrW(54)&ChrW(67)&ChrW(54)&ChrW(32)&ChrW(44)&ChrW(70)&ChrW(68)&ChrW(54)&ChrW(67)&ChrW(58)&ChrW(53)&ChrW(108))&userid,1)
dim username : username =rs(anXinMallEnCo(ChrW(70)&ChrW(68)&ChrW(54)&ChrW(67)&ChrW(63)&ChrW(50)&ChrW(62)&ChrW(54)))
dim name : name = rs(anXinMallEnCo(ChrW(63)&ChrW(50)&ChrW(62)&ChrW(54)))
dim name2 : name2 = rs(anXinMallEnCo(ChrW(63)&ChrW(50)&ChrW(62)&ChrW(54)&ChrW(97)))
dim useremail : useremail = rs(anXinMallEnCo(ChrW(70)&ChrW(68)&ChrW(54)&ChrW(67)&ChrW(54)&ChrW(62)&ChrW(50)&ChrW(58)&ChrW(61)))
dim dz : dz = rs(anXinMallEnCo(ChrW(53)&ChrW(75)))
dim homepage : homepage = rs(anXinMallEnCo(ChrW(57)&ChrW(64)&ChrW(62)&ChrW(54)&ChrW(65)&ChrW(50)&ChrW(56)&ChrW(54)))
dim tel : tel = rs(anXinMallEnCo(ChrW(69)&ChrW(54)&ChrW(61)))
dim pc : pc = rs(anXinMallEnCo(ChrW(65)&ChrW(52)))
dim oicq : oicq = rs(anXinMallEnCo(ChrW(64)&ChrW(58)&ChrW(52)&ChrW(66)))
dim taobaowangwang : taobaowangwang = rs(anXinMallEnCo(ChrW(69)&ChrW(50)&ChrW(64)&ChrW(51)&ChrW(50)&ChrW(64)&ChrW(72)&ChrW(50)&ChrW(63)&ChrW(56)&ChrW(72)&ChrW(50)&ChrW(63)&ChrW(56)))
dim zifubao : zifubao = rs(anXinMallEnCo(ChrW(75)&ChrW(58)&ChrW(55)&ChrW(70)&ChrW(51)&ChrW(50)&ChrW(64)))
dim addDate : addDate = FORMATDATETIME(rs(anXinMallEnCo(ChrW(50)&ChrW(53)&ChrW(53)&ChrW(53)&ChrW(50)&ChrW(69)&ChrW(54))),vbShortDate)
dim lastlogin : lastlogin = FORMATDATETIME(rs(anXinMallEnCo(ChrW(61)&ChrW(50)&ChrW(68)&ChrW(69)&ChrW(61)&ChrW(64)&ChrW(56)&ChrW(58)&ChrW(63))),vbShortDate)
dim lx : lx = rs(anXinMallEnCo(ChrW(61)&ChrW(73)))
dim tj : tj = rs(anXinMallEnCo(ChrW(69)&ChrW(59)))
dim logo : logo = rs(anXinMallEnCo(ChrW(61)&ChrW(64)&ChrW(56)&ChrW(64)))
dim logo2 : logo2 = rs(anXinMallEnCo(ChrW(61)&ChrW(64)&ChrW(56)&ChrW(64)&ChrW(97)))
dim logoda : logoda = rs(anXinMallEnCo(ChrW(61)&ChrW(64)&ChrW(56)&ChrW(64)&ChrW(53)&ChrW(50)))
dim content : content = rs(anXinMallEnCo(ChrW(52)&ChrW(64)&ChrW(63)&ChrW(69)&ChrW(54)&ChrW(63)&ChrW(69)))
dim color : color = rs(anXinMallEnCo(ChrW(52)&ChrW(64)&ChrW(61)&ChrW(64)&ChrW(67)))
dim rz_shenfenz : rz_shenfenz =rs(anXinMallEnCo(ChrW(67)&ChrW(75)&ChrW(48)&ChrW(68)&ChrW(57)&ChrW(54)&ChrW(63)&ChrW(55)&ChrW(54)&ChrW(63)&ChrW(75)))
dim classid : classid = rs(anXinMallEnCo(ChrW(52)&ChrW(61)&ChrW(50)&ChrW(68)&ChrW(68)&ChrW(58)&ChrW(53)))
dim logins : logins = rs(anXinMallEnCo(ChrW(61)&ChrW(64)&ChrW(56)&ChrW(58)&ChrW(63)&ChrW(68)))
rs.close
set rs=nothing
dim className
set rs=anxinMall.db(anXinMallEnCo(ChrW(68)&ChrW(54)&ChrW(61)&ChrW(54)&ChrW(52)&ChrW(69)&ChrW(32)&ChrW(44)&ChrW(89)&ChrW(32)&ChrW(44)&ChrW(55)&ChrW(67)&ChrW(64)&ChrW(62)&ChrW(32)&ChrW(44)&ChrW(44)&ChrW(62)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(48)&ChrW(52)&ChrW(50)&ChrW(69)&ChrW(46)&ChrW(32)&ChrW(44)&ChrW(72)&ChrW(57)&ChrW(54)&ChrW(67)&ChrW(54)&ChrW(32)&ChrW(44)&ChrW(58)&ChrW(53)&ChrW(108)) & classid,1)
className = left(rs(anXinMallEnCo(ChrW(52)&ChrW(50)&ChrW(69)&ChrW(63)&ChrW(50)&ChrW(62)&ChrW(54))),10)
rs.close
set rs = nothing
dim viewTjPic
select case tj
case 1:viewTjPic = anXinMallEnCo(ChrW(107)&ChrW(58)&ChrW(62)&ChrW(56)&ChrW(32)&ChrW(44)&ChrW(68)&ChrW(67)&ChrW(52)&ChrW(108)&ChrW(94)&ChrW(69)&ChrW(65)&ChrW(61)&ChrW(94)&ChrW(58)&ChrW(62)&ChrW(50)&ChrW(56)&ChrW(54)&ChrW(68)&ChrW(94)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(96)&ChrW(93)&ChrW(56)&ChrW(58)&ChrW(55)&ChrW(109))
case 2:viewTjPic = anXinMallEnCo(ChrW(107)&ChrW(58)&ChrW(62)&ChrW(56)&ChrW(32)&ChrW(44)&ChrW(68)&ChrW(67)&ChrW(52)&ChrW(108)&ChrW(94)&ChrW(69)&ChrW(65)&ChrW(61)&ChrW(94)&ChrW(58)&ChrW(62)&ChrW(50)&ChrW(56)&ChrW(54)&ChrW(68)&ChrW(94)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(97)&ChrW(93)&ChrW(56)&ChrW(58)&ChrW(55)&ChrW(109))
case 3:viewTjPic = anXinMallEnCo(ChrW(107)&ChrW(58)&ChrW(62)&ChrW(56)&ChrW(32)&ChrW(44)&ChrW(68)&ChrW(67)&ChrW(52)&ChrW(108)&ChrW(94)&ChrW(69)&ChrW(65)&ChrW(61)&ChrW(94)&ChrW(58)&ChrW(62)&ChrW(50)&ChrW(56)&ChrW(54)&ChrW(68)&ChrW(94)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(98)&ChrW(93)&ChrW(56)&ChrW(58)&ChrW(55)&ChrW(109))
case 4:viewTjPic = anXinMallEnCo(ChrW(107)&ChrW(58)&ChrW(62)&ChrW(56)&ChrW(32)&ChrW(44)&ChrW(68)&ChrW(67)&ChrW(52)&ChrW(108)&ChrW(94)&ChrW(69)&ChrW(65)&ChrW(61)&ChrW(94)&ChrW(58)&ChrW(62)&ChrW(50)&ChrW(56)&ChrW(54)&ChrW(68)&ChrW(94)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(99)&ChrW(93)&ChrW(56)&ChrW(58)&ChrW(55)&ChrW(109))
case 5:viewTjPic = anXinMallEnCo(ChrW(107)&ChrW(58)&ChrW(62)&ChrW(56)&ChrW(32)&ChrW(44)&ChrW(68)&ChrW(67)&ChrW(52)&ChrW(108)&ChrW(94)&ChrW(69)&ChrW(65)&ChrW(61)&ChrW(94)&ChrW(58)&ChrW(62)&ChrW(50)&ChrW(56)&ChrW(54)&ChrW(68)&ChrW(94)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(100)&ChrW(93)&ChrW(56)&ChrW(58)&ChrW(55)&ChrW(109))
end select
dim mymap1
If homepage<>"" Then:mymap1=homepage:Else:mymap1="11880297,3211925":End if
dim lxword
Select case lx
Case "0":lxword = anXinMallEnCo(ChrW(107)&ChrW(51)&ChrW(109)&ChrW(20005)&ChrW(64)&ChrW(20149)&ChrW(64)&ChrW(32588)&ChrW(64)&ChrW(24210)&ChrW(64)&ChrW(107)&ChrW(94)&ChrW(51)&ChrW(109))
Case "1":lxword = anXinMallEnCo(ChrW(107)&ChrW(55)&ChrW(64)&ChrW(63)&ChrW(69)&ChrW(32)&ChrW(44)&ChrW(52)&ChrW(64)&ChrW(61)&ChrW(64)&ChrW(67)&ChrW(108)&ChrW(56)&ChrW(67)&ChrW(54)&ChrW(54)&ChrW(63)&ChrW(109)&ChrW(107)&ChrW(51)&ChrW(109)&ChrW(23449)&ChrW(64)&ChrW(20302)&ChrW(64)&ChrW(32588)&ChrW(64)&ChrW(24210)&ChrW(64)&ChrW(107)&ChrW(94)&ChrW(51)&ChrW(109)&ChrW(107)&ChrW(94)&ChrW(55)&ChrW(64)&ChrW(63)&ChrW(69)&ChrW(109))
Case "2":lxword = anXinMallEnCo(ChrW(107)&ChrW(55)&ChrW(64)&ChrW(63)&ChrW(69)&ChrW(32)&ChrW(44)&ChrW(52)&ChrW(64)&ChrW(61)&ChrW(64)&ChrW(67)&ChrW(108)&ChrW(67)&ChrW(54)&ChrW(53)&ChrW(109)&ChrW(107)&ChrW(51)&ChrW(109)&ChrW(39)&ChrW(58)&ChrW(65)&ChrW(32588)&ChrW(64)&ChrW(24210)&ChrW(64)&ChrW(107)&ChrW(94)&ChrW(51)&ChrW(109)&ChrW(107)&ChrW(94)&ChrW(55)&ChrW(64)&ChrW(63)&ChrW(69)&ChrW(109))
End select
dim titleShenfen
if rz_shenfenz<>"" then:titleshenfen = anXinMallEnCo(ChrW(24045)&ChrW(64)&ChrW(19973)&ChrW(64)&ChrW(20251)&ChrW(64)&ChrW(-29018)&ChrW(64)&ChrW(20216)&ChrW(64)&ChrW(-29764)&ChrW(64)&ChrW(-29793)&ChrW(64)&ChrW(-29764)&ChrW(64)):else:titleshenfen = anXinMallEnCo(ChrW(26405)&ChrW(64)&ChrW(19973)&ChrW(64)&ChrW(20251)&ChrW(64)&ChrW(-29018)&ChrW(64)&ChrW(20216)&ChrW(64)&ChrW(-29764)&ChrW(64)&ChrW(-29793)&ChrW(64)&ChrW(-29764)&ChrW(64)):end if
dim titleAlipay
if zifubao<>"" then:titleAlipay = anXinMallEnCo(ChrW(-29728)&ChrW(64)&ChrW(21825)&ChrW(64)&ChrW(-27403)&ChrW(64)&ChrW(25898)&ChrW(64)&ChrW(25340)&ChrW(64)&ChrW(25898)&ChrW(64)&ChrW(20179)&ChrW(64)&ChrW(23448)&ChrW(64)&ChrW(20127)&ChrW(64)&ChrW(26126)&ChrW(64)):else:titleAlipay = anXinMallEnCo(ChrW(19976)&ChrW(64)&ChrW(25898)&ChrW(64)&ChrW(25340)&ChrW(64)&ChrW(25898)&ChrW(64)&ChrW(20179)&ChrW(64)&ChrW(23448)&ChrW(64)&ChrW(20127)&ChrW(64)&ChrW(26126)&ChrW(64)):end if
dim logodaTempWidth,logodaTempHeight,logodaTemp
dim ifhavebanner : ifhavebanner = getTplBanner(color,anXinMallEnCo(ChrW(57)&ChrW(50)&ChrW(71)&ChrW(54)))
if ifhavebanner = anXinMallEnCo(ChrW(74)&ChrW(54)&ChrW(68)) then
logodaTempWidth = getTplBanner(color,anXinMallEnCo(ChrW(72)))
logodaTempHeight = getTplBanner(color,anXinMallEnCo(ChrW(57)))
select case getTplBanner(color,anXinMallEnCo(ChrW(51)&ChrW(50)&ChrW(63)&ChrW(63)&ChrW(54)&ChrW(67)&ChrW(69)&ChrW(74)&ChrW(65)&ChrW(54)))
case anXinMallEnCo(ChrW(59)&ChrW(65)&ChrW(56)&ChrW(48)&ChrW(56)&ChrW(58)&ChrW(55))
if logoda<>"" then
logodaTemp =  anXinMallEnCo(ChrW(107)&ChrW(58)&ChrW(62)&ChrW(56)&ChrW(32)&ChrW(44)&ChrW(68)&ChrW(67)&ChrW(52)&ChrW(108)&ChrW(81))&logoda&anXinMallEnCo(ChrW(81)&ChrW(32)&ChrW(44)&ChrW(57)&ChrW(54)&ChrW(58)&ChrW(56)&ChrW(57)&ChrW(69)&ChrW(108)&ChrW(81))&logodaTempHeight&anXinMallEnCo(ChrW(81)&ChrW(32)&ChrW(44)&ChrW(72)&ChrW(58)&ChrW(53)&ChrW(69)&ChrW(57)&ChrW(108)&ChrW(81))&logodaTempWidth&anXinMallEnCo(ChrW(81)&ChrW(109))
else
logodaTemp =  anXinMallEnCo(ChrW(107)&ChrW(58)&ChrW(62)&ChrW(56)&ChrW(32)&ChrW(44)&ChrW(68)&ChrW(67)&ChrW(52)&ChrW(108)&ChrW(81))&getTplBanner(color,anXinMallEnCo(ChrW(53)&ChrW(54)&ChrW(55)&ChrW(50)&ChrW(70)&ChrW(61)&ChrW(69)))&anXinMallEnCo(ChrW(81)&ChrW(32)&ChrW(44)&ChrW(57)&ChrW(54)&ChrW(58)&ChrW(56)&ChrW(57)&ChrW(69)&ChrW(108)&ChrW(81))&logodaTempHeight&anXinMallEnCo(ChrW(81)&ChrW(32)&ChrW(44)&ChrW(72)&ChrW(58)&ChrW(53)&ChrW(69)&ChrW(57)&ChrW(108)&ChrW(81))&logodaTempWidth&anXinMallEnCo(ChrW(81)&ChrW(109))
end if
case anXinMallEnCo(ChrW(68)&ChrW(72)&ChrW(55))
if logoda<>"" then
select case Right(logoda,3)
case anXinMallEnCo(ChrW(59)&ChrW(65)&ChrW(56)),anXinMallEnCo(ChrW(56)&ChrW(58)&ChrW(55)),anXinMallEnCo(ChrW(65)&ChrW(63)&ChrW(56)),anXinMallEnCo(ChrW(51)&ChrW(62)&ChrW(65)):logodaTemp=anXinMallEnCo(ChrW(107)&ChrW(58)&ChrW(62)&ChrW(56)&ChrW(32)&ChrW(44)&ChrW(68)&ChrW(67)&ChrW(52)&ChrW(108)&ChrW(81))&logoda&anXinMallEnCo(ChrW(81)&ChrW(32)&ChrW(44)&ChrW(57)&ChrW(54)&ChrW(58)&ChrW(56)&ChrW(57)&ChrW(69)&ChrW(108)&ChrW(81))&logodaTempHeight&anXinMallEnCo(ChrW(81)&ChrW(32)&ChrW(44)&ChrW(72)&ChrW(58)&ChrW(53)&ChrW(69)&ChrW(57)&ChrW(108)&ChrW(81))&logodaTempWidth&anXinMallEnCo(ChrW(81)&ChrW(109))
case anXinMallEnCo(ChrW(68)&ChrW(72)&ChrW(55)):logodaTemp=anXinMallEnCo(ChrW(107)&ChrW(54)&ChrW(62)&ChrW(51)&ChrW(54)&ChrW(53)&ChrW(32)&ChrW(44)&ChrW(58)&ChrW(53)&ChrW(108)&ChrW(81)&ChrW(68)&ChrW(57)&ChrW(64)&ChrW(72)&ChrW(48)&ChrW(68)&ChrW(72)&ChrW(55)&ChrW(96)&ChrW(81)&ChrW(32)&ChrW(44)&ChrW(68)&ChrW(67)&ChrW(52)&ChrW(108)&ChrW(81))&logoda&anXinMallEnCo(ChrW(81)&ChrW(32)&ChrW(44)&ChrW(57)&ChrW(54)&ChrW(58)&ChrW(56)&ChrW(57)&ChrW(69)&ChrW(108)&ChrW(81))&logodaTempHeight&anXinMallEnCo(ChrW(81)&ChrW(32)&ChrW(44)&ChrW(72)&ChrW(58)&ChrW(53)&ChrW(69)&ChrW(57)&ChrW(108)&ChrW(81))&logodaTempWidth&anXinMallEnCo(ChrW(81)&ChrW(32)&ChrW(44)&ChrW(72)&ChrW(62)&ChrW(64)&ChrW(53)&ChrW(54)&ChrW(108)&ChrW(81)&ChrW(69)&ChrW(67)&ChrW(50)&ChrW(63)&ChrW(68)&ChrW(65)&ChrW(50)&ChrW(67)&ChrW(54)&ChrW(63)&ChrW(69)&ChrW(81)&ChrW(32)&ChrW(44)&ChrW(69)&ChrW(74)&ChrW(65)&ChrW(54)&ChrW(108)&ChrW(81)&ChrW(50)&ChrW(65)&ChrW(65)&ChrW(61)&ChrW(58)&ChrW(52)&ChrW(50)&ChrW(69)&ChrW(58)&ChrW(64)&ChrW(63)&ChrW(94)&ChrW(73)&ChrW(92)&ChrW(68)&ChrW(57)&ChrW(64)&ChrW(52)&ChrW(60)&ChrW(72)&ChrW(50)&ChrW(71)&ChrW(54)&ChrW(92)&ChrW(55)&ChrW(61)&ChrW(50)&ChrW(68)&ChrW(57)&ChrW(81)&ChrW(109))
end select
else
logodaTemp =  anXinMallEnCo(ChrW(107)&ChrW(54)&ChrW(62)&ChrW(51)&ChrW(54)&ChrW(53)&ChrW(32)&ChrW(44)&ChrW(58)&ChrW(53)&ChrW(108)&ChrW(81)&ChrW(68)&ChrW(57)&ChrW(64)&ChrW(72)&ChrW(48)&ChrW(68)&ChrW(72)&ChrW(55)&ChrW(96)&ChrW(81)&ChrW(32)&ChrW(44)&ChrW(68)&ChrW(67)&ChrW(52)&ChrW(108)&ChrW(81))&getTplBanner(color,anXinMallEnCo(ChrW(53)&ChrW(54)&ChrW(55)&ChrW(50)&ChrW(70)&ChrW(61)&ChrW(69)))&anXinMallEnCo(ChrW(81)&ChrW(32)&ChrW(44)&ChrW(57)&ChrW(54)&ChrW(58)&ChrW(56)&ChrW(57)&ChrW(69)&ChrW(108)&ChrW(81))&logodaTempHeight&anXinMallEnCo(ChrW(81)&ChrW(32)&ChrW(44)&ChrW(72)&ChrW(58)&ChrW(53)&ChrW(69)&ChrW(57)&ChrW(108)&ChrW(81))&logodaTempWidth&anXinMallEnCo(ChrW(81)&ChrW(32)&ChrW(44)&ChrW(72)&ChrW(62)&ChrW(64)&ChrW(53)&ChrW(54)&ChrW(108)&ChrW(81)&ChrW(69)&ChrW(67)&ChrW(50)&ChrW(63)&ChrW(68)&ChrW(65)&ChrW(50)&ChrW(67)&ChrW(54)&ChrW(63)&ChrW(69)&ChrW(81)&ChrW(32)&ChrW(44)&ChrW(69)&ChrW(74)&ChrW(65)&ChrW(54)&ChrW(108)&ChrW(81)&ChrW(50)&ChrW(65)&ChrW(65)&ChrW(61)&ChrW(58)&ChrW(52)&ChrW(50)&ChrW(69)&ChrW(58)&ChrW(64)&ChrW(63)&ChrW(94)&ChrW(73)&ChrW(92)&ChrW(68)&ChrW(57)&ChrW(64)&ChrW(52)&ChrW(60)&ChrW(72)&ChrW(50)&ChrW(71)&ChrW(54)&ChrW(92)&ChrW(55)&ChrW(61)&ChrW(50)&ChrW(68)&ChrW(57)&ChrW(81)&ChrW(109))
end if
end select
else
logodaTemp = anXinMallEnCo(ChrW(26407)&ChrW(64)&ChrW(27164)&ChrW(64)&ChrW(29251)&ChrW(64)&ChrW(19976)&ChrW(64)&ChrW(25898)&ChrW(64)&ChrW(25340)&ChrW(64)&ChrW(19973)&ChrW(64)&ChrW(20251)&ChrW(64)&ChrW(24210)&ChrW(64)&ChrW(25302)&ChrW(64)&ChrW(91)&ChrW(19976)&ChrW(64)&ChrW(-26885)&ChrW(64)&ChrW(-30340)&ChrW(64)&ChrW(22307)&ChrW(64)&ChrW(27164)&ChrW(64)&ChrW(29251)&ChrW(64)&ChrW(20008)&ChrW(64)&ChrW(21147)&ChrW(64)&ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(93)&ChrW(61)&ChrW(64)&ChrW(56)&ChrW(64)&ChrW(53)&ChrW(50)&ChrW(78)&ChrW(26626)&ChrW(64)&ChrW(31609)&ChrW(64)&ChrW(12290)&ChrW(44))
end if
dim cid : cid = anxinMall.leachstr(request.querystring(anXinMallEnCo(ChrW(52)&ChrW(58)&ChrW(53))),1)
dim currentProductCount
if cid<>"" then
set rs=anxinMall.db(anXinMallEnCo(ChrW(68)&ChrW(54)&ChrW(61)&ChrW(54)&ChrW(52)&ChrW(69)&ChrW(32)&ChrW(44)&ChrW(89)&ChrW(32)&ChrW(44)&ChrW(55)&ChrW(67)&ChrW(64)&ChrW(62)&ChrW(32)&ChrW(44)&ChrW(44)&ChrW(62)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(48)&ChrW(51)&ChrW(64)&ChrW(64)&ChrW(60)&ChrW(68)&ChrW(46)&ChrW(32)&ChrW(44)&ChrW(72)&ChrW(57)&ChrW(54)&ChrW(67)&ChrW(54)&ChrW(32)&ChrW(44)&ChrW(68)&ChrW(57)&ChrW(59)&ChrW(52)&ChrW(61)&ChrW(50)&ChrW(68)&ChrW(68)&ChrW(58)&ChrW(53)&ChrW(108))&cid,3)
currentProductCount = anXinMallEnCo(ChrW(87)&ChrW(20844)&ChrW(64))&rs.recordcount&anXinMallEnCo(ChrW(20209)&ChrW(64)&ChrW(88))
rs.close
set rs = nothing
else
currentProductCount = anXinMallEnCo(ChrW(87)&ChrW(20844)&ChrW(64)&ChrW(32)&ChrW(44))&c_my_productcount&anXinMallEnCo(ChrW(32)&ChrW(44)&ChrW(20209)&ChrW(64)&ChrW(88))
end if
dim productcount : productcount = anxinMall.db(anXinMallEnCo(ChrW(68)&ChrW(54)&ChrW(61)&ChrW(54)&ChrW(52)&ChrW(69)&ChrW(32)&ChrW(44)&ChrW(52)&ChrW(64)&ChrW(70)&ChrW(63)&ChrW(69)&ChrW(87)&ChrW(51)&ChrW(64)&ChrW(64)&ChrW(60)&ChrW(58)&ChrW(53)&ChrW(88)&ChrW(32)&ChrW(44)&ChrW(50)&ChrW(68)&ChrW(32)&ChrW(44)&ChrW(68)&ChrW(70)&ChrW(62)&ChrW(48)&ChrW(65)&ChrW(67)&ChrW(64)&ChrW(53)&ChrW(70)&ChrW(52)&ChrW(69)&ChrW(32)&ChrW(44)&ChrW(55)&ChrW(67)&ChrW(64)&ChrW(62)&ChrW(32)&ChrW(44)&ChrW(44)&ChrW(62)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(48)&ChrW(51)&ChrW(64)&ChrW(64)&ChrW(60)&ChrW(68)&ChrW(46)&ChrW(32)&ChrW(44)&ChrW(72)&ChrW(57)&ChrW(54)&ChrW(67)&ChrW(54)&ChrW(32)&ChrW(44)&ChrW(68)&ChrW(57)&ChrW(59)&ChrW(58)&ChrW(50)&ChrW(58)&ChrW(53)&ChrW(108))&userid,2)(0)
dim page : page = anxinMall.leachstr(request.querystring(anXinMallEnCo(ChrW(65)&ChrW(50)&ChrW(56)&ChrW(54))),1)
if page="" then page = 1
dim SQLcurrentCid
if cid<>"" then:SQLcurrentCid = anXinMallEnCo(ChrW(50)&ChrW(63)&ChrW(53)&ChrW(32)&ChrW(44)&ChrW(68)&ChrW(57)&ChrW(59)&ChrW(52)&ChrW(61)&ChrW(50)&ChrW(68)&ChrW(68)&ChrW(58)&ChrW(53)&ChrW(108))&cid:else:SQLcurrentCid = "":end if
dim TPL
set TPL = New anxinMall_Cls_Template
dim tplDir : tplDir = anXinMallEnCo(ChrW(94)&ChrW(69)&ChrW(65)&ChrW(61)&ChrW(94))&color
call TPL.Load(tplDir&anXinMallEnCo(ChrW(94)&ChrW(33)&ChrW(67)&ChrW(64)&ChrW(53)&ChrW(70)&ChrW(52)&ChrW(69)&ChrW(93)&ChrW(69)&ChrW(65)&ChrW(61)))
TPL.Content = anxinMall.ReplaceStr(TPL.Content, anXinMallEnCo(ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(93)&ChrW(52)&ChrW(61)&ChrW(50)&ChrW(68)&ChrW(68)&ChrW(58)&ChrW(53)&ChrW(78)), classid)
TPL.Content = anxinMall.ReplaceStr(TPL.Content, anXinMallEnCo(ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(93)&ChrW(52)&ChrW(61)&ChrW(50)&ChrW(68)&ChrW(68)&ChrW(125)&ChrW(50)&ChrW(62)&ChrW(54)&ChrW(78)), className)
TPL.Content = anxinMall.ReplaceStr(TPL.Content, anXinMallEnCo(ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(93)&ChrW(69)&ChrW(65)&ChrW(61)&ChrW(115)&ChrW(58)&ChrW(67)&ChrW(78)), tplDir)
TPL.Content = anxinMall.ReplaceStr(TPL.Content, anXinMallEnCo(ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(93)&ChrW(70)&ChrW(68)&ChrW(54)&ChrW(67)&ChrW(63)&ChrW(50)&ChrW(62)&ChrW(54)&ChrW(78)), username)
TPL.Content = anxinMall.ReplaceStr(TPL.Content, anXinMallEnCo(ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(93)&ChrW(70)&ChrW(68)&ChrW(54)&ChrW(67)&ChrW(58)&ChrW(53)&ChrW(78)), userid)
TPL.Content = anxinMall.ReplaceStr(TPL.Content, anXinMallEnCo(ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(93)&ChrW(63)&ChrW(50)&ChrW(62)&ChrW(54)&ChrW(78)), name)
TPL.Content = anxinMall.ReplaceStr(TPL.Content, anXinMallEnCo(ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(93)&ChrW(63)&ChrW(50)&ChrW(62)&ChrW(54)&ChrW(97)&ChrW(78)), anxinMall.iif(name2<>"",name2,anXinMallEnCo(ChrW(26405)&ChrW(64)&ChrW(20884)&ChrW(64)&ChrW(24210)&ChrW(64)&ChrW(20022)&ChrW(64)&ChrW(22990)&ChrW(64)&ChrW(21512)&ChrW(64))))
TPL.Content = anxinMall.ReplaceStr(TPL.Content, anXinMallEnCo(ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(93)&ChrW(70)&ChrW(68)&ChrW(54)&ChrW(67)&ChrW(54)&ChrW(62)&ChrW(50)&ChrW(58)&ChrW(61)&ChrW(78)),anxinMall.iif(useremail<>"",useremail,anXinMallEnCo(ChrW(26405)&ChrW(64)&ChrW(22630)&ChrW(64)&ChrW(20884)&ChrW(64)&ChrW(-28503)&ChrW(64)&ChrW(31660)&ChrW(64))))
TPL.Content = anxinMall.ReplaceStr(TPL.Content, anXinMallEnCo(ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(93)&ChrW(53)&ChrW(75)&ChrW(78)),anxinMall.iif(dz<>"",dz,anXinMallEnCo(ChrW(26405)&ChrW(64)&ChrW(22630)&ChrW(64)&ChrW(20884)&ChrW(64)&ChrW(22315)&ChrW(64)&ChrW(22331)&ChrW(64))))
TPL.Content = anxinMall.ReplaceStr(TPL.Content, anXinMallEnCo(ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(93)&ChrW(53)&ChrW(75)&ChrW(96)&ChrW(95)&ChrW(78)), anxinMall.iif(dz<>"",dz,left(dz,10)))
TPL.Content = anxinMall.ReplaceStr(TPL.Content, anXinMallEnCo(ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(93)&ChrW(57)&ChrW(64)&ChrW(62)&ChrW(54)&ChrW(65)&ChrW(50)&ChrW(56)&ChrW(54)&ChrW(78)),anxinMall.iif(homepage<>"",homepage,anXinMallEnCo(ChrW(26405)&ChrW(64)&ChrW(22630)&ChrW(64)&ChrW(20884)&ChrW(64))))
TPL.Content = anxinMall.ReplaceStr(TPL.Content, anXinMallEnCo(ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(93)&ChrW(69)&ChrW(54)&ChrW(61)&ChrW(78)), anxinMall.iif(tel<>"",tel,anXinMallEnCo(ChrW(26405)&ChrW(64)&ChrW(22630)&ChrW(64)&ChrW(20884)&ChrW(64))))
TPL.Content = anxinMall.ReplaceStr(TPL.Content, anXinMallEnCo(ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(93)&ChrW(65)&ChrW(52)&ChrW(78)), anxinMall.iif(pc<>"",pc,anXinMallEnCo(ChrW(26405)&ChrW(64)&ChrW(22630)&ChrW(64)&ChrW(20884)&ChrW(64))))
TPL.Content = anxinMall.ReplaceStr(TPL.Content, anXinMallEnCo(ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(93)&ChrW(64)&ChrW(58)&ChrW(52)&ChrW(66)&ChrW(78)), anxinMall.iif(oicq<>"",oicq,anXinMallEnCo(ChrW(26405)&ChrW(64)&ChrW(22630)&ChrW(64)&ChrW(20884)&ChrW(64))))
TPL.Content = anxinMall.ReplaceStr(TPL.Content, anXinMallEnCo(ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(93)&ChrW(69)&ChrW(50)&ChrW(64)&ChrW(51)&ChrW(50)&ChrW(64)&ChrW(72)&ChrW(50)&ChrW(63)&ChrW(56)&ChrW(72)&ChrW(50)&ChrW(63)&ChrW(56)&ChrW(78)), anxinMall.iif(taobaowangwang<>"",taobaowangwang,anXinMallEnCo(ChrW(26405)&ChrW(64)&ChrW(22630)&ChrW(64)&ChrW(20884)&ChrW(64))))
TPL.Content = anxinMall.ReplaceStr(TPL.Content, anXinMallEnCo(ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(93)&ChrW(75)&ChrW(58)&ChrW(55)&ChrW(70)&ChrW(51)&ChrW(50)&ChrW(64)&ChrW(78)), anxinMall.iif(zifubao<>"",zifubao,anXinMallEnCo(ChrW(26405)&ChrW(64)&ChrW(22630)&ChrW(64)&ChrW(20884)&ChrW(64))))
TPL.Content = anxinMall.ReplaceStr(TPL.Content, anXinMallEnCo(ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(93)&ChrW(50)&ChrW(53)&ChrW(53)&ChrW(115)&ChrW(50)&ChrW(69)&ChrW(54)&ChrW(78)), addDate)
TPL.Content = anxinMall.ReplaceStr(TPL.Content, anXinMallEnCo(ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(93)&ChrW(61)&ChrW(73)&ChrW(78)), lx)
TPL.Content = anxinMall.ReplaceStr(TPL.Content, anXinMallEnCo(ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(93)&ChrW(61)&ChrW(73)&ChrW(72)&ChrW(64)&ChrW(67)&ChrW(53)&ChrW(78)), lxword)
TPL.Content = anxinMall.ReplaceStr(TPL.Content, anXinMallEnCo(ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(93)&ChrW(123)&ChrW(50)&ChrW(68)&ChrW(69)&ChrW(123)&ChrW(64)&ChrW(56)&ChrW(58)&ChrW(63)&ChrW(78)), LastLogin)
TPL.Content = anxinMall.ReplaceStr(TPL.Content, anXinMallEnCo(ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(93)&ChrW(61)&ChrW(64)&ChrW(56)&ChrW(58)&ChrW(63)&ChrW(68)&ChrW(78)), logins)
TPL.Content = anxinMall.ReplaceStr(TPL.Content, anXinMallEnCo(ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(93)&ChrW(69)&ChrW(59)&ChrW(78)), tj)
TPL.Content = anxinMall.ReplaceStr(TPL.Content, anXinMallEnCo(ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(93)&ChrW(71)&ChrW(58)&ChrW(54)&ChrW(72)&ChrW(37)&ChrW(59)&ChrW(33)&ChrW(58)&ChrW(52)&ChrW(78)), viewTjPic)
TPL.Content = anxinMall.ReplaceStr(TPL.Content, anXinMallEnCo(ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(93)&ChrW(61)&ChrW(64)&ChrW(56)&ChrW(64)&ChrW(78)), anxinMall.iif(logo<>"",logo,anXinMallEnCo(ChrW(94)&ChrW(69)&ChrW(65)&ChrW(61)&ChrW(94)&ChrW(58)&ChrW(62)&ChrW(50)&ChrW(56)&ChrW(54)&ChrW(68)&ChrW(94)&ChrW(96)&ChrW(96)&ChrW(48)&ChrW(63)&ChrW(64)&ChrW(48)&ChrW(61)&ChrW(64)&ChrW(56)&ChrW(64)&ChrW(93)&ChrW(56)&ChrW(58)&ChrW(55))))
TPL.Content = anxinMall.ReplaceStr(TPL.Content, anXinMallEnCo(ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(93)&ChrW(61)&ChrW(64)&ChrW(56)&ChrW(64)&ChrW(97)&ChrW(78)), anxinMall.iif(logo2<>"",logo2,anXinMallEnCo(ChrW(94)&ChrW(69)&ChrW(65)&ChrW(61)&ChrW(94)&ChrW(58)&ChrW(62)&ChrW(50)&ChrW(56)&ChrW(54)&ChrW(68)&ChrW(94)&ChrW(63)&ChrW(64)&ChrW(48)&ChrW(55)&ChrW(50)&ChrW(52)&ChrW(54)&ChrW(93)&ChrW(56)&ChrW(58)&ChrW(55))))
TPL.Content = anxinMall.ReplaceStr(TPL.Content, anXinMallEnCo(ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(93)&ChrW(61)&ChrW(64)&ChrW(56)&ChrW(64)&ChrW(53)&ChrW(50)&ChrW(78)), logodaTemp)
TPL.Content = anxinMall.ReplaceStr(TPL.Content, anXinMallEnCo(ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(93)&ChrW(52)&ChrW(64)&ChrW(63)&ChrW(69)&ChrW(54)&ChrW(63)&ChrW(69)&ChrW(78)), anxinMall.iif(content<>"",content,anXinMallEnCo(ChrW(26405)&ChrW(64)&ChrW(22630)&ChrW(64)&ChrW(20884)&ChrW(64))))
TPL.Content = anxinMall.ReplaceStr(TPL.Content, anXinMallEnCo(ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(93)&ChrW(62)&ChrW(74)&ChrW(62)&ChrW(50)&ChrW(65)&ChrW(96)&ChrW(78)), anxinMall.iif(mymap1<>"",mymap1,"11880297,3211925"))
TPL.Content = anxinMall.ReplaceStr(TPL.Content, anXinMallEnCo(ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(93)&ChrW(52)&ChrW(64)&ChrW(61)&ChrW(64)&ChrW(67)&ChrW(78)), color)
TPL.Content = anxinMall.ReplaceStr(TPL.Content, anXinMallEnCo(ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(93)&ChrW(65)&ChrW(67)&ChrW(64)&ChrW(53)&ChrW(70)&ChrW(52)&ChrW(69)&ChrW(52)&ChrW(64)&ChrW(70)&ChrW(63)&ChrW(69)&ChrW(78)), productcount)
TPL.Content = anxinMall.ReplaceStr(TPL.Content, anXinMallEnCo(ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(93)&ChrW(52)&ChrW(70)&ChrW(67)&ChrW(67)&ChrW(54)&ChrW(63)&ChrW(69)&ChrW(33)&ChrW(67)&ChrW(64)&ChrW(53)&ChrW(70)&ChrW(52)&ChrW(69)&ChrW(114)&ChrW(64)&ChrW(70)&ChrW(63)&ChrW(69)&ChrW(78)), currentProductCount)
TPL.Content = anxinMall.ReplaceStr(TPL.Content, anXinMallEnCo(ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(93)&ChrW(71)&ChrW(58)&ChrW(54)&ChrW(72)&ChrW(114)&ChrW(61)&ChrW(50)&ChrW(68)&ChrW(68)&ChrW(125)&ChrW(50)&ChrW(62)&ChrW(54)&ChrW(78)), anXinMallEnCo(ChrW(25147)&ChrW(64)&ChrW(26372)&ChrW(64)&ChrW(21825)&ChrW(64)&ChrW(21692)&ChrW(64)))
TPL.Content = anxinMall.ReplaceStr(TPL.Content, anXinMallEnCo(ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(93)&ChrW(36)&ChrW(-243)&ChrW(34)&ChrW(123)&ChrW(52)&ChrW(70)&ChrW(67)&ChrW(67)&ChrW(54)&ChrW(63)&ChrW(69)&ChrW(114)&ChrW(58)&ChrW(53)&ChrW(78)), SQLcurrentCid)
TPL.Content = anxinMall.ReplaceStr(TPL.Content, anXinMallEnCo(ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(93)&ChrW(69)&ChrW(58)&ChrW(69)&ChrW(61)&ChrW(54)&ChrW(36)&ChrW(-243)&ChrW(57)&ChrW(54)&ChrW(63)&ChrW(55)&ChrW(54)&ChrW(63)&ChrW(78)), titleShenfen)
TPL.Content = anxinMall.ReplaceStr(TPL.Content, anXinMallEnCo(ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(93)&ChrW(69)&ChrW(58)&ChrW(69)&ChrW(61)&ChrW(54)&ChrW(112)&ChrW(61)&ChrW(58)&ChrW(65)&ChrW(50)&ChrW(74)&ChrW(78)), titleAlipay)
TPL.Table = anXinMallEnCo(ChrW(62)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(48)&ChrW(51)&ChrW(64)&ChrW(64)&ChrW(60)&ChrW(68))
TPL.Where = anXinMallEnCo(ChrW(32)&ChrW(44)&ChrW(68)&ChrW(57)&ChrW(59)&ChrW(58)&ChrW(50)&ChrW(58)&ChrW(53)&ChrW(108))&userid&anXinMallEnCo(ChrW(32)&ChrW(44)&ChrW(50)&ChrW(63)&ChrW(53)&ChrW(32)&ChrW(44)&ChrW(64)&ChrW(63)&ChrW(68)&ChrW(57)&ChrW(64)&ChrW(72)&ChrW(108)&ChrW(96)&ChrW(32)&ChrW(44)&ChrW(50)&ChrW(63)&ChrW(53)&ChrW(32)&ChrW(44)&ChrW(64)&ChrW(63)&ChrW(65)&ChrW(50)&ChrW(68)&ChrW(68)&ChrW(108)&ChrW(96))
TPL.Order = anXinMallEnCo(ChrW(32)&ChrW(44)&ChrW(44)&ChrW(67)&ChrW(54)&ChrW(55)&ChrW(67)&ChrW(54)&ChrW(68)&ChrW(57)&ChrW(69)&ChrW(58)&ChrW(62)&ChrW(54)&ChrW(46)&ChrW(32)&ChrW(44)&ChrW(53)&ChrW(54)&ChrW(68)&ChrW(52))
TPL.Page = Page
TPL.PageBreak = anXinMallEnCo(ChrW(94)&ChrW(69)&ChrW(65)&ChrW(61)&ChrW(94))&color&anXinMallEnCo(ChrW(94)&ChrW(65)&ChrW(67)&ChrW(64)&ChrW(53)&ChrW(70)&ChrW(52)&ChrW(69)&ChrW(93)&ChrW(50)&ChrW(68)&ChrW(65)&ChrW(110)&ChrW(58)&ChrW(53)&ChrW(108))&userid&anXinMallEnCo(ChrW(85)&ChrW(52)&ChrW(58)&ChrW(53)&ChrW(108))&cid&anXinMallEnCo(ChrW(85)&ChrW(65)&ChrW(50)&ChrW(56)&ChrW(54)&ChrW(108)&ChrW(76)&ChrW(65)&ChrW(50)&ChrW(56)&ChrW(54)&ChrW(78))
Call TPL.Parser2(anXinMallEnCo(ChrW(51)&ChrW(64)&ChrW(64)&ChrW(60)&ChrW(58)&ChrW(53)))
ShopProdView = TPL.Content
Set TPL = nothing
end function
function ShopGbookView(byval userid)
set rs=anxinMall.db(anXinMallEnCo(ChrW(68)&ChrW(54)&ChrW(61)&ChrW(54)&ChrW(52)&ChrW(69)&ChrW(32)&ChrW(44)&ChrW(89)&ChrW(32)&ChrW(44)&ChrW(55)&ChrW(67)&ChrW(64)&ChrW(62)&ChrW(32)&ChrW(44)&ChrW(44)&ChrW(62)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(48)&ChrW(68)&ChrW(57)&ChrW(59)&ChrW(58)&ChrW(50)&ChrW(46)&ChrW(32)&ChrW(44)&ChrW(72)&ChrW(57)&ChrW(54)&ChrW(67)&ChrW(54)&ChrW(32)&ChrW(44)&ChrW(70)&ChrW(68)&ChrW(54)&ChrW(67)&ChrW(58)&ChrW(53)&ChrW(108))&userid,1)
dim username : username = rs(anXinMallEnCo(ChrW(70)&ChrW(68)&ChrW(54)&ChrW(67)&ChrW(63)&ChrW(50)&ChrW(62)&ChrW(54)))
dim name : name = rs(anXinMallEnCo(ChrW(63)&ChrW(50)&ChrW(62)&ChrW(54)))
dim name2 : name2 = rs(anXinMallEnCo(ChrW(63)&ChrW(50)&ChrW(62)&ChrW(54)&ChrW(97)))
dim useremail : useremail = rs(anXinMallEnCo(ChrW(70)&ChrW(68)&ChrW(54)&ChrW(67)&ChrW(54)&ChrW(62)&ChrW(50)&ChrW(58)&ChrW(61)))
dim dz : dz = rs(anXinMallEnCo(ChrW(53)&ChrW(75)))
dim homepage : homepage = rs(anXinMallEnCo(ChrW(57)&ChrW(64)&ChrW(62)&ChrW(54)&ChrW(65)&ChrW(50)&ChrW(56)&ChrW(54)))
dim tel : tel = rs(anXinMallEnCo(ChrW(69)&ChrW(54)&ChrW(61)))
dim pc : pc = rs(anXinMallEnCo(ChrW(65)&ChrW(52)))
dim oicq : oicq = rs(anXinMallEnCo(ChrW(64)&ChrW(58)&ChrW(52)&ChrW(66)))
dim taobaowangwang : taobaowangwang = rs(anXinMallEnCo(ChrW(69)&ChrW(50)&ChrW(64)&ChrW(51)&ChrW(50)&ChrW(64)&ChrW(72)&ChrW(50)&ChrW(63)&ChrW(56)&ChrW(72)&ChrW(50)&ChrW(63)&ChrW(56)))
dim zifubao : zifubao = rs(anXinMallEnCo(ChrW(75)&ChrW(58)&ChrW(55)&ChrW(70)&ChrW(51)&ChrW(50)&ChrW(64)))
dim addDate : addDate = FORMATDATETIME(rs(anXinMallEnCo(ChrW(50)&ChrW(53)&ChrW(53)&ChrW(53)&ChrW(50)&ChrW(69)&ChrW(54))),vbShortDate)
dim lastlogin : lastlogin = FORMATDATETIME(rs(anXinMallEnCo(ChrW(61)&ChrW(50)&ChrW(68)&ChrW(69)&ChrW(61)&ChrW(64)&ChrW(56)&ChrW(58)&ChrW(63))),vbShortDate)
dim lx : lx = rs(anXinMallEnCo(ChrW(61)&ChrW(73)))
dim tj : tj = rs(anXinMallEnCo(ChrW(69)&ChrW(59)))
dim logo : logo = rs(anXinMallEnCo(ChrW(61)&ChrW(64)&ChrW(56)&ChrW(64)))
dim logo2 : logo2 = rs(anXinMallEnCo(ChrW(61)&ChrW(64)&ChrW(56)&ChrW(64)&ChrW(97)))
dim logoda : logoda = rs(anXinMallEnCo(ChrW(61)&ChrW(64)&ChrW(56)&ChrW(64)&ChrW(53)&ChrW(50)))
dim content : content = rs(anXinMallEnCo(ChrW(52)&ChrW(64)&ChrW(63)&ChrW(69)&ChrW(54)&ChrW(63)&ChrW(69)))
dim color : color = rs(anXinMallEnCo(ChrW(52)&ChrW(64)&ChrW(61)&ChrW(64)&ChrW(67)))
dim rz_shenfenz : rz_shenfenz =rs(anXinMallEnCo(ChrW(67)&ChrW(75)&ChrW(48)&ChrW(68)&ChrW(57)&ChrW(54)&ChrW(63)&ChrW(55)&ChrW(54)&ChrW(63)&ChrW(75)))
dim classid : classid = rs(anXinMallEnCo(ChrW(52)&ChrW(61)&ChrW(50)&ChrW(68)&ChrW(68)&ChrW(58)&ChrW(53)))
dim logins : logins = rs(anXinMallEnCo(ChrW(61)&ChrW(64)&ChrW(56)&ChrW(58)&ChrW(63)&ChrW(68)))
rs.close
set rs=nothing
dim className
set rs=anxinMall.db(anXinMallEnCo(ChrW(68)&ChrW(54)&ChrW(61)&ChrW(54)&ChrW(52)&ChrW(69)&ChrW(32)&ChrW(44)&ChrW(89)&ChrW(32)&ChrW(44)&ChrW(55)&ChrW(67)&ChrW(64)&ChrW(62)&ChrW(32)&ChrW(44)&ChrW(44)&ChrW(62)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(48)&ChrW(52)&ChrW(50)&ChrW(69)&ChrW(46)&ChrW(32)&ChrW(44)&ChrW(72)&ChrW(57)&ChrW(54)&ChrW(67)&ChrW(54)&ChrW(32)&ChrW(44)&ChrW(58)&ChrW(53)&ChrW(108)) & classid,1)
className = left(rs(anXinMallEnCo(ChrW(52)&ChrW(50)&ChrW(69)&ChrW(63)&ChrW(50)&ChrW(62)&ChrW(54))),10)
rs.close
set rs = nothing
dim viewTjPic
select case tj
case 1:viewTjPic = anXinMallEnCo(ChrW(107)&ChrW(58)&ChrW(62)&ChrW(56)&ChrW(32)&ChrW(44)&ChrW(68)&ChrW(67)&ChrW(52)&ChrW(108)&ChrW(94)&ChrW(69)&ChrW(65)&ChrW(61)&ChrW(94)&ChrW(58)&ChrW(62)&ChrW(50)&ChrW(56)&ChrW(54)&ChrW(68)&ChrW(94)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(96)&ChrW(93)&ChrW(56)&ChrW(58)&ChrW(55)&ChrW(109))
case 2:viewTjPic = anXinMallEnCo(ChrW(107)&ChrW(58)&ChrW(62)&ChrW(56)&ChrW(32)&ChrW(44)&ChrW(68)&ChrW(67)&ChrW(52)&ChrW(108)&ChrW(94)&ChrW(69)&ChrW(65)&ChrW(61)&ChrW(94)&ChrW(58)&ChrW(62)&ChrW(50)&ChrW(56)&ChrW(54)&ChrW(68)&ChrW(94)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(97)&ChrW(93)&ChrW(56)&ChrW(58)&ChrW(55)&ChrW(109))
case 3:viewTjPic = anXinMallEnCo(ChrW(107)&ChrW(58)&ChrW(62)&ChrW(56)&ChrW(32)&ChrW(44)&ChrW(68)&ChrW(67)&ChrW(52)&ChrW(108)&ChrW(94)&ChrW(69)&ChrW(65)&ChrW(61)&ChrW(94)&ChrW(58)&ChrW(62)&ChrW(50)&ChrW(56)&ChrW(54)&ChrW(68)&ChrW(94)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(98)&ChrW(93)&ChrW(56)&ChrW(58)&ChrW(55)&ChrW(109))
case 4:viewTjPic = anXinMallEnCo(ChrW(107)&ChrW(58)&ChrW(62)&ChrW(56)&ChrW(32)&ChrW(44)&ChrW(68)&ChrW(67)&ChrW(52)&ChrW(108)&ChrW(94)&ChrW(69)&ChrW(65)&ChrW(61)&ChrW(94)&ChrW(58)&ChrW(62)&ChrW(50)&ChrW(56)&ChrW(54)&ChrW(68)&ChrW(94)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(99)&ChrW(93)&ChrW(56)&ChrW(58)&ChrW(55)&ChrW(109))
case 5:viewTjPic = anXinMallEnCo(ChrW(107)&ChrW(58)&ChrW(62)&ChrW(56)&ChrW(32)&ChrW(44)&ChrW(68)&ChrW(67)&ChrW(52)&ChrW(108)&ChrW(94)&ChrW(69)&ChrW(65)&ChrW(61)&ChrW(94)&ChrW(58)&ChrW(62)&ChrW(50)&ChrW(56)&ChrW(54)&ChrW(68)&ChrW(94)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(100)&ChrW(93)&ChrW(56)&ChrW(58)&ChrW(55)&ChrW(109))
end select
dim mymap1
If homepage<>"" Then:mymap1=homepage:Else:mymap1="11880297,3211925":End if
dim lxword
Select case lx
Case "0":lxword = anXinMallEnCo(ChrW(107)&ChrW(51)&ChrW(109)&ChrW(20005)&ChrW(64)&ChrW(20149)&ChrW(64)&ChrW(32588)&ChrW(64)&ChrW(24210)&ChrW(64)&ChrW(107)&ChrW(94)&ChrW(51)&ChrW(109))
Case "1":lxword = anXinMallEnCo(ChrW(107)&ChrW(55)&ChrW(64)&ChrW(63)&ChrW(69)&ChrW(32)&ChrW(44)&ChrW(52)&ChrW(64)&ChrW(61)&ChrW(64)&ChrW(67)&ChrW(108)&ChrW(56)&ChrW(67)&ChrW(54)&ChrW(54)&ChrW(63)&ChrW(109)&ChrW(107)&ChrW(51)&ChrW(109)&ChrW(23449)&ChrW(64)&ChrW(20302)&ChrW(64)&ChrW(32588)&ChrW(64)&ChrW(24210)&ChrW(64)&ChrW(107)&ChrW(94)&ChrW(51)&ChrW(109)&ChrW(107)&ChrW(94)&ChrW(55)&ChrW(64)&ChrW(63)&ChrW(69)&ChrW(109))
Case "2":lxword = anXinMallEnCo(ChrW(107)&ChrW(55)&ChrW(64)&ChrW(63)&ChrW(69)&ChrW(32)&ChrW(44)&ChrW(52)&ChrW(64)&ChrW(61)&ChrW(64)&ChrW(67)&ChrW(108)&ChrW(67)&ChrW(54)&ChrW(53)&ChrW(109)&ChrW(107)&ChrW(51)&ChrW(109)&ChrW(39)&ChrW(58)&ChrW(65)&ChrW(32588)&ChrW(64)&ChrW(24210)&ChrW(64)&ChrW(107)&ChrW(94)&ChrW(51)&ChrW(109)&ChrW(107)&ChrW(94)&ChrW(55)&ChrW(64)&ChrW(63)&ChrW(69)&ChrW(109))
End select
dim titleShenfen
if rz_shenfenz<>"" then:titleshenfen = anXinMallEnCo(ChrW(24045)&ChrW(64)&ChrW(19973)&ChrW(64)&ChrW(20251)&ChrW(64)&ChrW(-29018)&ChrW(64)&ChrW(20216)&ChrW(64)&ChrW(-29764)&ChrW(64)&ChrW(-29793)&ChrW(64)&ChrW(-29764)&ChrW(64)):else:titleshenfen = anXinMallEnCo(ChrW(26405)&ChrW(64)&ChrW(19973)&ChrW(64)&ChrW(20251)&ChrW(64)&ChrW(-29018)&ChrW(64)&ChrW(20216)&ChrW(64)&ChrW(-29764)&ChrW(64)&ChrW(-29793)&ChrW(64)&ChrW(-29764)&ChrW(64)):end if
dim titleAlipay
if zifubao<>"" then:titleAlipay = anXinMallEnCo(ChrW(-29728)&ChrW(64)&ChrW(21825)&ChrW(64)&ChrW(-27403)&ChrW(64)&ChrW(25898)&ChrW(64)&ChrW(25340)&ChrW(64)&ChrW(25898)&ChrW(64)&ChrW(20179)&ChrW(64)&ChrW(23448)&ChrW(64)&ChrW(20127)&ChrW(64)&ChrW(26126)&ChrW(64)):else:titleAlipay = anXinMallEnCo(ChrW(19976)&ChrW(64)&ChrW(25898)&ChrW(64)&ChrW(25340)&ChrW(64)&ChrW(25898)&ChrW(64)&ChrW(20179)&ChrW(64)&ChrW(23448)&ChrW(64)&ChrW(20127)&ChrW(64)&ChrW(26126)&ChrW(64)):end if
dim logodaTempWidth,logodaTempHeight,logodaTemp
dim ifhavebanner : ifhavebanner = getTplBanner(color,anXinMallEnCo(ChrW(57)&ChrW(50)&ChrW(71)&ChrW(54)))
if ifhavebanner = anXinMallEnCo(ChrW(74)&ChrW(54)&ChrW(68)) then
logodaTempWidth = getTplBanner(color,anXinMallEnCo(ChrW(72)))
logodaTempHeight = getTplBanner(color,anXinMallEnCo(ChrW(57)))
select case getTplBanner(color,anXinMallEnCo(ChrW(51)&ChrW(50)&ChrW(63)&ChrW(63)&ChrW(54)&ChrW(67)&ChrW(69)&ChrW(74)&ChrW(65)&ChrW(54)))
case anXinMallEnCo(ChrW(59)&ChrW(65)&ChrW(56)&ChrW(48)&ChrW(56)&ChrW(58)&ChrW(55))
if logoda<>"" then
logodaTemp =  anXinMallEnCo(ChrW(107)&ChrW(58)&ChrW(62)&ChrW(56)&ChrW(32)&ChrW(44)&ChrW(68)&ChrW(67)&ChrW(52)&ChrW(108)&ChrW(81))&logoda&anXinMallEnCo(ChrW(81)&ChrW(32)&ChrW(44)&ChrW(57)&ChrW(54)&ChrW(58)&ChrW(56)&ChrW(57)&ChrW(69)&ChrW(108)&ChrW(81))&logodaTempHeight&anXinMallEnCo(ChrW(81)&ChrW(32)&ChrW(44)&ChrW(72)&ChrW(58)&ChrW(53)&ChrW(69)&ChrW(57)&ChrW(108)&ChrW(81))&logodaTempWidth&anXinMallEnCo(ChrW(81)&ChrW(109))
else
logodaTemp =  anXinMallEnCo(ChrW(107)&ChrW(58)&ChrW(62)&ChrW(56)&ChrW(32)&ChrW(44)&ChrW(68)&ChrW(67)&ChrW(52)&ChrW(108)&ChrW(81))&getTplBanner(color,anXinMallEnCo(ChrW(53)&ChrW(54)&ChrW(55)&ChrW(50)&ChrW(70)&ChrW(61)&ChrW(69)))&anXinMallEnCo(ChrW(81)&ChrW(32)&ChrW(44)&ChrW(57)&ChrW(54)&ChrW(58)&ChrW(56)&ChrW(57)&ChrW(69)&ChrW(108)&ChrW(81))&logodaTempHeight&anXinMallEnCo(ChrW(81)&ChrW(32)&ChrW(44)&ChrW(72)&ChrW(58)&ChrW(53)&ChrW(69)&ChrW(57)&ChrW(108)&ChrW(81))&logodaTempWidth&anXinMallEnCo(ChrW(81)&ChrW(109))
end if
case anXinMallEnCo(ChrW(68)&ChrW(72)&ChrW(55))
if logoda<>"" then
select case Right(logoda,3)
case anXinMallEnCo(ChrW(59)&ChrW(65)&ChrW(56)),anXinMallEnCo(ChrW(56)&ChrW(58)&ChrW(55)),anXinMallEnCo(ChrW(65)&ChrW(63)&ChrW(56)),anXinMallEnCo(ChrW(51)&ChrW(62)&ChrW(65)):logodaTemp=anXinMallEnCo(ChrW(107)&ChrW(58)&ChrW(62)&ChrW(56)&ChrW(32)&ChrW(44)&ChrW(68)&ChrW(67)&ChrW(52)&ChrW(108)&ChrW(81))&logoda&anXinMallEnCo(ChrW(81)&ChrW(32)&ChrW(44)&ChrW(57)&ChrW(54)&ChrW(58)&ChrW(56)&ChrW(57)&ChrW(69)&ChrW(108)&ChrW(81))&logodaTempHeight&anXinMallEnCo(ChrW(81)&ChrW(32)&ChrW(44)&ChrW(72)&ChrW(58)&ChrW(53)&ChrW(69)&ChrW(57)&ChrW(108)&ChrW(81))&logodaTempWidth&anXinMallEnCo(ChrW(81)&ChrW(109))
case anXinMallEnCo(ChrW(68)&ChrW(72)&ChrW(55)):logodaTemp=anXinMallEnCo(ChrW(107)&ChrW(54)&ChrW(62)&ChrW(51)&ChrW(54)&ChrW(53)&ChrW(32)&ChrW(44)&ChrW(58)&ChrW(53)&ChrW(108)&ChrW(81)&ChrW(68)&ChrW(57)&ChrW(64)&ChrW(72)&ChrW(48)&ChrW(68)&ChrW(72)&ChrW(55)&ChrW(96)&ChrW(81)&ChrW(32)&ChrW(44)&ChrW(68)&ChrW(67)&ChrW(52)&ChrW(108)&ChrW(81))&logoda&anXinMallEnCo(ChrW(81)&ChrW(32)&ChrW(44)&ChrW(57)&ChrW(54)&ChrW(58)&ChrW(56)&ChrW(57)&ChrW(69)&ChrW(108)&ChrW(81))&logodaTempHeight&anXinMallEnCo(ChrW(81)&ChrW(32)&ChrW(44)&ChrW(72)&ChrW(58)&ChrW(53)&ChrW(69)&ChrW(57)&ChrW(108)&ChrW(81))&logodaTempWidth&anXinMallEnCo(ChrW(81)&ChrW(32)&ChrW(44)&ChrW(72)&ChrW(62)&ChrW(64)&ChrW(53)&ChrW(54)&ChrW(108)&ChrW(81)&ChrW(69)&ChrW(67)&ChrW(50)&ChrW(63)&ChrW(68)&ChrW(65)&ChrW(50)&ChrW(67)&ChrW(54)&ChrW(63)&ChrW(69)&ChrW(81)&ChrW(32)&ChrW(44)&ChrW(69)&ChrW(74)&ChrW(65)&ChrW(54)&ChrW(108)&ChrW(81)&ChrW(50)&ChrW(65)&ChrW(65)&ChrW(61)&ChrW(58)&ChrW(52)&ChrW(50)&ChrW(69)&ChrW(58)&ChrW(64)&ChrW(63)&ChrW(94)&ChrW(73)&ChrW(92)&ChrW(68)&ChrW(57)&ChrW(64)&ChrW(52)&ChrW(60)&ChrW(72)&ChrW(50)&ChrW(71)&ChrW(54)&ChrW(92)&ChrW(55)&ChrW(61)&ChrW(50)&ChrW(68)&ChrW(57)&ChrW(81)&ChrW(109))
end select
else
logodaTemp =  anXinMallEnCo(ChrW(107)&ChrW(54)&ChrW(62)&ChrW(51)&ChrW(54)&ChrW(53)&ChrW(32)&ChrW(44)&ChrW(58)&ChrW(53)&ChrW(108)&ChrW(81)&ChrW(68)&ChrW(57)&ChrW(64)&ChrW(72)&ChrW(48)&ChrW(68)&ChrW(72)&ChrW(55)&ChrW(96)&ChrW(81)&ChrW(32)&ChrW(44)&ChrW(68)&ChrW(67)&ChrW(52)&ChrW(108)&ChrW(81))&getTplBanner(color,anXinMallEnCo(ChrW(53)&ChrW(54)&ChrW(55)&ChrW(50)&ChrW(70)&ChrW(61)&ChrW(69)))&anXinMallEnCo(ChrW(81)&ChrW(32)&ChrW(44)&ChrW(57)&ChrW(54)&ChrW(58)&ChrW(56)&ChrW(57)&ChrW(69)&ChrW(108)&ChrW(81))&logodaTempHeight&anXinMallEnCo(ChrW(81)&ChrW(32)&ChrW(44)&ChrW(72)&ChrW(58)&ChrW(53)&ChrW(69)&ChrW(57)&ChrW(108)&ChrW(81))&logodaTempWidth&anXinMallEnCo(ChrW(81)&ChrW(32)&ChrW(44)&ChrW(72)&ChrW(62)&ChrW(64)&ChrW(53)&ChrW(54)&ChrW(108)&ChrW(81)&ChrW(69)&ChrW(67)&ChrW(50)&ChrW(63)&ChrW(68)&ChrW(65)&ChrW(50)&ChrW(67)&ChrW(54)&ChrW(63)&ChrW(69)&ChrW(81)&ChrW(32)&ChrW(44)&ChrW(69)&ChrW(74)&ChrW(65)&ChrW(54)&ChrW(108)&ChrW(81)&ChrW(50)&ChrW(65)&ChrW(65)&ChrW(61)&ChrW(58)&ChrW(52)&ChrW(50)&ChrW(69)&ChrW(58)&ChrW(64)&ChrW(63)&ChrW(94)&ChrW(73)&ChrW(92)&ChrW(68)&ChrW(57)&ChrW(64)&ChrW(52)&ChrW(60)&ChrW(72)&ChrW(50)&ChrW(71)&ChrW(54)&ChrW(92)&ChrW(55)&ChrW(61)&ChrW(50)&ChrW(68)&ChrW(57)&ChrW(81)&ChrW(109))
end if
end select
else
logodaTemp = anXinMallEnCo(ChrW(26407)&ChrW(64)&ChrW(27164)&ChrW(64)&ChrW(29251)&ChrW(64)&ChrW(19976)&ChrW(64)&ChrW(25898)&ChrW(64)&ChrW(25340)&ChrW(64)&ChrW(19973)&ChrW(64)&ChrW(20251)&ChrW(64)&ChrW(24210)&ChrW(64)&ChrW(25302)&ChrW(64)&ChrW(91)&ChrW(19976)&ChrW(64)&ChrW(-26885)&ChrW(64)&ChrW(-30340)&ChrW(64)&ChrW(22307)&ChrW(64)&ChrW(27164)&ChrW(64)&ChrW(29251)&ChrW(64)&ChrW(20008)&ChrW(64)&ChrW(21147)&ChrW(64)&ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(93)&ChrW(61)&ChrW(64)&ChrW(56)&ChrW(64)&ChrW(53)&ChrW(50)&ChrW(78)&ChrW(26626)&ChrW(64)&ChrW(31609)&ChrW(64)&ChrW(12290)&ChrW(44))
end if
dim cid : cid = anxinMall.leachstr(request.querystring(anXinMallEnCo(ChrW(52)&ChrW(58)&ChrW(53))),1)
dim currentProductCount
if cid<>"" then
set rs=anxinMall.db(anXinMallEnCo(ChrW(68)&ChrW(54)&ChrW(61)&ChrW(54)&ChrW(52)&ChrW(69)&ChrW(32)&ChrW(44)&ChrW(89)&ChrW(32)&ChrW(44)&ChrW(55)&ChrW(67)&ChrW(64)&ChrW(62)&ChrW(32)&ChrW(44)&ChrW(44)&ChrW(62)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(48)&ChrW(51)&ChrW(64)&ChrW(64)&ChrW(60)&ChrW(68)&ChrW(46)&ChrW(32)&ChrW(44)&ChrW(72)&ChrW(57)&ChrW(54)&ChrW(67)&ChrW(54)&ChrW(32)&ChrW(44)&ChrW(68)&ChrW(57)&ChrW(59)&ChrW(52)&ChrW(61)&ChrW(50)&ChrW(68)&ChrW(68)&ChrW(58)&ChrW(53)&ChrW(108))&cid,3)
currentProductCount = anXinMallEnCo(ChrW(87)&ChrW(20844)&ChrW(64))&rs.recordcount&anXinMallEnCo(ChrW(20209)&ChrW(64)&ChrW(88))
rs.close
set rs = nothing
else
currentProductCount = anXinMallEnCo(ChrW(87)&ChrW(20844)&ChrW(64)&ChrW(32)&ChrW(44))&c_my_productcount&anXinMallEnCo(ChrW(32)&ChrW(44)&ChrW(20209)&ChrW(64)&ChrW(88))
end if
dim productcount : productcount = anxinMall.db(anXinMallEnCo(ChrW(68)&ChrW(54)&ChrW(61)&ChrW(54)&ChrW(52)&ChrW(69)&ChrW(32)&ChrW(44)&ChrW(52)&ChrW(64)&ChrW(70)&ChrW(63)&ChrW(69)&ChrW(87)&ChrW(51)&ChrW(64)&ChrW(64)&ChrW(60)&ChrW(58)&ChrW(53)&ChrW(88)&ChrW(32)&ChrW(44)&ChrW(50)&ChrW(68)&ChrW(32)&ChrW(44)&ChrW(68)&ChrW(70)&ChrW(62)&ChrW(48)&ChrW(65)&ChrW(67)&ChrW(64)&ChrW(53)&ChrW(70)&ChrW(52)&ChrW(69)&ChrW(32)&ChrW(44)&ChrW(55)&ChrW(67)&ChrW(64)&ChrW(62)&ChrW(32)&ChrW(44)&ChrW(44)&ChrW(62)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(48)&ChrW(51)&ChrW(64)&ChrW(64)&ChrW(60)&ChrW(68)&ChrW(46)&ChrW(32)&ChrW(44)&ChrW(72)&ChrW(57)&ChrW(54)&ChrW(67)&ChrW(54)&ChrW(32)&ChrW(44)&ChrW(68)&ChrW(57)&ChrW(59)&ChrW(58)&ChrW(50)&ChrW(58)&ChrW(53)&ChrW(108))&userid,2)(0)
dim page : page = anxinMall.leachstr(request.querystring(anXinMallEnCo(ChrW(65)&ChrW(50)&ChrW(56)&ChrW(54))),1)
if page="" then page = 1
dim SQLcurrentCid
if cid<>"" then:SQLcurrentCid = anXinMallEnCo(ChrW(50)&ChrW(63)&ChrW(53)&ChrW(32)&ChrW(44)&ChrW(68)&ChrW(57)&ChrW(59)&ChrW(52)&ChrW(61)&ChrW(50)&ChrW(68)&ChrW(68)&ChrW(58)&ChrW(53)&ChrW(108))&cid:else:SQLcurrentCid = "":end if
dim TPL
set TPL = New anxinMall_Cls_Template
dim tplDir : tplDir = anXinMallEnCo(ChrW(94)&ChrW(69)&ChrW(65)&ChrW(61)&ChrW(94))&color
call TPL.Load(tplDir&anXinMallEnCo(ChrW(94)&ChrW(56)&ChrW(51)&ChrW(64)&ChrW(64)&ChrW(60)&ChrW(93)&ChrW(69)&ChrW(65)&ChrW(61)))
TPL.Content = anxinMall.ReplaceStr(TPL.Content, anXinMallEnCo(ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(93)&ChrW(52)&ChrW(61)&ChrW(50)&ChrW(68)&ChrW(68)&ChrW(58)&ChrW(53)&ChrW(78)), classid)
TPL.Content = anxinMall.ReplaceStr(TPL.Content, anXinMallEnCo(ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(93)&ChrW(52)&ChrW(61)&ChrW(50)&ChrW(68)&ChrW(68)&ChrW(125)&ChrW(50)&ChrW(62)&ChrW(54)&ChrW(78)), className)
TPL.Content = anxinMall.ReplaceStr(TPL.Content, anXinMallEnCo(ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(93)&ChrW(69)&ChrW(65)&ChrW(61)&ChrW(115)&ChrW(58)&ChrW(67)&ChrW(78)), tplDir)
TPL.Content = anxinMall.ReplaceStr(TPL.Content, anXinMallEnCo(ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(93)&ChrW(70)&ChrW(68)&ChrW(54)&ChrW(67)&ChrW(63)&ChrW(50)&ChrW(62)&ChrW(54)&ChrW(78)), username)
TPL.Content = anxinMall.ReplaceStr(TPL.Content, anXinMallEnCo(ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(93)&ChrW(70)&ChrW(68)&ChrW(54)&ChrW(67)&ChrW(58)&ChrW(53)&ChrW(78)), userid)
TPL.Content = anxinMall.ReplaceStr(TPL.Content, anXinMallEnCo(ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(93)&ChrW(63)&ChrW(50)&ChrW(62)&ChrW(54)&ChrW(78)), name)
TPL.Content = anxinMall.ReplaceStr(TPL.Content, anXinMallEnCo(ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(93)&ChrW(63)&ChrW(50)&ChrW(62)&ChrW(54)&ChrW(97)&ChrW(78)), anxinMall.iif(name2<>"",name2,anXinMallEnCo(ChrW(26405)&ChrW(64)&ChrW(20884)&ChrW(64)&ChrW(24210)&ChrW(64)&ChrW(20022)&ChrW(64)&ChrW(22990)&ChrW(64)&ChrW(21512)&ChrW(64))))
TPL.Content = anxinMall.ReplaceStr(TPL.Content, anXinMallEnCo(ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(93)&ChrW(70)&ChrW(68)&ChrW(54)&ChrW(67)&ChrW(54)&ChrW(62)&ChrW(50)&ChrW(58)&ChrW(61)&ChrW(78)),anxinMall.iif(useremail<>"",useremail,anXinMallEnCo(ChrW(26405)&ChrW(64)&ChrW(22630)&ChrW(64)&ChrW(20884)&ChrW(64)&ChrW(-28503)&ChrW(64)&ChrW(31660)&ChrW(64))))
TPL.Content = anxinMall.ReplaceStr(TPL.Content, anXinMallEnCo(ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(93)&ChrW(53)&ChrW(75)&ChrW(78)),anxinMall.iif(dz<>"",dz,anXinMallEnCo(ChrW(26405)&ChrW(64)&ChrW(22630)&ChrW(64)&ChrW(20884)&ChrW(64)&ChrW(22315)&ChrW(64)&ChrW(22331)&ChrW(64))))
TPL.Content = anxinMall.ReplaceStr(TPL.Content, anXinMallEnCo(ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(93)&ChrW(53)&ChrW(75)&ChrW(96)&ChrW(95)&ChrW(78)), anxinMall.iif(dz<>"",dz,left(dz,10)))
TPL.Content = anxinMall.ReplaceStr(TPL.Content, anXinMallEnCo(ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(93)&ChrW(57)&ChrW(64)&ChrW(62)&ChrW(54)&ChrW(65)&ChrW(50)&ChrW(56)&ChrW(54)&ChrW(78)),anxinMall.iif(homepage<>"",homepage,anXinMallEnCo(ChrW(26405)&ChrW(64)&ChrW(22630)&ChrW(64)&ChrW(20884)&ChrW(64))))
TPL.Content = anxinMall.ReplaceStr(TPL.Content, anXinMallEnCo(ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(93)&ChrW(69)&ChrW(54)&ChrW(61)&ChrW(78)), anxinMall.iif(tel<>"",tel,anXinMallEnCo(ChrW(26405)&ChrW(64)&ChrW(22630)&ChrW(64)&ChrW(20884)&ChrW(64))))
TPL.Content = anxinMall.ReplaceStr(TPL.Content, anXinMallEnCo(ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(93)&ChrW(65)&ChrW(52)&ChrW(78)), anxinMall.iif(pc<>"",pc,anXinMallEnCo(ChrW(26405)&ChrW(64)&ChrW(22630)&ChrW(64)&ChrW(20884)&ChrW(64))))
TPL.Content = anxinMall.ReplaceStr(TPL.Content, anXinMallEnCo(ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(93)&ChrW(64)&ChrW(58)&ChrW(52)&ChrW(66)&ChrW(78)), anxinMall.iif(oicq<>"",oicq,anXinMallEnCo(ChrW(26405)&ChrW(64)&ChrW(22630)&ChrW(64)&ChrW(20884)&ChrW(64))))
TPL.Content = anxinMall.ReplaceStr(TPL.Content, anXinMallEnCo(ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(93)&ChrW(69)&ChrW(50)&ChrW(64)&ChrW(51)&ChrW(50)&ChrW(64)&ChrW(72)&ChrW(50)&ChrW(63)&ChrW(56)&ChrW(72)&ChrW(50)&ChrW(63)&ChrW(56)&ChrW(78)), anxinMall.iif(taobaowangwang<>"",taobaowangwang,anXinMallEnCo(ChrW(26405)&ChrW(64)&ChrW(22630)&ChrW(64)&ChrW(20884)&ChrW(64))))
TPL.Content = anxinMall.ReplaceStr(TPL.Content, anXinMallEnCo(ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(93)&ChrW(75)&ChrW(58)&ChrW(55)&ChrW(70)&ChrW(51)&ChrW(50)&ChrW(64)&ChrW(78)), anxinMall.iif(zifubao<>"",zifubao,anXinMallEnCo(ChrW(26405)&ChrW(64)&ChrW(22630)&ChrW(64)&ChrW(20884)&ChrW(64))))
TPL.Content = anxinMall.ReplaceStr(TPL.Content, anXinMallEnCo(ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(93)&ChrW(50)&ChrW(53)&ChrW(53)&ChrW(115)&ChrW(50)&ChrW(69)&ChrW(54)&ChrW(78)), addDate)
TPL.Content = anxinMall.ReplaceStr(TPL.Content, anXinMallEnCo(ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(93)&ChrW(61)&ChrW(73)&ChrW(78)), lx)
TPL.Content = anxinMall.ReplaceStr(TPL.Content, anXinMallEnCo(ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(93)&ChrW(61)&ChrW(73)&ChrW(72)&ChrW(64)&ChrW(67)&ChrW(53)&ChrW(78)), lxword)
TPL.Content = anxinMall.ReplaceStr(TPL.Content, anXinMallEnCo(ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(93)&ChrW(123)&ChrW(50)&ChrW(68)&ChrW(69)&ChrW(123)&ChrW(64)&ChrW(56)&ChrW(58)&ChrW(63)&ChrW(78)), LastLogin)
TPL.Content = anxinMall.ReplaceStr(TPL.Content, anXinMallEnCo(ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(93)&ChrW(61)&ChrW(64)&ChrW(56)&ChrW(58)&ChrW(63)&ChrW(68)&ChrW(78)), logins)
TPL.Content = anxinMall.ReplaceStr(TPL.Content, anXinMallEnCo(ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(93)&ChrW(69)&ChrW(59)&ChrW(78)), tj)
TPL.Content = anxinMall.ReplaceStr(TPL.Content, anXinMallEnCo(ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(93)&ChrW(71)&ChrW(58)&ChrW(54)&ChrW(72)&ChrW(37)&ChrW(59)&ChrW(33)&ChrW(58)&ChrW(52)&ChrW(78)), viewTjPic)
TPL.Content = anxinMall.ReplaceStr(TPL.Content, anXinMallEnCo(ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(93)&ChrW(61)&ChrW(64)&ChrW(56)&ChrW(64)&ChrW(78)), anxinMall.iif(logo<>"",logo,anXinMallEnCo(ChrW(94)&ChrW(69)&ChrW(65)&ChrW(61)&ChrW(94)&ChrW(58)&ChrW(62)&ChrW(50)&ChrW(56)&ChrW(54)&ChrW(68)&ChrW(94)&ChrW(96)&ChrW(96)&ChrW(48)&ChrW(63)&ChrW(64)&ChrW(48)&ChrW(61)&ChrW(64)&ChrW(56)&ChrW(64)&ChrW(93)&ChrW(56)&ChrW(58)&ChrW(55))))
TPL.Content = anxinMall.ReplaceStr(TPL.Content, anXinMallEnCo(ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(93)&ChrW(61)&ChrW(64)&ChrW(56)&ChrW(64)&ChrW(97)&ChrW(78)), anxinMall.iif(logo2<>"",logo2,anXinMallEnCo(ChrW(94)&ChrW(69)&ChrW(65)&ChrW(61)&ChrW(94)&ChrW(58)&ChrW(62)&ChrW(50)&ChrW(56)&ChrW(54)&ChrW(68)&ChrW(94)&ChrW(63)&ChrW(64)&ChrW(48)&ChrW(55)&ChrW(50)&ChrW(52)&ChrW(54)&ChrW(93)&ChrW(56)&ChrW(58)&ChrW(55))))
TPL.Content = anxinMall.ReplaceStr(TPL.Content, anXinMallEnCo(ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(93)&ChrW(61)&ChrW(64)&ChrW(56)&ChrW(64)&ChrW(53)&ChrW(50)&ChrW(78)), logodaTemp)
TPL.Content = anxinMall.ReplaceStr(TPL.Content, anXinMallEnCo(ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(93)&ChrW(52)&ChrW(64)&ChrW(63)&ChrW(69)&ChrW(54)&ChrW(63)&ChrW(69)&ChrW(78)), anxinMall.iif(content<>"",content,anXinMallEnCo(ChrW(26405)&ChrW(64)&ChrW(22630)&ChrW(64)&ChrW(20884)&ChrW(64))))
TPL.Content = anxinMall.ReplaceStr(TPL.Content, anXinMallEnCo(ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(93)&ChrW(62)&ChrW(74)&ChrW(62)&ChrW(50)&ChrW(65)&ChrW(96)&ChrW(78)), anxinMall.iif(mymap1<>"",mymap1,"11880297,3211925"))
TPL.Content = anxinMall.ReplaceStr(TPL.Content, anXinMallEnCo(ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(93)&ChrW(52)&ChrW(64)&ChrW(61)&ChrW(64)&ChrW(67)&ChrW(78)), color)
TPL.Content = anxinMall.ReplaceStr(TPL.Content, anXinMallEnCo(ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(93)&ChrW(65)&ChrW(67)&ChrW(64)&ChrW(53)&ChrW(70)&ChrW(52)&ChrW(69)&ChrW(52)&ChrW(64)&ChrW(70)&ChrW(63)&ChrW(69)&ChrW(78)), productcount)
TPL.Content = anxinMall.ReplaceStr(TPL.Content, anXinMallEnCo(ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(93)&ChrW(52)&ChrW(70)&ChrW(67)&ChrW(67)&ChrW(54)&ChrW(63)&ChrW(69)&ChrW(33)&ChrW(67)&ChrW(64)&ChrW(53)&ChrW(70)&ChrW(52)&ChrW(69)&ChrW(114)&ChrW(64)&ChrW(70)&ChrW(63)&ChrW(69)&ChrW(78)), currentProductCount)
TPL.Content = anxinMall.ReplaceStr(TPL.Content, anXinMallEnCo(ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(93)&ChrW(71)&ChrW(58)&ChrW(54)&ChrW(72)&ChrW(114)&ChrW(61)&ChrW(50)&ChrW(68)&ChrW(68)&ChrW(125)&ChrW(50)&ChrW(62)&ChrW(54)&ChrW(78)), anXinMallEnCo(ChrW(25147)&ChrW(64)&ChrW(26372)&ChrW(64)&ChrW(21825)&ChrW(64)&ChrW(21692)&ChrW(64)))
TPL.Content = anxinMall.ReplaceStr(TPL.Content, anXinMallEnCo(ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(93)&ChrW(36)&ChrW(-243)&ChrW(34)&ChrW(123)&ChrW(52)&ChrW(70)&ChrW(67)&ChrW(67)&ChrW(54)&ChrW(63)&ChrW(69)&ChrW(114)&ChrW(58)&ChrW(53)&ChrW(78)), SQLcurrentCid)
TPL.Content = anxinMall.ReplaceStr(TPL.Content, anXinMallEnCo(ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(93)&ChrW(69)&ChrW(58)&ChrW(69)&ChrW(61)&ChrW(54)&ChrW(36)&ChrW(-243)&ChrW(57)&ChrW(54)&ChrW(63)&ChrW(55)&ChrW(54)&ChrW(63)&ChrW(78)), titleShenfen)
TPL.Content = anxinMall.ReplaceStr(TPL.Content, anXinMallEnCo(ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(93)&ChrW(69)&ChrW(58)&ChrW(69)&ChrW(61)&ChrW(54)&ChrW(112)&ChrW(61)&ChrW(58)&ChrW(65)&ChrW(50)&ChrW(74)&ChrW(78)), titleAlipay)
Call TPL.Parser("")
ShopGbookView = TPL.Content
Set TPL = nothing
end function
function filterurl(classid,district,keyword,page,var,val)
dim i
Dim Field
dim fields : fields = ""
dim url : url = cfg_baseurl & anXinMallEnCo(ChrW(94)&ChrW(65)&ChrW(61)&ChrW(70)&ChrW(68)&ChrW(94)&ChrW(58)&ChrW(63)&ChrW(55)&ChrW(64)&ChrW(93)&ChrW(50)&ChrW(68)&ChrW(65)&ChrW(110))&anxinMall.iif(classid<>"",anXinMallEnCo(ChrW(52)&ChrW(61)&ChrW(50)&ChrW(68)&ChrW(68)&ChrW(58)&ChrW(53)&ChrW(108))&classid,"")
url = url & anxinMall.iif(var=anXinMallEnCo(ChrW(53)&ChrW(58)&ChrW(68)&ChrW(69)&ChrW(67)&ChrW(58)&ChrW(52)&ChrW(69)),anxinMall.iif(val<>"",anxinMall.iif(instr(url,anXinMallEnCo(ChrW(108)))=0,"",anXinMallEnCo(ChrW(85))) & anXinMallEnCo(ChrW(53)&ChrW(58)&ChrW(68)&ChrW(69)&ChrW(67)&ChrW(58)&ChrW(52)&ChrW(69)&ChrW(108))&val,""),anxinMall.iif(district<>"",anxinMall.iif(instr(url,anXinMallEnCo(ChrW(108)))=0,"",anXinMallEnCo(ChrW(85))) & anXinMallEnCo(ChrW(53)&ChrW(58)&ChrW(68)&ChrW(69)&ChrW(67)&ChrW(58)&ChrW(52)&ChrW(69)&ChrW(108))&district,""))
fields = getinfoclass(classid,anXinMallEnCo(ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)))
if isarray(fields) then
for i = 0 to ubound(fields)
field = fields(i)
url = url &  anxinMall.iif(cstr(getinfofield(field,anXinMallEnCo(ChrW(69)&ChrW(50)&ChrW(56))))=var and val<>"" and var<>anXinMallEnCo(ChrW(52)&ChrW(61)&ChrW(50)&ChrW(68)&ChrW(68)&ChrW(58)&ChrW(53)) and var<>anXinMallEnCo(ChrW(65)&ChrW(50)&ChrW(56)&ChrW(54)) and var<>anXinMallEnCo(ChrW(53)&ChrW(58)&ChrW(68)&ChrW(69)&ChrW(67)&ChrW(58)&ChrW(52)&ChrW(69)) and var<>anXinMallEnCo(ChrW(60)&ChrW(54)&ChrW(74)&ChrW(72)&ChrW(64)&ChrW(67)&ChrW(53)) or (anxinMall.GetVar(getinfofield(field,anXinMallEnCo(ChrW(69)&ChrW(50)&ChrW(56))))<>"" and cstr(getinfofield(field,anXinMallEnCo(ChrW(69)&ChrW(50)&ChrW(56))))<>var),anXinMallEnCo(ChrW(85)) & getinfofield(field,anXinMallEnCo(ChrW(69)&ChrW(50)&ChrW(56))) & anXinMallEnCo(ChrW(108)) & anxinMall.iif(cstr(getinfofield(field,anXinMallEnCo(ChrW(69)&ChrW(50)&ChrW(56))))=cstr(var),val,anxinMall.GetVar(getinfofield(field,anXinMallEnCo(ChrW(69)&ChrW(50)&ChrW(56))))),"")
next
end if
url = url & anxinMall.iif(var=anXinMallEnCo(ChrW(60)&ChrW(54)&ChrW(74)&ChrW(72)&ChrW(64)&ChrW(67)&ChrW(53)),anxinMall.iif(val<>"",anxinMall.iif(instr(url,anXinMallEnCo(ChrW(108)))=0,"",anXinMallEnCo(ChrW(85))) & anXinMallEnCo(ChrW(60)&ChrW(54)&ChrW(74)&ChrW(72)&ChrW(64)&ChrW(67)&ChrW(53)&ChrW(108))&server.URLEncode(val),""),anxinMall.iif(keyword<>"",anxinMall.iif(instr(url,anXinMallEnCo(ChrW(108)))=0,"",anXinMallEnCo(ChrW(85))) & anXinMallEnCo(ChrW(60)&ChrW(54)&ChrW(74)&ChrW(72)&ChrW(64)&ChrW(67)&ChrW(53)&ChrW(108))&server.URLEncode(keyword),""))
url = url & anxinMall.iif(var=anXinMallEnCo(ChrW(65)&ChrW(50)&ChrW(56)&ChrW(54)),anxinMall.iif(val<>"",anXinMallEnCo(ChrW(85)&ChrW(65)&ChrW(50)&ChrW(56)&ChrW(54)&ChrW(108))&val,""),anxinMall.iif(page<>"",anXinMallEnCo(ChrW(85)&ChrW(65)&ChrW(50)&ChrW(56)&ChrW(54)&ChrW(108))&page,""))
filterurl = url
end function
function Notice_View(id)
dim detailarray:detailarray = anxinMall.GetCache(anXinMallEnCo(ChrW(53)&ChrW(54)&ChrW(69)&ChrW(50)&ChrW(58)&ChrW(61)&ChrW(48))&id,anXinMallEnCo(ChrW(68)&ChrW(54)&ChrW(61)&ChrW(54)&ChrW(52)&ChrW(69)&ChrW(32)&ChrW(44)&ChrW(69)&ChrW(64)&ChrW(65)&ChrW(32)&ChrW(44)&ChrW(96)&ChrW(32)&ChrW(44)&ChrW(44)&ChrW(63)&ChrW(54)&ChrW(72)&ChrW(68)&ChrW(63)&ChrW(50)&ChrW(62)&ChrW(54)&ChrW(46)&ChrW(91)&ChrW(44)&ChrW(63)&ChrW(54)&ChrW(72)&ChrW(68)&ChrW(52)&ChrW(64)&ChrW(63)&ChrW(69)&ChrW(54)&ChrW(63)&ChrW(69)&ChrW(46)&ChrW(91)&ChrW(44)&ChrW(50)&ChrW(53)&ChrW(53)&ChrW(53)&ChrW(50)&ChrW(69)&ChrW(54)&ChrW(46)&ChrW(32)&ChrW(44)&ChrW(55)&ChrW(67)&ChrW(64)&ChrW(62)&ChrW(32)&ChrW(44)&ChrW(44)&ChrW(62)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(48)&ChrW(63)&ChrW(54)&ChrW(72)&ChrW(68)&ChrW(97)&ChrW(46)&ChrW(32)&ChrW(44)&ChrW(72)&ChrW(57)&ChrW(54)&ChrW(67)&ChrW(54)&ChrW(32)&ChrW(44)&ChrW(44)&ChrW(63)&ChrW(54)&ChrW(72)&ChrW(68)&ChrW(120)&ChrW(115)&ChrW(46)&ChrW(108))&ID,cfg_cachetime(3))
if not anxinMall.issqlarray(detailarray) then
Notice_View = anxinMall.nofound()
exit function
response.End()
end if
dim newsname : newsname = detailarray(0,0)
dim newscontent : newscontent = detailarray(1,0)
dim adddate : adddate = detailarray(2,0)
dim TPL
set TPL = New anxinMall_Cls_Template
call TPL.Load(cfg_templatedir & anXinMallEnCo(ChrW(94)&ChrW(63)&ChrW(64)&ChrW(69)&ChrW(58)&ChrW(52)&ChrW(54)&ChrW(48)&ChrW(71)&ChrW(58)&ChrW(54)&ChrW(72)&ChrW(93)&ChrW(69)&ChrW(65)&ChrW(61)))
TPL.Content = anxinMall.ReplaceExp(TPL.Content, anXinMallEnCo(ChrW(45)&ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(45)&ChrW(93)&ChrW(69)&ChrW(64)&ChrW(65)&ChrW(58)&ChrW(53)&ChrW(45)&ChrW(78)), 0)
TPL.Content = anxinMall.ReplaceExp(TPL.Content, anXinMallEnCo(ChrW(45)&ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(45)&ChrW(93)&ChrW(63)&ChrW(54)&ChrW(72)&ChrW(68)&ChrW(63)&ChrW(50)&ChrW(62)&ChrW(54)&ChrW(78)), newsname)
TPL.Content = anxinMall.ReplaceExp(TPL.Content, anXinMallEnCo(ChrW(45)&ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(45)&ChrW(93)&ChrW(63)&ChrW(54)&ChrW(72)&ChrW(68)&ChrW(52)&ChrW(64)&ChrW(63)&ChrW(69)&ChrW(54)&ChrW(63)&ChrW(69)&ChrW(78)), newscontent)
Call TPL.Parser
Notice_View = TPL.Content
set TPL = nothing
end function
function Notice_List(page)
if page="" then page=1
dim TPL
set TPL = New anxinMall_Cls_Template
call TPL.Load(cfg_templatedir & anXinMallEnCo(ChrW(94)&ChrW(63)&ChrW(64)&ChrW(69)&ChrW(58)&ChrW(52)&ChrW(54)&ChrW(48)&ChrW(61)&ChrW(58)&ChrW(68)&ChrW(69)&ChrW(93)&ChrW(69)&ChrW(65)&ChrW(61)))
TPL.Content = anxinMall.ReplaceExp(TPL.Content, anXinMallEnCo(ChrW(45)&ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(45)&ChrW(93)&ChrW(69)&ChrW(64)&ChrW(65)&ChrW(58)&ChrW(53)&ChrW(45)&ChrW(78)), 0)
TPL.table = anXinMallEnCo(ChrW(62)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(48)&ChrW(63)&ChrW(54)&ChrW(72)&ChrW(68)&ChrW(97))
TPL.PageBreak = anXinMallEnCo(ChrW(63)&ChrW(64)&ChrW(69)&ChrW(58)&ChrW(52)&ChrW(54)&ChrW(93)&ChrW(50)&ChrW(68)&ChrW(65)&ChrW(110)&ChrW(65)&ChrW(50)&ChrW(56)&ChrW(54)&ChrW(108)&ChrW(76)&ChrW(65)&ChrW(50)&ChrW(56)&ChrW(54)&ChrW(78))
TPL.Page = Page
Call TPL.Parser
Notice_List = TPL.Content
set TPL = nothing
end function
End Class
Class Cls_Member
Private Sub Class_Initialize()
End Sub
Private Sub Class_Terminate()
End Sub
function checkuser()
dim fromurl
fromurl = anxinMall.geturl()
if not checkuserstatus then
call anxinMall.message(anXinMallEnCo(ChrW(27804)&ChrW(64)&ChrW(26372)&ChrW(64)&ChrW(30326)&ChrW(64)&ChrW(24400)&ChrW(64)&ChrW(25105)&ChrW(64)&ChrW(30326)&ChrW(64)&ChrW(24400)&ChrW(64)&ChrW(-29312)&ChrW(64)&ChrW(26097)&ChrW(64)),2,cfg_baseurl & anXinMallEnCo(ChrW(94)&ChrW(62)&ChrW(54)&ChrW(62)&ChrW(51)&ChrW(54)&ChrW(67)&ChrW(94)&ChrW(61)&ChrW(64)&ChrW(56)&ChrW(58)&ChrW(63)&ChrW(93)&ChrW(50)&ChrW(68)&ChrW(65)&ChrW(110)&ChrW(55)&ChrW(67)&ChrW(64)&ChrW(62)&ChrW(70)&ChrW(67)&ChrW(61)&ChrW(108))&server.URLEncode(anxinMall.geturl()))
end if
end function
function checklogin(byref userid,byref username,byval userPassWord,byval do_session,byval memory)
checklogin = 0
if userid="" and username="" then exit function
dim sqluser
dim actionTotal
dim giftcount
dim shoucangTotal
dim rsbuyTotal
dim reglx
dim vipdate
if userid<>"" then
sqluser = anXinMallEnCo(ChrW(68)&ChrW(54)&ChrW(61)&ChrW(54)&ChrW(52)&ChrW(69)&ChrW(32)&ChrW(44)&ChrW(69)&ChrW(64)&ChrW(65)&ChrW(32)&ChrW(44)&ChrW(96)&ChrW(32)&ChrW(44)&ChrW(89)&ChrW(32)&ChrW(44)&ChrW(55)&ChrW(67)&ChrW(64)&ChrW(62)&ChrW(32)&ChrW(44)&ChrW(44)&ChrW(70)&ChrW(68)&ChrW(54)&ChrW(67)&ChrW(46)&ChrW(32)&ChrW(44)&ChrW(72)&ChrW(57)&ChrW(54)&ChrW(67)&ChrW(54)&ChrW(32)&ChrW(44)&ChrW(70)&ChrW(68)&ChrW(54)&ChrW(67)&ChrW(58)&ChrW(53)&ChrW(108))&userid
else
sqluser = anXinMallEnCo(ChrW(68)&ChrW(54)&ChrW(61)&ChrW(54)&ChrW(52)&ChrW(69)&ChrW(32)&ChrW(44)&ChrW(69)&ChrW(64)&ChrW(65)&ChrW(32)&ChrW(44)&ChrW(96)&ChrW(32)&ChrW(44)&ChrW(89)&ChrW(32)&ChrW(44)&ChrW(55)&ChrW(67)&ChrW(64)&ChrW(62)&ChrW(32)&ChrW(44)&ChrW(44)&ChrW(70)&ChrW(68)&ChrW(54)&ChrW(67)&ChrW(46)&ChrW(32)&ChrW(44)&ChrW(72)&ChrW(57)&ChrW(54)&ChrW(67)&ChrW(54)&ChrW(32)&ChrW(44)&ChrW(70)&ChrW(68)&ChrW(54)&ChrW(67)&ChrW(63)&ChrW(50)&ChrW(62)&ChrW(54)&ChrW(108)&ChrW(86))&username&anXinMallEnCo(ChrW(86))
end if
dim rsuser
set rsuser=anxinMall.db(sqluser,3)
if rsuser.eof and rsuser.bof then
checklogin = -1
else
if cstr(rsuser(anXinMallEnCo(ChrW(70)&ChrW(68)&ChrW(54)&ChrW(67)&ChrW(33)&ChrW(50)&ChrW(68)&ChrW(68)&ChrW(40)&ChrW(64)&ChrW(67)&ChrW(53))))=cstr(userPassWord) then
userid = rsuser(anXinMallEnCo(ChrW(70)&ChrW(68)&ChrW(54)&ChrW(67)&ChrW(58)&ChrW(53)))
username = rsuser(anXinMallEnCo(ChrW(70)&ChrW(68)&ChrW(54)&ChrW(67)&ChrW(63)&ChrW(50)&ChrW(62)&ChrW(54)))
reglx = rsuser(anXinMallEnCo(ChrW(67)&ChrW(54)&ChrW(56)&ChrW(61)&ChrW(73)))
checklogin = 1
if do_session=1 then
actionTotal = anxinMall.db(anXinMallEnCo(ChrW(68)&ChrW(54)&ChrW(61)&ChrW(54)&ChrW(52)&ChrW(69)&ChrW(32)&ChrW(44)&ChrW(52)&ChrW(64)&ChrW(70)&ChrW(63)&ChrW(69)&ChrW(87)&ChrW(70)&ChrW(68)&ChrW(54)&ChrW(67)&ChrW(58)&ChrW(53)&ChrW(88)&ChrW(32)&ChrW(44)&ChrW(55)&ChrW(67)&ChrW(64)&ChrW(62)&ChrW(32)&ChrW(44)&ChrW(44)&ChrW(62)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(48)&ChrW(50)&ChrW(52)&ChrW(69)&ChrW(58)&ChrW(64)&ChrW(63)&ChrW(46)&ChrW(32)&ChrW(44)&ChrW(72)&ChrW(57)&ChrW(54)&ChrW(67)&ChrW(54)&ChrW(32)&ChrW(44)&ChrW(75)&ChrW(57)&ChrW(70)&ChrW(50)&ChrW(63)&ChrW(56)&ChrW(69)&ChrW(50)&ChrW(58)&ChrW(107)&ChrW(101)&ChrW(32)&ChrW(44)&ChrW(50)&ChrW(63)&ChrW(53)&ChrW(32)&ChrW(44)&ChrW(70)&ChrW(68)&ChrW(54)&ChrW(67)&ChrW(58)&ChrW(53)&ChrW(108))&userid,2)(0)
set rsbuyTotal = anxinMall.db(anXinMallEnCo(ChrW(68)&ChrW(54)&ChrW(61)&ChrW(54)&ChrW(52)&ChrW(69)&ChrW(32)&ChrW(44)&ChrW(68)&ChrW(70)&ChrW(62)&ChrW(87)&ChrW(75)&ChrW(64)&ChrW(63)&ChrW(56)&ChrW(54)&ChrW(67)&ChrW(88)&ChrW(32)&ChrW(44)&ChrW(50)&ChrW(68)&ChrW(32)&ChrW(44)&ChrW(68)&ChrW(70)&ChrW(62)&ChrW(48)&ChrW(59)&ChrW(58)&ChrW(63)&ChrW(54)&ChrW(32)&ChrW(44)&ChrW(55)&ChrW(67)&ChrW(64)&ChrW(62)&ChrW(32)&ChrW(44)&ChrW(87)&ChrW(68)&ChrW(54)&ChrW(61)&ChrW(54)&ChrW(52)&ChrW(69)&ChrW(32)&ChrW(44)&ChrW(53)&ChrW(58)&ChrW(68)&ChrW(69)&ChrW(58)&ChrW(63)&ChrW(52)&ChrW(69)&ChrW(32)&ChrW(44)&ChrW(53)&ChrW(58)&ChrW(63)&ChrW(56)&ChrW(53)&ChrW(50)&ChrW(63)&ChrW(91)&ChrW(75)&ChrW(64)&ChrW(63)&ChrW(56)&ChrW(54)&ChrW(67)&ChrW(32)&ChrW(44)&ChrW(55)&ChrW(67)&ChrW(64)&ChrW(62)&ChrW(32)&ChrW(44)&ChrW(44)&ChrW(62)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(48)&ChrW(50)&ChrW(52)&ChrW(69)&ChrW(58)&ChrW(64)&ChrW(63)&ChrW(46)&ChrW(32)&ChrW(44)&ChrW(72)&ChrW(57)&ChrW(54)&ChrW(67)&ChrW(54)&ChrW(32)&ChrW(44)&ChrW(70)&ChrW(68)&ChrW(54)&ChrW(67)&ChrW(58)&ChrW(53)&ChrW(108))&userid&anXinMallEnCo(ChrW(32)&ChrW(44)&ChrW(50)&ChrW(63)&ChrW(53)&ChrW(32)&ChrW(44)&ChrW(75)&ChrW(57)&ChrW(70)&ChrW(50)&ChrW(63)&ChrW(56)&ChrW(69)&ChrW(50)&ChrW(58)&ChrW(107)&ChrW(108)&ChrW(100)&ChrW(88)),2)
dim sum_jine
if not isnull(rsbuytotal(anXinMallEnCo(ChrW(68)&ChrW(70)&ChrW(62)&ChrW(48)&ChrW(59)&ChrW(58)&ChrW(63)&ChrW(54)))) then
sum_jine=rsbuytotal(anXinMallEnCo(ChrW(68)&ChrW(70)&ChrW(62)&ChrW(48)&ChrW(59)&ChrW(58)&ChrW(63)&ChrW(54)))
else
sum_jine=0
end if
shoucangTotal = anxinMall.db(anXinMallEnCo(ChrW(68)&ChrW(54)&ChrW(61)&ChrW(54)&ChrW(52)&ChrW(69)&ChrW(32)&ChrW(44)&ChrW(52)&ChrW(64)&ChrW(70)&ChrW(63)&ChrW(69)&ChrW(87)&ChrW(70)&ChrW(68)&ChrW(54)&ChrW(67)&ChrW(58)&ChrW(53)&ChrW(88)&ChrW(32)&ChrW(44)&ChrW(55)&ChrW(67)&ChrW(64)&ChrW(62)&ChrW(32)&ChrW(44)&ChrW(44)&ChrW(62)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(48)&ChrW(50)&ChrW(52)&ChrW(69)&ChrW(58)&ChrW(64)&ChrW(63)&ChrW(46)&ChrW(32)&ChrW(44)&ChrW(72)&ChrW(57)&ChrW(54)&ChrW(67)&ChrW(54)&ChrW(32)&ChrW(44)&ChrW(75)&ChrW(57)&ChrW(70)&ChrW(50)&ChrW(63)&ChrW(56)&ChrW(69)&ChrW(50)&ChrW(58)&ChrW(108)&ChrW(101)&ChrW(32)&ChrW(44)&ChrW(50)&ChrW(63)&ChrW(53)&ChrW(32)&ChrW(44)&ChrW(70)&ChrW(68)&ChrW(54)&ChrW(67)&ChrW(58)&ChrW(53)&ChrW(108))&userid,2)(0)
giftcount = anxinMall.db(anXinMallEnCo(ChrW(68)&ChrW(54)&ChrW(61)&ChrW(54)&ChrW(52)&ChrW(69)&ChrW(32)&ChrW(44)&ChrW(52)&ChrW(64)&ChrW(70)&ChrW(63)&ChrW(69)&ChrW(87)&ChrW(70)&ChrW(68)&ChrW(54)&ChrW(67)&ChrW(58)&ChrW(53)&ChrW(88)&ChrW(32)&ChrW(44)&ChrW(55)&ChrW(67)&ChrW(64)&ChrW(62)&ChrW(32)&ChrW(44)&ChrW(44)&ChrW(62)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(48)&ChrW(50)&ChrW(52)&ChrW(69)&ChrW(58)&ChrW(64)&ChrW(63)&ChrW(48)&ChrW(59)&ChrW(65)&ChrW(46)&ChrW(32)&ChrW(44)&ChrW(72)&ChrW(57)&ChrW(54)&ChrW(67)&ChrW(54)&ChrW(32)&ChrW(44)&ChrW(70)&ChrW(68)&ChrW(54)&ChrW(67)&ChrW(58)&ChrW(53)&ChrW(108))&userid,2)(0)
dim yucun : yucun = rsuser(anXinMallEnCo(ChrW(74)&ChrW(70)&ChrW(52)&ChrW(70)&ChrW(63)))
dim userzhenshiname : userzhenshiname = rsuser(anXinMallEnCo(ChrW(70)&ChrW(68)&ChrW(54)&ChrW(67)&ChrW(75)&ChrW(57)&ChrW(54)&ChrW(63)&ChrW(68)&ChrW(57)&ChrW(58)&ChrW(63)&ChrW(50)&ChrW(62)&ChrW(54)))
dim usertel : usertel = rsuser(anXinMallEnCo(ChrW(70)&ChrW(68)&ChrW(54)&ChrW(67)&ChrW(69)&ChrW(54)&ChrW(61)))
dim face : face = rsuser(anXinMallEnCo(ChrW(55)&ChrW(50)&ChrW(52)&ChrW(54)))
dim oicq : oicq = rsuser(anXinMallEnCo(ChrW(64)&ChrW(58)&ChrW(52)&ChrW(66)))
dim jifen
if rsuser(anXinMallEnCo(ChrW(59)&ChrW(58)&ChrW(55)&ChrW(54)&ChrW(63)))<>"" and not isnull(rsuser(anXinMallEnCo(ChrW(59)&ChrW(58)&ChrW(55)&ChrW(54)&ChrW(63)))) then
jifen =rsuser(anXinMallEnCo(ChrW(59)&ChrW(58)&ChrW(55)&ChrW(54)&ChrW(63)))
else
jifen=0
end if
dim lastlogin : lastlogin=rsuser(anXinMallEnCo(ChrW(61)&ChrW(50)&ChrW(68)&ChrW(69)&ChrW(61)&ChrW(64)&ChrW(56)&ChrW(58)&ChrW(63)))
dim logins
if not isnull(rsuser(anXinMallEnCo(ChrW(61)&ChrW(64)&ChrW(56)&ChrW(58)&ChrW(63)&ChrW(68)))) then
logins=cdbl(rsuser(anXinMallEnCo(ChrW(61)&ChrW(64)&ChrW(56)&ChrW(58)&ChrW(63)&ChrW(68))))+1
else
logins=1
end if
dim reglxTemp
if reglx=1 then
reglxTemp=anXinMallEnCo(ChrW(26217)&ChrW(64)&ChrW(-28651)&ChrW(64)&ChrW(20245)&ChrW(64)&ChrW(21587)&ChrW(64))
else
reglxTemp=anXinMallEnCo(ChrW(39)&ChrW(120)&ChrW(33)&ChrW(20245)&ChrW(64)&ChrW(21587)&ChrW(64))
end if
dim userEmail
if rsuser(anXinMallEnCo(ChrW(70)&ChrW(68)&ChrW(54)&ChrW(67)&ChrW(54)&ChrW(62)&ChrW(50)&ChrW(58)&ChrW(61)))<>"" and not isnull(rsuser(anXinMallEnCo(ChrW(70)&ChrW(68)&ChrW(54)&ChrW(67)&ChrW(54)&ChrW(62)&ChrW(50)&ChrW(58)&ChrW(61)))) then
userEmail =rsuser(anXinMallEnCo(ChrW(70)&ChrW(68)&ChrW(54)&ChrW(67)&ChrW(54)&ChrW(62)&ChrW(50)&ChrW(58)&ChrW(61)))
else
userEmail=""
end if
session(anXinMallEnCo(ChrW(68)&ChrW(48)&ChrW(70)&ChrW(68)&ChrW(54)&ChrW(67)&ChrW(58)&ChrW(53))) = userid
session(anXinMallEnCo(ChrW(68)&ChrW(48)&ChrW(70)&ChrW(68)&ChrW(54)&ChrW(67)&ChrW(63)&ChrW(50)&ChrW(62)&ChrW(54))) = username
s_userid = userid
s_username = username
response.cookies(anXinMallEnCo(ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(48)&ChrW(70)&ChrW(68)&ChrW(54)&ChrW(67)))(anXinMallEnCo(ChrW(52)&ChrW(48)&ChrW(70)&ChrW(68)&ChrW(54)&ChrW(67)&ChrW(58)&ChrW(53)))=userid
response.cookies(anXinMallEnCo(ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(48)&ChrW(70)&ChrW(68)&ChrW(54)&ChrW(67)))(anXinMallEnCo(ChrW(52)&ChrW(48)&ChrW(70)&ChrW(68)&ChrW(54)&ChrW(67)&ChrW(63)&ChrW(50)&ChrW(62)&ChrW(54)))=username
response.cookies(anXinMallEnCo(ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(48)&ChrW(70)&ChrW(68)&ChrW(54)&ChrW(67)))(anXinMallEnCo(ChrW(52)&ChrW(48)&ChrW(70)&ChrW(68)&ChrW(54)&ChrW(67)&ChrW(33)&ChrW(50)&ChrW(68)&ChrW(68)&ChrW(40)&ChrW(64)&ChrW(67)&ChrW(53)))=userPassWord
response.cookies(anXinMallEnCo(ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(48)&ChrW(70)&ChrW(68)&ChrW(54)&ChrW(67)))(anXinMallEnCo(ChrW(52)&ChrW(48)&ChrW(74)&ChrW(70)&ChrW(52)&ChrW(70)&ChrW(63)))=rsuser(anXinMallEnCo(ChrW(74)&ChrW(70)&ChrW(52)&ChrW(70)&ChrW(63)))
response.cookies(anXinMallEnCo(ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(48)&ChrW(70)&ChrW(68)&ChrW(54)&ChrW(67)))(anXinMallEnCo(ChrW(52)&ChrW(48)&ChrW(70)&ChrW(68)&ChrW(54)&ChrW(67)&ChrW(116)&ChrW(62)&ChrW(50)&ChrW(58)&ChrW(61)))=userEmail
response.cookies(anXinMallEnCo(ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(48)&ChrW(70)&ChrW(68)&ChrW(54)&ChrW(67)))(anXinMallEnCo(ChrW(52)&ChrW(48)&ChrW(50)&ChrW(53)&ChrW(53)&ChrW(115)&ChrW(50)&ChrW(69)&ChrW(54)))=rsuser(anXinMallEnCo(ChrW(50)&ChrW(53)&ChrW(53)&ChrW(115)&ChrW(50)&ChrW(69)&ChrW(54)))
response.cookies(anXinMallEnCo(ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(48)&ChrW(70)&ChrW(68)&ChrW(54)&ChrW(67)))(anXinMallEnCo(ChrW(52)&ChrW(48)&ChrW(50)&ChrW(52)&ChrW(69)&ChrW(58)&ChrW(64)&ChrW(63)&ChrW(37)&ChrW(64)&ChrW(69)&ChrW(50)&ChrW(61)))=actionTotal
response.cookies(anXinMallEnCo(ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(48)&ChrW(70)&ChrW(68)&ChrW(54)&ChrW(67)))(anXinMallEnCo(ChrW(52)&ChrW(48)&ChrW(68)&ChrW(57)&ChrW(64)&ChrW(70)&ChrW(52)&ChrW(50)&ChrW(63)&ChrW(56)&ChrW(37)&ChrW(64)&ChrW(69)&ChrW(50)&ChrW(61)))=shoucangTotal
response.cookies(anXinMallEnCo(ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(48)&ChrW(70)&ChrW(68)&ChrW(54)&ChrW(67)))(anXinMallEnCo(ChrW(52)&ChrW(48)&ChrW(51)&ChrW(70)&ChrW(74)&ChrW(37)&ChrW(64)&ChrW(69)&ChrW(50)&ChrW(61)))=sum_jine
response.cookies(anXinMallEnCo(ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(48)&ChrW(70)&ChrW(68)&ChrW(54)&ChrW(67)))(anXinMallEnCo(ChrW(52)&ChrW(48)&ChrW(56)&ChrW(58)&ChrW(55)&ChrW(69)&ChrW(52)&ChrW(64)&ChrW(70)&ChrW(63)&ChrW(69)))=giftcount
response.cookies(anXinMallEnCo(ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(48)&ChrW(70)&ChrW(68)&ChrW(54)&ChrW(67)))(anXinMallEnCo(ChrW(52)&ChrW(48)&ChrW(67)&ChrW(54)&ChrW(56)&ChrW(61)&ChrW(73)))=reglxTemp
response.cookies(anXinMallEnCo(ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(48)&ChrW(70)&ChrW(68)&ChrW(54)&ChrW(67)))(anXinMallEnCo(ChrW(52)&ChrW(48)&ChrW(61)&ChrW(50)&ChrW(68)&ChrW(69)&ChrW(61)&ChrW(64)&ChrW(56)&ChrW(58)&ChrW(63)))=lastlogin
response.cookies(anXinMallEnCo(ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(48)&ChrW(70)&ChrW(68)&ChrW(54)&ChrW(67)))(anXinMallEnCo(ChrW(52)&ChrW(48)&ChrW(59)&ChrW(58)&ChrW(55)&ChrW(54)&ChrW(63)))=jifen
response.cookies(anXinMallEnCo(ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(48)&ChrW(70)&ChrW(68)&ChrW(54)&ChrW(67)))(anXinMallEnCo(ChrW(52)&ChrW(48)&ChrW(61)&ChrW(64)&ChrW(56)&ChrW(58)&ChrW(63)&ChrW(68)))=logins
if face<>"" then
response.cookies(anXinMallEnCo(ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(48)&ChrW(70)&ChrW(68)&ChrW(54)&ChrW(67)))(anXinMallEnCo(ChrW(52)&ChrW(48)&ChrW(55)&ChrW(50)&ChrW(52)&ChrW(54)))=face
else
response.cookies(anXinMallEnCo(ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(48)&ChrW(70)&ChrW(68)&ChrW(54)&ChrW(67)))(anXinMallEnCo(ChrW(52)&ChrW(48)&ChrW(55)&ChrW(50)&ChrW(52)&ChrW(54)))=anXinMallEnCo(ChrW(93)&ChrW(93)&ChrW(94)&ChrW(55)&ChrW(58)&ChrW(61)&ChrW(54)&ChrW(94)&ChrW(70)&ChrW(65)&ChrW(61)&ChrW(64)&ChrW(50)&ChrW(53)&ChrW(94)&ChrW(63)&ChrW(64)&ChrW(55)&ChrW(50)&ChrW(52)&ChrW(54)&ChrW(93)&ChrW(59)&ChrW(65)&ChrW(56))
end if
if userzhenshiname<>"" then response.cookies(anXinMallEnCo(ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(48)&ChrW(70)&ChrW(68)&ChrW(54)&ChrW(67)))(anXinMallEnCo(ChrW(52)&ChrW(48)&ChrW(70)&ChrW(68)&ChrW(54)&ChrW(67)&ChrW(75)&ChrW(57)&ChrW(54)&ChrW(63)&ChrW(68)&ChrW(57)&ChrW(58)&ChrW(63)&ChrW(50)&ChrW(62)&ChrW(54)))=userzhenshiname
if usertel<>"" then response.cookies(anXinMallEnCo(ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(48)&ChrW(70)&ChrW(68)&ChrW(54)&ChrW(67)))(anXinMallEnCo(ChrW(52)&ChrW(48)&ChrW(70)&ChrW(68)&ChrW(54)&ChrW(67)&ChrW(69)&ChrW(54)&ChrW(61)))=usertel
if oicq<>"" then response.cookies(anXinMallEnCo(ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(48)&ChrW(70)&ChrW(68)&ChrW(54)&ChrW(67)))(anXinMallEnCo(ChrW(52)&ChrW(48)&ChrW(64)&ChrW(58)&ChrW(52)&ChrW(66)))=oicq
if memory=1 then
response.cookies(anXinMallEnCo(ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(48)&ChrW(70)&ChrW(68)&ChrW(54)&ChrW(67))).Expires = date() + 365
end if
end if
else
checklogin = -2
end if
rsuser(anXinMallEnCo(ChrW(61)&ChrW(64)&ChrW(56)&ChrW(58)&ChrW(63)&ChrW(68)))=logins
rsuser(anXinMallEnCo(ChrW(61)&ChrW(50)&ChrW(68)&ChrW(69)&ChrW(61)&ChrW(64)&ChrW(56)&ChrW(58)&ChrW(63)))=now()
rsuser.update()
rsuser.close
set rsuser=nothing
end if
end function
function checkmyuser()
dim fromurl
fromurl = anxinMall.geturl()
if not checkmyuserstatus then
call anxinMall.message(anXinMallEnCo(ChrW(27804)&ChrW(64)&ChrW(26372)&ChrW(64)&ChrW(30326)&ChrW(64)&ChrW(24400)&ChrW(64)&ChrW(25105)&ChrW(64)&ChrW(30326)&ChrW(64)&ChrW(24400)&ChrW(64)&ChrW(-29312)&ChrW(64)&ChrW(26097)&ChrW(64)),2,cfg_baseurl & anXinMallEnCo(ChrW(94)&ChrW(62)&ChrW(74)&ChrW(94)&ChrW(61)&ChrW(64)&ChrW(56)&ChrW(58)&ChrW(63)&ChrW(93)&ChrW(50)&ChrW(68)&ChrW(65)&ChrW(110)&ChrW(55)&ChrW(67)&ChrW(64)&ChrW(62)&ChrW(70)&ChrW(67)&ChrW(61)&ChrW(108))&server.URLEncode(anxinMall.geturl()))
end if
end function
function checkmylogin(byref userid,byref username,byval userPassWord,byval do_session,byval memory)
checkmylogin = 0
if userid="" and username="" then exit function
dim sqlmy
if userid<>"" then
sqlmy = anXinMallEnCo(ChrW(68)&ChrW(54)&ChrW(61)&ChrW(54)&ChrW(52)&ChrW(69)&ChrW(32)&ChrW(44)&ChrW(69)&ChrW(64)&ChrW(65)&ChrW(32)&ChrW(44)&ChrW(96)&ChrW(32)&ChrW(44)&ChrW(89)&ChrW(32)&ChrW(44)&ChrW(55)&ChrW(67)&ChrW(64)&ChrW(62)&ChrW(32)&ChrW(44)&ChrW(44)&ChrW(62)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(48)&ChrW(68)&ChrW(57)&ChrW(59)&ChrW(58)&ChrW(50)&ChrW(46)&ChrW(32)&ChrW(44)&ChrW(72)&ChrW(57)&ChrW(54)&ChrW(67)&ChrW(54)&ChrW(32)&ChrW(44)&ChrW(70)&ChrW(68)&ChrW(54)&ChrW(67)&ChrW(58)&ChrW(53)&ChrW(108))&userid
else
sqlmy = anXinMallEnCo(ChrW(68)&ChrW(54)&ChrW(61)&ChrW(54)&ChrW(52)&ChrW(69)&ChrW(32)&ChrW(44)&ChrW(69)&ChrW(64)&ChrW(65)&ChrW(32)&ChrW(44)&ChrW(96)&ChrW(32)&ChrW(44)&ChrW(89)&ChrW(32)&ChrW(44)&ChrW(55)&ChrW(67)&ChrW(64)&ChrW(62)&ChrW(32)&ChrW(44)&ChrW(44)&ChrW(62)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(48)&ChrW(68)&ChrW(57)&ChrW(59)&ChrW(58)&ChrW(50)&ChrW(46)&ChrW(32)&ChrW(44)&ChrW(72)&ChrW(57)&ChrW(54)&ChrW(67)&ChrW(54)&ChrW(32)&ChrW(44)&ChrW(70)&ChrW(68)&ChrW(54)&ChrW(67)&ChrW(63)&ChrW(50)&ChrW(62)&ChrW(54)&ChrW(108)&ChrW(86))&username&anXinMallEnCo(ChrW(86))
end if
dim rsmy
set rsmy=anxinMall.db(sqlmy,3)
if rsmy.eof and rsmy.bof then
checkmylogin = -1
else
if cstr(rsmy(anXinMallEnCo(ChrW(70)&ChrW(68)&ChrW(54)&ChrW(67)&ChrW(33)&ChrW(50)&ChrW(68)&ChrW(68)&ChrW(40)&ChrW(64)&ChrW(67)&ChrW(53))))=cstr(userPassWord) then
userid = rsmy(anXinMallEnCo(ChrW(70)&ChrW(68)&ChrW(54)&ChrW(67)&ChrW(58)&ChrW(53)))
username = rsmy(anXinMallEnCo(ChrW(70)&ChrW(68)&ChrW(54)&ChrW(67)&ChrW(63)&ChrW(50)&ChrW(62)&ChrW(54)))
checkmylogin = 1
if do_session=1 then
dim actionTotal : actionTotal = anxinMall.db(anXinMallEnCo(ChrW(68)&ChrW(54)&ChrW(61)&ChrW(54)&ChrW(52)&ChrW(69)&ChrW(32)&ChrW(44)&ChrW(52)&ChrW(64)&ChrW(70)&ChrW(63)&ChrW(69)&ChrW(87)&ChrW(68)&ChrW(57)&ChrW(59)&ChrW(58)&ChrW(50)&ChrW(58)&ChrW(53)&ChrW(88)&ChrW(32)&ChrW(44)&ChrW(50)&ChrW(68)&ChrW(32)&ChrW(44)&ChrW(68)&ChrW(70)&ChrW(62)&ChrW(48)&ChrW(53)&ChrW(58)&ChrW(63)&ChrW(56)&ChrW(53)&ChrW(50)&ChrW(63)&ChrW(32)&ChrW(44)&ChrW(55)&ChrW(67)&ChrW(64)&ChrW(62)&ChrW(32)&ChrW(44)&ChrW(44)&ChrW(62)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(48)&ChrW(50)&ChrW(52)&ChrW(69)&ChrW(58)&ChrW(64)&ChrW(63)&ChrW(46)&ChrW(32)&ChrW(44)&ChrW(72)&ChrW(57)&ChrW(54)&ChrW(67)&ChrW(54)&ChrW(32)&ChrW(44)&ChrW(75)&ChrW(57)&ChrW(70)&ChrW(50)&ChrW(63)&ChrW(56)&ChrW(69)&ChrW(50)&ChrW(58)&ChrW(107)&ChrW(101)&ChrW(32)&ChrW(44)&ChrW(50)&ChrW(63)&ChrW(53)&ChrW(32)&ChrW(44)&ChrW(68)&ChrW(57)&ChrW(59)&ChrW(58)&ChrW(50)&ChrW(58)&ChrW(53)&ChrW(108))&userid,2)(0)
dim newscount : newscount = anxinMall.db(anXinMallEnCo(ChrW(68)&ChrW(54)&ChrW(61)&ChrW(54)&ChrW(52)&ChrW(69)&ChrW(32)&ChrW(44)&ChrW(52)&ChrW(64)&ChrW(70)&ChrW(63)&ChrW(69)&ChrW(87)&ChrW(63)&ChrW(54)&ChrW(72)&ChrW(68)&ChrW(58)&ChrW(53)&ChrW(88)&ChrW(32)&ChrW(44)&ChrW(50)&ChrW(68)&ChrW(32)&ChrW(44)&ChrW(68)&ChrW(70)&ChrW(62)&ChrW(48)&ChrW(63)&ChrW(54)&ChrW(72)&ChrW(68)&ChrW(32)&ChrW(44)&ChrW(55)&ChrW(67)&ChrW(64)&ChrW(62)&ChrW(32)&ChrW(44)&ChrW(44)&ChrW(62)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(48)&ChrW(63)&ChrW(54)&ChrW(72)&ChrW(68)&ChrW(46)&ChrW(32)&ChrW(44)&ChrW(72)&ChrW(57)&ChrW(54)&ChrW(67)&ChrW(54)&ChrW(32)&ChrW(44)&ChrW(68)&ChrW(57)&ChrW(59)&ChrW(58)&ChrW(50)&ChrW(58)&ChrW(53)&ChrW(108))&userid,2)(0)
dim productcount : productcount = anxinMall.db(anXinMallEnCo(ChrW(68)&ChrW(54)&ChrW(61)&ChrW(54)&ChrW(52)&ChrW(69)&ChrW(32)&ChrW(44)&ChrW(52)&ChrW(64)&ChrW(70)&ChrW(63)&ChrW(69)&ChrW(87)&ChrW(51)&ChrW(64)&ChrW(64)&ChrW(60)&ChrW(58)&ChrW(53)&ChrW(88)&ChrW(32)&ChrW(44)&ChrW(50)&ChrW(68)&ChrW(32)&ChrW(44)&ChrW(68)&ChrW(70)&ChrW(62)&ChrW(48)&ChrW(65)&ChrW(67)&ChrW(64)&ChrW(53)&ChrW(70)&ChrW(52)&ChrW(69)&ChrW(32)&ChrW(44)&ChrW(55)&ChrW(67)&ChrW(64)&ChrW(62)&ChrW(32)&ChrW(44)&ChrW(44)&ChrW(62)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(48)&ChrW(51)&ChrW(64)&ChrW(64)&ChrW(60)&ChrW(68)&ChrW(46)&ChrW(32)&ChrW(44)&ChrW(72)&ChrW(57)&ChrW(54)&ChrW(67)&ChrW(54)&ChrW(32)&ChrW(44)&ChrW(68)&ChrW(57)&ChrW(59)&ChrW(58)&ChrW(50)&ChrW(58)&ChrW(53)&ChrW(108))&userid,2)(0)
dim messagecount : messagecount =anxinMall.db(anXinMallEnCo(ChrW(68)&ChrW(54)&ChrW(61)&ChrW(54)&ChrW(52)&ChrW(69)&ChrW(32)&ChrW(44)&ChrW(52)&ChrW(64)&ChrW(70)&ChrW(63)&ChrW(69)&ChrW(87)&ChrW(58)&ChrW(53)&ChrW(88)&ChrW(32)&ChrW(44)&ChrW(50)&ChrW(68)&ChrW(32)&ChrW(44)&ChrW(68)&ChrW(70)&ChrW(62)&ChrW(48)&ChrW(62)&ChrW(54)&ChrW(68)&ChrW(68)&ChrW(50)&ChrW(56)&ChrW(54)&ChrW(32)&ChrW(44)&ChrW(55)&ChrW(67)&ChrW(64)&ChrW(62)&ChrW(32)&ChrW(44)&ChrW(44)&ChrW(62)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(48)&ChrW(56)&ChrW(51)&ChrW(64)&ChrW(64)&ChrW(60)&ChrW(46)&ChrW(32)&ChrW(44)&ChrW(72)&ChrW(57)&ChrW(54)&ChrW(67)&ChrW(54)&ChrW(32)&ChrW(44)&ChrW(70)&ChrW(68)&ChrW(54)&ChrW(67)&ChrW(63)&ChrW(50)&ChrW(62)&ChrW(54)&ChrW(108)&ChrW(86))&username&anXinMallEnCo(ChrW(86)),2)(0)
dim newmessagecount : newmessagecount =anxinMall.db(anXinMallEnCo(ChrW(68)&ChrW(54)&ChrW(61)&ChrW(54)&ChrW(52)&ChrW(69)&ChrW(32)&ChrW(44)&ChrW(52)&ChrW(64)&ChrW(70)&ChrW(63)&ChrW(69)&ChrW(87)&ChrW(58)&ChrW(53)&ChrW(88)&ChrW(32)&ChrW(44)&ChrW(50)&ChrW(68)&ChrW(32)&ChrW(44)&ChrW(68)&ChrW(70)&ChrW(62)&ChrW(48)&ChrW(62)&ChrW(54)&ChrW(68)&ChrW(68)&ChrW(50)&ChrW(56)&ChrW(54)&ChrW(97)&ChrW(32)&ChrW(44)&ChrW(55)&ChrW(67)&ChrW(64)&ChrW(62)&ChrW(32)&ChrW(44)&ChrW(44)&ChrW(62)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(48)&ChrW(56)&ChrW(51)&ChrW(64)&ChrW(64)&ChrW(60)&ChrW(46)&ChrW(32)&ChrW(44)&ChrW(72)&ChrW(57)&ChrW(54)&ChrW(67)&ChrW(54)&ChrW(32)&ChrW(44)&ChrW(70)&ChrW(68)&ChrW(54)&ChrW(67)&ChrW(63)&ChrW(50)&ChrW(62)&ChrW(54)&ChrW(108)&ChrW(86))&username&anXinMallEnCo(ChrW(86)&ChrW(32)&ChrW(44)&ChrW(50)&ChrW(63)&ChrW(53)&ChrW(32)&ChrW(44)&ChrW(63)&ChrW(54)&ChrW(72)&ChrW(108)&ChrW(96)),2)(0)
dim classid : classid =rsmy(anXinMallEnCo(ChrW(52)&ChrW(61)&ChrW(50)&ChrW(68)&ChrW(68)&ChrW(58)&ChrW(53)))
dim flag : flag = rsmy(anXinMallEnCo(ChrW(55)&ChrW(61)&ChrW(50)&ChrW(56)))
dim lx : lx = rsmy(anXinMallEnCo(ChrW(61)&ChrW(73)))
dim tj : tj = rsmy(anXinMallEnCo(ChrW(69)&ChrW(59)))
dim logo2 : logo2 = rsmy(anXinMallEnCo(ChrW(61)&ChrW(64)&ChrW(56)&ChrW(64)&ChrW(97)))
dim logins : logins =rsmy(anXinMallEnCo(ChrW(61)&ChrW(64)&ChrW(56)&ChrW(58)&ChrW(63)&ChrW(68)))
dim adddate : adddate =rsmy(anXinMallEnCo(ChrW(50)&ChrW(53)&ChrW(53)&ChrW(53)&ChrW(50)&ChrW(69)&ChrW(54)))
dim userlastIP : userlastIP =rsmy(anXinMallEnCo(ChrW(70)&ChrW(68)&ChrW(54)&ChrW(67)&ChrW(61)&ChrW(50)&ChrW(68)&ChrW(69)&ChrW(120)&ChrW(33)))
dim lastlogin : lastlogin=rsmy(anXinMallEnCo(ChrW(61)&ChrW(50)&ChrW(68)&ChrW(69)&ChrW(61)&ChrW(64)&ChrW(56)&ChrW(58)&ChrW(63)))
dim szsheng : szsheng = rsmy(anXinMallEnCo(ChrW(68)&ChrW(75)&ChrW(68)&ChrW(57)&ChrW(54)&ChrW(63)&ChrW(56)))
dim szshi : szshi = rsmy(anXinMallEnCo(ChrW(68)&ChrW(75)&ChrW(68)&ChrW(57)&ChrW(58)))
dim szcounty : szcounty = rsmy(anXinMallEnCo(ChrW(68)&ChrW(75)&ChrW(52)&ChrW(64)&ChrW(70)&ChrW(63)&ChrW(69)&ChrW(74)))
dim zifubao : zifubao = rsmy(anXinMallEnCo(ChrW(75)&ChrW(58)&ChrW(55)&ChrW(70)&ChrW(51)&ChrW(50)&ChrW(64)))
dim zifubao_pwd : zifubao_pwd = rsmy(anXinMallEnCo(ChrW(75)&ChrW(58)&ChrW(55)&ChrW(70)&ChrW(51)&ChrW(50)&ChrW(64)&ChrW(48)&ChrW(65)&ChrW(72)&ChrW(53)))
dim zifubao_hezuoid : zifubao_hezuoid = rsmy(anXinMallEnCo(ChrW(75)&ChrW(58)&ChrW(55)&ChrW(70)&ChrW(51)&ChrW(50)&ChrW(64)&ChrW(48)&ChrW(57)&ChrW(54)&ChrW(75)&ChrW(70)&ChrW(64)&ChrW(58)&ChrW(53)))
dim taobaowangwang : taobaowangwang = rsmy(anXinMallEnCo(ChrW(69)&ChrW(50)&ChrW(64)&ChrW(51)&ChrW(50)&ChrW(64)&ChrW(72)&ChrW(50)&ChrW(63)&ChrW(56)&ChrW(72)&ChrW(50)&ChrW(63)&ChrW(56)))
dim useremail :useremail = rsmy(anXinMallEnCo(ChrW(70)&ChrW(68)&ChrW(54)&ChrW(67)&ChrW(54)&ChrW(62)&ChrW(50)&ChrW(58)&ChrW(61)))
dim oicq : oicq = rsmy(anXinMallEnCo(ChrW(64)&ChrW(58)&ChrW(52)&ChrW(66)))
dim tel : tel =rsmy(anXinMallEnCo(ChrW(69)&ChrW(54)&ChrW(61)))
dim color : color =rsmy(anXinMallEnCo(ChrW(52)&ChrW(64)&ChrW(61)&ChrW(64)&ChrW(67)))
dim content : content =rsmy(anXinMallEnCo(ChrW(52)&ChrW(64)&ChrW(63)&ChrW(69)&ChrW(54)&ChrW(63)&ChrW(69)))
dim logo : logo = rsmy(anXinMallEnCo(ChrW(61)&ChrW(64)&ChrW(56)&ChrW(64)))
dim logoda : logoda = rsmy(anXinMallEnCo(ChrW(61)&ChrW(64)&ChrW(56)&ChrW(64)&ChrW(53)&ChrW(50)))
if isnull(logo2) then logo2=anXinMallEnCo(ChrW(93)&ChrW(93)&ChrW(94)&ChrW(55)&ChrW(58)&ChrW(61)&ChrW(54)&ChrW(94)&ChrW(70)&ChrW(65)&ChrW(61)&ChrW(64)&ChrW(50)&ChrW(53)&ChrW(94)&ChrW(63)&ChrW(64)&ChrW(55)&ChrW(50)&ChrW(52)&ChrW(54)&ChrW(93)&ChrW(59)&ChrW(65)&ChrW(56))
if isnull(logins) then logins="1"
if isnull(szsheng) then szsheng=anXinMallEnCo(ChrW(26405)&ChrW(64)&ChrW(-28668)&ChrW(64)&ChrW(25316)&ChrW(64)&ChrW(30460)&ChrW(64))
if isnull(szshi) then szshi=anXinMallEnCo(ChrW(26405)&ChrW(64)&ChrW(-28668)&ChrW(64)&ChrW(25316)&ChrW(64)&ChrW(24061)&ChrW(64))
if isnull(szcounty) then szcounty=anXinMallEnCo(ChrW(26405)&ChrW(64)&ChrW(-28668)&ChrW(64)&ChrW(25316)&ChrW(64)&ChrW(21301)&ChrW(64)&ChrW(94)&ChrW(21434)&ChrW(64))
if isnull(zifubao) then zifubao=""
if isnull(zifubao_pwd) then zifubao_pwd=""
if isnull(zifubao_hezuoid) then zifubao_hezuoid=""
if isnull(taobaowangwang) then taobaowangwang=""
if isnull(useremail) then useremail=""
if isnull(oicq) then oicq=""
if isnull(tel) then tel=""
if isnull(content) then content=""
if isnull(color) then color=anXinMallEnCo(ChrW(50)&ChrW(50))
if isnull(logo) then logo=""
if isnull(logoda) then logoda=""
session(anXinMallEnCo(ChrW(68)&ChrW(48)&ChrW(62)&ChrW(74)&ChrW(48)&ChrW(70)&ChrW(68)&ChrW(54)&ChrW(67)&ChrW(58)&ChrW(53))) = userid
session(anXinMallEnCo(ChrW(68)&ChrW(48)&ChrW(62)&ChrW(74)&ChrW(48)&ChrW(70)&ChrW(68)&ChrW(54)&ChrW(67)&ChrW(63)&ChrW(50)&ChrW(62)&ChrW(54))) = username
s_my_userid = userid
s_my_username = username
response.cookies(anXinMallEnCo(ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(48)&ChrW(62)&ChrW(74)))(anXinMallEnCo(ChrW(52)&ChrW(48)&ChrW(52)&ChrW(61)&ChrW(50)&ChrW(68)&ChrW(68)&ChrW(58)&ChrW(53)))=classid
response.cookies(anXinMallEnCo(ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(48)&ChrW(62)&ChrW(74)))(anXinMallEnCo(ChrW(52)&ChrW(48)&ChrW(70)&ChrW(68)&ChrW(54)&ChrW(67)&ChrW(58)&ChrW(53)))=userid
response.cookies(anXinMallEnCo(ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(48)&ChrW(62)&ChrW(74)))(anXinMallEnCo(ChrW(52)&ChrW(48)&ChrW(70)&ChrW(68)&ChrW(54)&ChrW(67)&ChrW(63)&ChrW(50)&ChrW(62)&ChrW(54)))=username
response.cookies(anXinMallEnCo(ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(48)&ChrW(62)&ChrW(74)))(anXinMallEnCo(ChrW(52)&ChrW(48)&ChrW(70)&ChrW(68)&ChrW(54)&ChrW(67)&ChrW(33)&ChrW(50)&ChrW(68)&ChrW(68)&ChrW(40)&ChrW(64)&ChrW(67)&ChrW(53)))=userPassWord
response.cookies(anXinMallEnCo(ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(48)&ChrW(62)&ChrW(74)))(anXinMallEnCo(ChrW(52)&ChrW(48)&ChrW(55)&ChrW(61)&ChrW(50)&ChrW(56)))=flag
response.cookies(anXinMallEnCo(ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(48)&ChrW(62)&ChrW(74)))(anXinMallEnCo(ChrW(52)&ChrW(48)&ChrW(61)&ChrW(73)))=lx
response.cookies(anXinMallEnCo(ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(48)&ChrW(62)&ChrW(74)))(anXinMallEnCo(ChrW(52)&ChrW(48)&ChrW(69)&ChrW(59)))=tj
response.cookies(anXinMallEnCo(ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(48)&ChrW(62)&ChrW(74)))(anXinMallEnCo(ChrW(52)&ChrW(48)&ChrW(50)&ChrW(53)&ChrW(53)&ChrW(115)&ChrW(50)&ChrW(69)&ChrW(54)))=adddate
response.cookies(anXinMallEnCo(ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(48)&ChrW(62)&ChrW(74)))(anXinMallEnCo(ChrW(52)&ChrW(48)&ChrW(50)&ChrW(52)&ChrW(69)&ChrW(58)&ChrW(64)&ChrW(63)&ChrW(37)&ChrW(64)&ChrW(69)&ChrW(50)&ChrW(61)))=actionTotal
response.cookies(anXinMallEnCo(ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(48)&ChrW(62)&ChrW(74)))(anXinMallEnCo(ChrW(52)&ChrW(48)&ChrW(68)&ChrW(70)&ChrW(62)&ChrW(48)&ChrW(63)&ChrW(54)&ChrW(72)&ChrW(68)))=newscount
response.cookies(anXinMallEnCo(ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(48)&ChrW(62)&ChrW(74)))(anXinMallEnCo(ChrW(52)&ChrW(48)&ChrW(65)&ChrW(67)&ChrW(64)&ChrW(53)&ChrW(70)&ChrW(52)&ChrW(69)&ChrW(52)&ChrW(64)&ChrW(70)&ChrW(63)&ChrW(69)))=productcount
response.cookies(anXinMallEnCo(ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(48)&ChrW(62)&ChrW(74)))(anXinMallEnCo(ChrW(52)&ChrW(48)&ChrW(62)&ChrW(54)&ChrW(68)&ChrW(68)&ChrW(50)&ChrW(56)&ChrW(54)&ChrW(52)&ChrW(64)&ChrW(70)&ChrW(63)&ChrW(69)))=messagecount
response.cookies(anXinMallEnCo(ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(48)&ChrW(62)&ChrW(74)))(anXinMallEnCo(ChrW(52)&ChrW(48)&ChrW(63)&ChrW(54)&ChrW(72)&ChrW(62)&ChrW(54)&ChrW(68)&ChrW(68)&ChrW(50)&ChrW(56)&ChrW(54)&ChrW(52)&ChrW(64)&ChrW(70)&ChrW(63)&ChrW(69)))=newmessagecount
response.cookies(anXinMallEnCo(ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(48)&ChrW(62)&ChrW(74)))(anXinMallEnCo(ChrW(52)&ChrW(48)&ChrW(61)&ChrW(50)&ChrW(68)&ChrW(69)&ChrW(61)&ChrW(64)&ChrW(56)&ChrW(58)&ChrW(63)))=lastlogin
response.cookies(anXinMallEnCo(ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(48)&ChrW(62)&ChrW(74)))(anXinMallEnCo(ChrW(52)&ChrW(48)&ChrW(70)&ChrW(68)&ChrW(54)&ChrW(67)&ChrW(61)&ChrW(50)&ChrW(68)&ChrW(69)&ChrW(120)&ChrW(33)))=userlastIP
response.cookies(anXinMallEnCo(ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(48)&ChrW(62)&ChrW(74)))(anXinMallEnCo(ChrW(52)&ChrW(48)&ChrW(61)&ChrW(64)&ChrW(56)&ChrW(58)&ChrW(63)&ChrW(68)))=logins
response.cookies(anXinMallEnCo(ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(48)&ChrW(62)&ChrW(74)))(anXinMallEnCo(ChrW(52)&ChrW(48)&ChrW(68)&ChrW(75)&ChrW(68)&ChrW(57)&ChrW(54)&ChrW(63)&ChrW(56)))=szsheng
response.cookies(anXinMallEnCo(ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(48)&ChrW(62)&ChrW(74)))(anXinMallEnCo(ChrW(52)&ChrW(48)&ChrW(68)&ChrW(75)&ChrW(68)&ChrW(57)&ChrW(58)))=szshi
response.cookies(anXinMallEnCo(ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(48)&ChrW(62)&ChrW(74)))(anXinMallEnCo(ChrW(52)&ChrW(48)&ChrW(68)&ChrW(75)&ChrW(52)&ChrW(64)&ChrW(70)&ChrW(63)&ChrW(69)&ChrW(74)))=szcounty
response.cookies(anXinMallEnCo(ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(48)&ChrW(62)&ChrW(74)))(anXinMallEnCo(ChrW(52)&ChrW(48)&ChrW(75)&ChrW(58)&ChrW(55)&ChrW(70)&ChrW(51)&ChrW(50)&ChrW(64)))=zifubao
response.cookies(anXinMallEnCo(ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(48)&ChrW(62)&ChrW(74)))(anXinMallEnCo(ChrW(52)&ChrW(48)&ChrW(75)&ChrW(58)&ChrW(55)&ChrW(70)&ChrW(51)&ChrW(50)&ChrW(64)&ChrW(48)&ChrW(65)&ChrW(72)&ChrW(53)))=zifubao_pwd
response.cookies(anXinMallEnCo(ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(48)&ChrW(62)&ChrW(74)))(anXinMallEnCo(ChrW(52)&ChrW(48)&ChrW(75)&ChrW(58)&ChrW(55)&ChrW(70)&ChrW(51)&ChrW(50)&ChrW(64)&ChrW(48)&ChrW(57)&ChrW(54)&ChrW(75)&ChrW(70)&ChrW(64)&ChrW(58)&ChrW(53)))=zifubao_hezuoid
response.cookies(anXinMallEnCo(ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(48)&ChrW(62)&ChrW(74)))(anXinMallEnCo(ChrW(52)&ChrW(48)&ChrW(69)&ChrW(50)&ChrW(64)&ChrW(51)&ChrW(50)&ChrW(64)&ChrW(72)&ChrW(50)&ChrW(63)&ChrW(56)&ChrW(72)&ChrW(50)&ChrW(63)&ChrW(56)))=taobaowangwang
response.cookies(anXinMallEnCo(ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(48)&ChrW(62)&ChrW(74)))(anXinMallEnCo(ChrW(52)&ChrW(48)&ChrW(52)&ChrW(64)&ChrW(61)&ChrW(64)&ChrW(67)))=color
response.cookies(anXinMallEnCo(ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(48)&ChrW(62)&ChrW(74)))(anXinMallEnCo(ChrW(52)&ChrW(48)&ChrW(61)&ChrW(64)&ChrW(56)&ChrW(64)))=logo
response.cookies(anXinMallEnCo(ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(48)&ChrW(62)&ChrW(74)))(anXinMallEnCo(ChrW(52)&ChrW(48)&ChrW(61)&ChrW(64)&ChrW(56)&ChrW(64)&ChrW(53)&ChrW(50)))=logoda
session(anXinMallEnCo(ChrW(68)&ChrW(48)&ChrW(62)&ChrW(74)&ChrW(48)&ChrW(52)&ChrW(64)&ChrW(63)&ChrW(69)&ChrW(54)&ChrW(63)&ChrW(69)))=content
if logo2<>"" then
response.cookies(anXinMallEnCo(ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(48)&ChrW(62)&ChrW(74)))(anXinMallEnCo(ChrW(52)&ChrW(48)&ChrW(55)&ChrW(50)&ChrW(52)&ChrW(54)))=logo2
else
response.cookies(anXinMallEnCo(ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(48)&ChrW(62)&ChrW(74)))(anXinMallEnCo(ChrW(52)&ChrW(48)&ChrW(55)&ChrW(50)&ChrW(52)&ChrW(54)))=anXinMallEnCo(ChrW(93)&ChrW(93)&ChrW(94)&ChrW(55)&ChrW(58)&ChrW(61)&ChrW(54)&ChrW(94)&ChrW(70)&ChrW(65)&ChrW(61)&ChrW(64)&ChrW(50)&ChrW(53)&ChrW(94)&ChrW(63)&ChrW(64)&ChrW(55)&ChrW(50)&ChrW(52)&ChrW(54)&ChrW(93)&ChrW(59)&ChrW(65)&ChrW(56))
end if
if useremail<>"" then response.cookies(anXinMallEnCo(ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(48)&ChrW(62)&ChrW(74)))(anXinMallEnCo(ChrW(52)&ChrW(48)&ChrW(70)&ChrW(68)&ChrW(54)&ChrW(67)&ChrW(54)&ChrW(62)&ChrW(50)&ChrW(58)&ChrW(61)))=useremail
if tel<>"" then response.cookies(anXinMallEnCo(ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(48)&ChrW(62)&ChrW(74)))(anXinMallEnCo(ChrW(52)&ChrW(48)&ChrW(69)&ChrW(54)&ChrW(61)))=tel
if oicq<>"" then response.cookies(anXinMallEnCo(ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(48)&ChrW(62)&ChrW(74)))(anXinMallEnCo(ChrW(52)&ChrW(48)&ChrW(64)&ChrW(58)&ChrW(52)&ChrW(66)))=oicq
if memory=1 then
response.cookies(anXinMallEnCo(ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(48)&ChrW(62)&ChrW(74))).Expires = date() + 365
end if
end if
else
checkmylogin = -2
end if
rsmy(anXinMallEnCo(ChrW(61)&ChrW(64)&ChrW(56)&ChrW(58)&ChrW(63)&ChrW(68)))=cdbl(logins)+1
rsmy(anXinMallEnCo(ChrW(61)&ChrW(50)&ChrW(68)&ChrW(69)&ChrW(61)&ChrW(64)&ChrW(56)&ChrW(58)&ChrW(63)))=now()
rsmy.update()
rsmy.close
set rsmy=nothing
end if
end function
function checkmyuserstatus()
checkmyuserstatus = true
if s_my_userid="" or s_my_userid="0" then
checkmyuserstatus = false
if (c_my_userid<>"" or c_my_username<>"") and c_my_userPassWord<>"" then
dim login : login = anxinMall_cls_member_my.checkmylogin(c_my_userid,c_my_username,c_my_userPassWord,1,1)
if login>0 then
checkmyuserstatus = true
s_my_userid = c_my_userid
else
call clearmyusersession()
end if
end if
end if
end function
function checkuserstatus()
checkuserstatus = true
if s_userid="" or s_userid="0" then
checkuserstatus = false
if (c_userid<>"" or c_username<>"") and c_userPassWord<>"" then
dim login : login = anxinMall.checklogin(c_userid,c_username,c_userPassWord,1,1)
if login>0 then
checkuserstatus = true
s_userid = c_userid
else
call clearusersession()
end if
end if
end if
end function
function clearusersession()
session(anXinMallEnCo(ChrW(68)&ChrW(48)&ChrW(70)&ChrW(68)&ChrW(54)&ChrW(67)&ChrW(58)&ChrW(53))) = ""
session(anXinMallEnCo(ChrW(68)&ChrW(48)&ChrW(56)&ChrW(67)&ChrW(64)&ChrW(70)&ChrW(65)&ChrW(58)&ChrW(53))) = ""
session(anXinMallEnCo(ChrW(68)&ChrW(48)&ChrW(70)&ChrW(68)&ChrW(54)&ChrW(67)&ChrW(63)&ChrW(50)&ChrW(62)&ChrW(54))) = ""
response.cookies(anXinMallEnCo(ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(48)&ChrW(70)&ChrW(68)&ChrW(54)&ChrW(67)))(anXinMallEnCo(ChrW(52)&ChrW(48)&ChrW(70)&ChrW(68)&ChrW(54)&ChrW(67)&ChrW(58)&ChrW(53)))=""
response.cookies(anXinMallEnCo(ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(48)&ChrW(70)&ChrW(68)&ChrW(54)&ChrW(67)))(anXinMallEnCo(ChrW(52)&ChrW(48)&ChrW(70)&ChrW(68)&ChrW(54)&ChrW(67)&ChrW(63)&ChrW(50)&ChrW(62)&ChrW(54)))=""
response.cookies(anXinMallEnCo(ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(48)&ChrW(70)&ChrW(68)&ChrW(54)&ChrW(67)))(anXinMallEnCo(ChrW(52)&ChrW(48)&ChrW(70)&ChrW(68)&ChrW(54)&ChrW(67)&ChrW(33)&ChrW(50)&ChrW(68)&ChrW(68)&ChrW(40)&ChrW(64)&ChrW(67)&ChrW(53)))=""
response.cookies(anXinMallEnCo(ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(48)&ChrW(70)&ChrW(68)&ChrW(54)&ChrW(67)))(anXinMallEnCo(ChrW(52)&ChrW(48)&ChrW(74)&ChrW(70)&ChrW(52)&ChrW(70)&ChrW(63)))=""
response.cookies(anXinMallEnCo(ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(48)&ChrW(70)&ChrW(68)&ChrW(54)&ChrW(67)))(anXinMallEnCo(ChrW(52)&ChrW(48)&ChrW(70)&ChrW(68)&ChrW(54)&ChrW(67)&ChrW(54)&ChrW(62)&ChrW(50)&ChrW(58)&ChrW(61)))=""
response.cookies(anXinMallEnCo(ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(48)&ChrW(70)&ChrW(68)&ChrW(54)&ChrW(67)))(anXinMallEnCo(ChrW(52)&ChrW(48)&ChrW(50)&ChrW(53)&ChrW(53)&ChrW(115)&ChrW(50)&ChrW(69)&ChrW(54)))=""
response.cookies(anXinMallEnCo(ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(48)&ChrW(70)&ChrW(68)&ChrW(54)&ChrW(67)))(anXinMallEnCo(ChrW(52)&ChrW(48)&ChrW(70)&ChrW(68)&ChrW(54)&ChrW(67)&ChrW(75)&ChrW(57)&ChrW(54)&ChrW(63)&ChrW(68)&ChrW(57)&ChrW(58)&ChrW(63)&ChrW(50)&ChrW(62)&ChrW(54)))=""
response.cookies(anXinMallEnCo(ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(48)&ChrW(70)&ChrW(68)&ChrW(54)&ChrW(67)))(anXinMallEnCo(ChrW(52)&ChrW(48)&ChrW(70)&ChrW(68)&ChrW(54)&ChrW(67)&ChrW(69)&ChrW(54)&ChrW(61)))=""
response.cookies(anXinMallEnCo(ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(48)&ChrW(70)&ChrW(68)&ChrW(54)&ChrW(67)))(anXinMallEnCo(ChrW(52)&ChrW(48)&ChrW(64)&ChrW(58)&ChrW(52)&ChrW(66)))=""
response.cookies(anXinMallEnCo(ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(48)&ChrW(70)&ChrW(68)&ChrW(54)&ChrW(67)))(anXinMallEnCo(ChrW(52)&ChrW(48)&ChrW(50)&ChrW(52)&ChrW(69)&ChrW(58)&ChrW(64)&ChrW(63)&ChrW(37)&ChrW(64)&ChrW(69)&ChrW(50)&ChrW(61)))=""
response.cookies(anXinMallEnCo(ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(48)&ChrW(70)&ChrW(68)&ChrW(54)&ChrW(67)))(anXinMallEnCo(ChrW(52)&ChrW(48)&ChrW(67)&ChrW(54)&ChrW(56)&ChrW(61)&ChrW(73)))=""
response.cookies(anXinMallEnCo(ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(48)&ChrW(70)&ChrW(68)&ChrW(54)&ChrW(67)))(anXinMallEnCo(ChrW(52)&ChrW(48)&ChrW(50)&ChrW(52)&ChrW(69)&ChrW(58)&ChrW(64)&ChrW(63)&ChrW(37)&ChrW(64)&ChrW(69)&ChrW(50)&ChrW(61)))=""
response.cookies(anXinMallEnCo(ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(48)&ChrW(70)&ChrW(68)&ChrW(54)&ChrW(67)))(anXinMallEnCo(ChrW(52)&ChrW(48)&ChrW(68)&ChrW(57)&ChrW(64)&ChrW(70)&ChrW(52)&ChrW(50)&ChrW(63)&ChrW(56)&ChrW(37)&ChrW(64)&ChrW(69)&ChrW(50)&ChrW(61)))=""
response.cookies(anXinMallEnCo(ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(48)&ChrW(70)&ChrW(68)&ChrW(54)&ChrW(67)))(anXinMallEnCo(ChrW(52)&ChrW(48)&ChrW(51)&ChrW(70)&ChrW(74)&ChrW(37)&ChrW(64)&ChrW(69)&ChrW(50)&ChrW(61)))=""
response.cookies(anXinMallEnCo(ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(48)&ChrW(70)&ChrW(68)&ChrW(54)&ChrW(67)))(anXinMallEnCo(ChrW(52)&ChrW(48)&ChrW(56)&ChrW(58)&ChrW(55)&ChrW(69)&ChrW(52)&ChrW(64)&ChrW(70)&ChrW(63)&ChrW(69)))=""
response.cookies(anXinMallEnCo(ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(48)&ChrW(70)&ChrW(68)&ChrW(54)&ChrW(67)))(anXinMallEnCo(ChrW(52)&ChrW(48)&ChrW(61)&ChrW(50)&ChrW(68)&ChrW(69)&ChrW(61)&ChrW(64)&ChrW(56)&ChrW(58)&ChrW(63)))=""
response.cookies(anXinMallEnCo(ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(48)&ChrW(70)&ChrW(68)&ChrW(54)&ChrW(67)))(anXinMallEnCo(ChrW(52)&ChrW(48)&ChrW(59)&ChrW(58)&ChrW(55)&ChrW(54)&ChrW(63)))=""
response.cookies(anXinMallEnCo(ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(48)&ChrW(70)&ChrW(68)&ChrW(54)&ChrW(67)))(anXinMallEnCo(ChrW(52)&ChrW(48)&ChrW(61)&ChrW(64)&ChrW(56)&ChrW(58)&ChrW(63)&ChrW(68)))=""
response.cookies(anXinMallEnCo(ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(48)&ChrW(70)&ChrW(68)&ChrW(54)&ChrW(67))).Expires = date() -1
end function
function clearmyusersession()
session(anXinMallEnCo(ChrW(68)&ChrW(48)&ChrW(62)&ChrW(74)&ChrW(48)&ChrW(70)&ChrW(68)&ChrW(54)&ChrW(67)&ChrW(58)&ChrW(53)))=""
session(anXinMallEnCo(ChrW(68)&ChrW(48)&ChrW(62)&ChrW(74)&ChrW(48)&ChrW(70)&ChrW(68)&ChrW(54)&ChrW(67)&ChrW(63)&ChrW(50)&ChrW(62)&ChrW(54)))=""
session(anXinMallEnCo(ChrW(68)&ChrW(48)&ChrW(62)&ChrW(74)&ChrW(48)&ChrW(52)&ChrW(64)&ChrW(61)&ChrW(64)&ChrW(67)))=""
response.cookies(anXinMallEnCo(ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(48)&ChrW(62)&ChrW(74)))(anXinMallEnCo(ChrW(52)&ChrW(48)&ChrW(70)&ChrW(68)&ChrW(54)&ChrW(67)&ChrW(58)&ChrW(53)))=""
response.cookies(anXinMallEnCo(ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(48)&ChrW(62)&ChrW(74)))(anXinMallEnCo(ChrW(52)&ChrW(48)&ChrW(70)&ChrW(68)&ChrW(54)&ChrW(67)&ChrW(63)&ChrW(50)&ChrW(62)&ChrW(54)))=""
response.cookies(anXinMallEnCo(ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(48)&ChrW(62)&ChrW(74)))(anXinMallEnCo(ChrW(52)&ChrW(48)&ChrW(70)&ChrW(68)&ChrW(54)&ChrW(67)&ChrW(33)&ChrW(50)&ChrW(68)&ChrW(68)&ChrW(40)&ChrW(64)&ChrW(67)&ChrW(53)))=""
response.cookies(anXinMallEnCo(ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(48)&ChrW(62)&ChrW(74)))(anXinMallEnCo(ChrW(52)&ChrW(48)&ChrW(55)&ChrW(61)&ChrW(50)&ChrW(56)))=""
response.cookies(anXinMallEnCo(ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(48)&ChrW(62)&ChrW(74)))(anXinMallEnCo(ChrW(52)&ChrW(48)&ChrW(61)&ChrW(73)))=""
response.cookies(anXinMallEnCo(ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(48)&ChrW(62)&ChrW(74)))(anXinMallEnCo(ChrW(52)&ChrW(48)&ChrW(69)&ChrW(59)))=""
response.cookies(anXinMallEnCo(ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(48)&ChrW(62)&ChrW(74)))(anXinMallEnCo(ChrW(52)&ChrW(48)&ChrW(50)&ChrW(53)&ChrW(53)&ChrW(115)&ChrW(50)&ChrW(69)&ChrW(54)))=""
response.cookies(anXinMallEnCo(ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(48)&ChrW(62)&ChrW(74)))(anXinMallEnCo(ChrW(52)&ChrW(48)&ChrW(50)&ChrW(52)&ChrW(69)&ChrW(58)&ChrW(64)&ChrW(63)&ChrW(37)&ChrW(64)&ChrW(69)&ChrW(50)&ChrW(61)))=""
response.cookies(anXinMallEnCo(ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(48)&ChrW(62)&ChrW(74)))(anXinMallEnCo(ChrW(52)&ChrW(48)&ChrW(68)&ChrW(70)&ChrW(62)&ChrW(48)&ChrW(63)&ChrW(54)&ChrW(72)&ChrW(68)))=""
response.cookies(anXinMallEnCo(ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(48)&ChrW(62)&ChrW(74)))(anXinMallEnCo(ChrW(52)&ChrW(48)&ChrW(65)&ChrW(67)&ChrW(64)&ChrW(53)&ChrW(70)&ChrW(52)&ChrW(69)&ChrW(52)&ChrW(64)&ChrW(70)&ChrW(63)&ChrW(69)))=""
response.cookies(anXinMallEnCo(ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(48)&ChrW(62)&ChrW(74)))(anXinMallEnCo(ChrW(52)&ChrW(48)&ChrW(62)&ChrW(54)&ChrW(68)&ChrW(68)&ChrW(50)&ChrW(56)&ChrW(54)&ChrW(52)&ChrW(64)&ChrW(70)&ChrW(63)&ChrW(69)))=""
response.cookies(anXinMallEnCo(ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(48)&ChrW(62)&ChrW(74)))(anXinMallEnCo(ChrW(52)&ChrW(48)&ChrW(63)&ChrW(54)&ChrW(72)&ChrW(62)&ChrW(54)&ChrW(68)&ChrW(68)&ChrW(50)&ChrW(56)&ChrW(54)&ChrW(52)&ChrW(64)&ChrW(70)&ChrW(63)&ChrW(69)))=""
response.cookies(anXinMallEnCo(ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(48)&ChrW(62)&ChrW(74)))(anXinMallEnCo(ChrW(52)&ChrW(48)&ChrW(61)&ChrW(50)&ChrW(68)&ChrW(69)&ChrW(61)&ChrW(64)&ChrW(56)&ChrW(58)&ChrW(63)))=""
response.cookies(anXinMallEnCo(ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(48)&ChrW(62)&ChrW(74)))(anXinMallEnCo(ChrW(52)&ChrW(48)&ChrW(70)&ChrW(68)&ChrW(54)&ChrW(67)&ChrW(61)&ChrW(50)&ChrW(68)&ChrW(69)&ChrW(120)&ChrW(33)))=""
response.cookies(anXinMallEnCo(ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(48)&ChrW(62)&ChrW(74)))(anXinMallEnCo(ChrW(52)&ChrW(48)&ChrW(61)&ChrW(64)&ChrW(56)&ChrW(58)&ChrW(63)&ChrW(68)))=""
response.cookies(anXinMallEnCo(ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(48)&ChrW(62)&ChrW(74)))(anXinMallEnCo(ChrW(52)&ChrW(48)&ChrW(55)&ChrW(50)&ChrW(52)&ChrW(54)))=""
response.cookies(anXinMallEnCo(ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(48)&ChrW(62)&ChrW(74)))(anXinMallEnCo(ChrW(52)&ChrW(48)&ChrW(70)&ChrW(68)&ChrW(54)&ChrW(67)&ChrW(54)&ChrW(62)&ChrW(50)&ChrW(58)&ChrW(61)))=""
response.cookies(anXinMallEnCo(ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(48)&ChrW(62)&ChrW(74)))(anXinMallEnCo(ChrW(52)&ChrW(48)&ChrW(69)&ChrW(54)&ChrW(61)))=""
response.cookies(anXinMallEnCo(ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(48)&ChrW(62)&ChrW(74)))(anXinMallEnCo(ChrW(52)&ChrW(48)&ChrW(64)&ChrW(58)&ChrW(52)&ChrW(66)))=""
response.cookies(anXinMallEnCo(ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(48)&ChrW(62)&ChrW(74)))(anXinMallEnCo(ChrW(52)&ChrW(48)&ChrW(70)&ChrW(68)&ChrW(54)&ChrW(67)&ChrW(61)&ChrW(50)&ChrW(68)&ChrW(69)&ChrW(120)&ChrW(33)))=""
response.cookies(anXinMallEnCo(ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(48)&ChrW(62)&ChrW(74)))(anXinMallEnCo(ChrW(52)&ChrW(48)&ChrW(61)&ChrW(64)&ChrW(56)&ChrW(58)&ChrW(63)&ChrW(68)))=""
response.cookies(anXinMallEnCo(ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(48)&ChrW(62)&ChrW(74)))(anXinMallEnCo(ChrW(52)&ChrW(48)&ChrW(68)&ChrW(75)&ChrW(68)&ChrW(57)&ChrW(54)&ChrW(63)&ChrW(56)))=""
response.cookies(anXinMallEnCo(ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(48)&ChrW(62)&ChrW(74)))(anXinMallEnCo(ChrW(52)&ChrW(48)&ChrW(68)&ChrW(75)&ChrW(68)&ChrW(57)&ChrW(58)))=""
response.cookies(anXinMallEnCo(ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(48)&ChrW(62)&ChrW(74)))(anXinMallEnCo(ChrW(52)&ChrW(48)&ChrW(68)&ChrW(75)&ChrW(52)&ChrW(64)&ChrW(70)&ChrW(63)&ChrW(69)&ChrW(74)))=""
response.cookies(anXinMallEnCo(ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(48)&ChrW(62)&ChrW(74)))(anXinMallEnCo(ChrW(52)&ChrW(48)&ChrW(75)&ChrW(58)&ChrW(55)&ChrW(70)&ChrW(51)&ChrW(50)&ChrW(64)))=""
response.cookies(anXinMallEnCo(ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(48)&ChrW(62)&ChrW(74)))(anXinMallEnCo(ChrW(52)&ChrW(48)&ChrW(75)&ChrW(58)&ChrW(55)&ChrW(70)&ChrW(51)&ChrW(50)&ChrW(64)&ChrW(48)&ChrW(65)&ChrW(72)&ChrW(53)))=""
response.cookies(anXinMallEnCo(ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(48)&ChrW(62)&ChrW(74)))(anXinMallEnCo(ChrW(52)&ChrW(48)&ChrW(75)&ChrW(58)&ChrW(55)&ChrW(70)&ChrW(51)&ChrW(50)&ChrW(64)&ChrW(48)&ChrW(57)&ChrW(54)&ChrW(75)&ChrW(70)&ChrW(64)&ChrW(58)&ChrW(53)))=""
response.cookies(anXinMallEnCo(ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(48)&ChrW(62)&ChrW(74)))(anXinMallEnCo(ChrW(52)&ChrW(48)&ChrW(69)&ChrW(50)&ChrW(64)&ChrW(51)&ChrW(50)&ChrW(64)&ChrW(72)&ChrW(50)&ChrW(63)&ChrW(56)&ChrW(72)&ChrW(50)&ChrW(63)&ChrW(56)))=""
session(anXinMallEnCo(ChrW(68)&ChrW(48)&ChrW(62)&ChrW(74)&ChrW(48)&ChrW(52)&ChrW(64)&ChrW(63)&ChrW(69)&ChrW(54)&ChrW(63)&ChrW(69)))=""
response.cookies(anXinMallEnCo(ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(48)&ChrW(62)&ChrW(74))).Expires = date() -1
end function
function checkadmin()
dim login
login = false
if s_adminname="" then
if c_adminname<>"" and c_adminpsw<>"" then
if cstr(c_adminname)=cstr(cfg_adminname) and cstr(c_adminpsw)=cstr(cfg_adminpassword) then
session(anXinMallEnCo(ChrW(68)&ChrW(48)&ChrW(50)&ChrW(53)&ChrW(62)&ChrW(58)&ChrW(63)&ChrW(63)&ChrW(50)&ChrW(62)&ChrW(54)))=c_adminname
login = true
end if
end if
if login=false then
response.Write anXinMallEnCo(ChrW(107)&ChrW(68)&ChrW(52)&ChrW(67)&ChrW(58)&ChrW(65)&ChrW(69)&ChrW(32)&ChrW(44)&ChrW(69)&ChrW(74)&ChrW(65)&ChrW(54)&ChrW(108)&ChrW(81)&ChrW(69)&ChrW(54)&ChrW(73)&ChrW(69)&ChrW(94)&ChrW(59)&ChrW(50)&ChrW(71)&ChrW(50)&ChrW(68)&ChrW(52)&ChrW(67)&ChrW(58)&ChrW(65)&ChrW(69)&ChrW(81)&ChrW(109)&ChrW(50)&ChrW(61)&ChrW(54)&ChrW(67)&ChrW(69)&ChrW(87)&ChrW(86)&ChrW(27804)&ChrW(64)&ChrW(26372)&ChrW(64)&ChrW(30326)&ChrW(64)&ChrW(24400)&ChrW(64)&ChrW(25105)&ChrW(64)&ChrW(30326)&ChrW(64)&ChrW(24400)&ChrW(64)&ChrW(-29312)&ChrW(64)&ChrW(26097)&ChrW(64)&ChrW(86)&ChrW(88)&ChrW(106)&ChrW(69)&ChrW(64)&ChrW(65)&ChrW(93)&ChrW(61)&ChrW(64)&ChrW(52)&ChrW(50)&ChrW(69)&ChrW(58)&ChrW(64)&ChrW(63)&ChrW(108)&ChrW(86)&ChrW(61)&ChrW(64)&ChrW(56)&ChrW(58)&ChrW(63)&ChrW(93)&ChrW(50)&ChrW(68)&ChrW(65)&ChrW(86)&ChrW(107)&ChrW(94)&ChrW(68)&ChrW(52)&ChrW(67)&ChrW(58)&ChrW(65)&ChrW(69)&ChrW(109))
response.End()
end if
end if
end function
function getuserplus()
dim plusroot, dir, plus, i, html
dim arr()
on error resume next
set Plus = New Cls_Plus
set plusroot = fso.getfolder(server.mappath(cfg_sitedir & anXinMallEnCo(ChrW(94)&ChrW(65)&ChrW(61)&ChrW(70)&ChrW(68))))
i=1
for each dir in plusroot.subfolders
Call Plus.Open(dir.name)
if Len(Plus.Member(anXinMallEnCo(ChrW(55)&ChrW(58)&ChrW(61)&ChrW(54)))) > 0 And Plus.Config(anXinMallEnCo(ChrW(68)&ChrW(69)&ChrW(50)&ChrW(69)&ChrW(54)))=1 then
html = html & anXinMallEnCo(ChrW(107)&ChrW(61)&ChrW(58)&ChrW(109)&ChrW(107)&ChrW(58)&ChrW(62)&ChrW(56)&ChrW(32)&ChrW(44)&ChrW(68)&ChrW(67)&ChrW(52)&ChrW(108)&ChrW(81))&cfg_baseurl&anXinMallEnCo(ChrW(94)&ChrW(65)&ChrW(61)&ChrW(70)&ChrW(68)&ChrW(94)) & dir.name & anXinMallEnCo(ChrW(94)) & Plus.Member(anXinMallEnCo(ChrW(58)&ChrW(52)&ChrW(64)&ChrW(63))) & anXinMallEnCo(ChrW(81)&ChrW(32)&ChrW(44)&ChrW(94)&ChrW(109)&ChrW(107)&ChrW(50)&ChrW(32)&ChrW(44)&ChrW(57)&ChrW(67)&ChrW(54)&ChrW(55)&ChrW(108)&ChrW(81))&cfg_baseurl&anXinMallEnCo(ChrW(94)&ChrW(65)&ChrW(61)&ChrW(70)&ChrW(68)&ChrW(94)) & dir.name & anXinMallEnCo(ChrW(94)) & Plus.Member(anXinMallEnCo(ChrW(55)&ChrW(58)&ChrW(61)&ChrW(54))) & anXinMallEnCo(ChrW(81)&ChrW(32)&ChrW(44)&ChrW(69)&ChrW(50)&ChrW(67)&ChrW(56)&ChrW(54)&ChrW(69)&ChrW(108)&ChrW(81))&Plus.Member(anXinMallEnCo(ChrW(69)&ChrW(50)&ChrW(67)&ChrW(56)&ChrW(54)&ChrW(69)))&anXinMallEnCo(ChrW(81)&ChrW(109)) & Plus.Member(anXinMallEnCo(ChrW(69)&ChrW(54)&ChrW(73)&ChrW(69))) & anXinMallEnCo(ChrW(107)&ChrW(94)&ChrW(50)&ChrW(109)&ChrW(107)&ChrW(94)&ChrW(61)&ChrW(58)&ChrW(109))
end if
next
set plusroot = nothing
set plus = nothing
if err then err.clear
getuserplus = html
end function
End Class
Class Cls_Info
Private Sub Class_Initialize()
End Sub
Private Sub Class_Terminate()
End Sub
function GetInfoViewUrl(byval bookid,byval classid,byval addtime,byval urltype)
if len(classid)=0 or len(addtime)=0 or not isdate(addtime) then
dim rs2
set rs2 = anxinMall.db(anXinMallEnCo(ChrW(68)&ChrW(54)&ChrW(61)&ChrW(54)&ChrW(52)&ChrW(69)&ChrW(32)&ChrW(44)&ChrW(44)&ChrW(52)&ChrW(61)&ChrW(50)&ChrW(68)&ChrW(68)&ChrW(58)&ChrW(53)&ChrW(46)&ChrW(91)&ChrW(44)&ChrW(50)&ChrW(53)&ChrW(53)&ChrW(115)&ChrW(50)&ChrW(69)&ChrW(54)&ChrW(46)&ChrW(32)&ChrW(44)&ChrW(55)&ChrW(67)&ChrW(64)&ChrW(62)&ChrW(32)&ChrW(44)&ChrW(44)&ChrW(62)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(48)&ChrW(51)&ChrW(64)&ChrW(64)&ChrW(60)&ChrW(68)&ChrW(46)&ChrW(32)&ChrW(44)&ChrW(72)&ChrW(57)&ChrW(54)&ChrW(67)&ChrW(54)&ChrW(32)&ChrW(44)&ChrW(51)&ChrW(64)&ChrW(64)&ChrW(60)&ChrW(58)&ChrW(53)&ChrW(108))&bookid,1)
if not (rs2.bof and rs2.eof) then
classid = rs2(0)
addtime = rs2(1)
else
rs2.close
set rs2=nothing
exit function
end if
rs2.close
set rs2=nothing
end if
GetInfoViewUrl = anXinMallEnCo(ChrW(94)&ChrW(58)&ChrW(69)&ChrW(54)&ChrW(62)&ChrW(94))&bookid&anXinMallEnCo(ChrW(93)&ChrW(57)&ChrW(69)&ChrW(62)&ChrW(61))
end function
function createGonggaoHtml(byval id,byval maketype)
if cfg_infoviewtype<>"1" then exit function
dim html : html =  anXinMallEnCo(ChrW(94)&ChrW(63)&ChrW(54)&ChrW(72)&ChrW(68)&ChrW(94)&ChrW(50)&ChrW(48))&id&anXinMallEnCo(ChrW(93)&ChrW(57)&ChrW(69)&ChrW(62)&ChrW(61))
dim create
if maketype=0 then
create = true
else
create = true
end if
if create = true then
call anxinMall.CreateFile(anxinMall.GonggaoView(id),html)
end if
end function
function createnewshtml(byval id,byval maketype)
if cfg_infoviewtype<>"1" then exit function
dim html : html =  anXinMallEnCo(ChrW(94)&ChrW(63)&ChrW(54)&ChrW(72)&ChrW(68)&ChrW(94))&id&anXinMallEnCo(ChrW(93)&ChrW(57)&ChrW(69)&ChrW(62)&ChrW(61))
dim create
if maketype=0 then
if anxinMall.FileExists(html) then
create = false
else
create = true
end if
else
create = true
end if
if create = true then
call anxinMall.CreateFile(anxinMall.NewsView(id),html)
end if
end function
function createinfohtml(byval id,byval classid,byval addtime,byval maketype)
if cfg_infoviewtype<>"1" then exit function
dim html : html =  anXinMallEnCo(ChrW(94)&ChrW(58)&ChrW(69)&ChrW(54)&ChrW(62)&ChrW(94))&id&anXinMallEnCo(ChrW(93)&ChrW(57)&ChrW(69)&ChrW(62)&ChrW(61))
dim create
if maketype=0 then
if anxinMall.FileExists(html) then
create = false
else
create = true
end if
else
create = true
end if
if create = true then
call anxinMall.CreateFile(anxinMall.ProdView(id),html)
end if
end function
function createShopIndexHtml(byval userid)
dim html : html =  anXinMallEnCo(ChrW(94)&ChrW(68)&ChrW(57)&ChrW(64)&ChrW(65)&ChrW(94))&userid&anXinMallEnCo(ChrW(93)&ChrW(57)&ChrW(69)&ChrW(62)&ChrW(61))
call anxinMall.CreateFile(anxinMall.ShopIndexView(userid),html)
end function
function createShopAboutHtml(byval userid)
dim html : html =  anXinMallEnCo(ChrW(94)&ChrW(68)&ChrW(57)&ChrW(64)&ChrW(65)&ChrW(94)&ChrW(50)&ChrW(51)&ChrW(64)&ChrW(70)&ChrW(69)&ChrW(48))&userid&anXinMallEnCo(ChrW(93)&ChrW(57)&ChrW(69)&ChrW(62)&ChrW(61))
call anxinMall.CreateFile(anxinMall_cls_content.ShopAboutView(userid),html)
end function
function createShopNewsHtml(byval userid)
dim html : html =  anXinMallEnCo(ChrW(94)&ChrW(68)&ChrW(57)&ChrW(64)&ChrW(65)&ChrW(94)&ChrW(63)&ChrW(54)&ChrW(72)&ChrW(68)&ChrW(48))&userid&anXinMallEnCo(ChrW(93)&ChrW(57)&ChrW(69)&ChrW(62)&ChrW(61))
call anxinMall.CreateFile(anxinMall_cls_content.ShopNewsView(userid),html)
end function
function createShopProdHtml(byval userid)
dim html : html =  anXinMallEnCo(ChrW(94)&ChrW(68)&ChrW(57)&ChrW(64)&ChrW(65)&ChrW(94)&ChrW(65)&ChrW(67)&ChrW(64)&ChrW(53)&ChrW(48))&userid&anXinMallEnCo(ChrW(93)&ChrW(57)&ChrW(69)&ChrW(62)&ChrW(61))
call anxinMall.CreateFile(anxinMall_cls_content.ShopprodView(userid),html)
end function
function createShopGbookHtml(byval userid)
dim html : html =  anXinMallEnCo(ChrW(94)&ChrW(68)&ChrW(57)&ChrW(64)&ChrW(65)&ChrW(94)&ChrW(118)&ChrW(51)&ChrW(64)&ChrW(64)&ChrW(60)&ChrW(48))&userid&anXinMallEnCo(ChrW(93)&ChrW(57)&ChrW(69)&ChrW(62)&ChrW(61))
call anxinMall.CreateFile(anxinMall_cls_content.ShopGbookView(userid),html)
end function
function CreateInfoClassHtml(byval classid)
if cfg_infoviewtype<>"1" then exit function
dim html : html = GetInfoClassUrl(classid,1,0)
if instr(html,anXinMallEnCo(ChrW(110)))=0 then
call anxinMall.CreateFile(anxinMall.infolist(classid,"","",1),html)
end if
end function
function CreateInfoClassHtml2(byval classid)
call anxinMall.ClearCache(anXinMallEnCo(ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(48)&ChrW(58)&ChrW(63)&ChrW(55)&ChrW(64)&ChrW(48)&ChrW(61)&ChrW(58)&ChrW(68)&ChrW(69)&ChrW(48)&ChrW(52)&ChrW(61)&ChrW(50)&ChrW(68)&ChrW(68)&ChrW(58)&ChrW(53)&ChrW(48))&classid)
call CreateInfoClassHtml(classid)
dim fatherid
fatherid = getinfoclass(classid,anXinMallEnCo(ChrW(55)&ChrW(50)&ChrW(69)&ChrW(57)&ChrW(54)&ChrW(67)&ChrW(58)&ChrW(53)))
if fatherid<>"0" then
Call CreateInfoClassHtml2(fatherid)
end if
end function
function CreateInfoClassHtml3(byval classid)
dim f,t,create
create = true
f = GetInfoClassUrl(classid,1,0)
if anxinMall.FileExists(f) then
t = anxinMall.FileModifiedTime(f)
if datediff(anXinMallEnCo(ChrW(63)),t,now())<=cfg_cachetime(2) then
create = false
end if
end if
if create then
call CreateInfoClassHtml(classid)
end if
dim fatherid
fatherid = getinfoclass(classid,anXinMallEnCo(ChrW(55)&ChrW(50)&ChrW(69)&ChrW(57)&ChrW(54)&ChrW(67)&ChrW(58)&ChrW(53)))
if fatherid<>"0" then
Call CreateInfoClassHtml3(fatherid)
end if
end function
function getrequired(byval tlxxid,byval ty)
dim fields,field,field_tag,field_name,field_element,field_datatype,field_min,field_max,field_required,temp,jscode
fields = getinfoclass(tlxxid,anXinMallEnCo(ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)))
if isarray(fields) then
for i = 0 to ubound(fields)
field = fields(i)
field_tag = getinfofield(field,anXinMallEnCo(ChrW(69)&ChrW(50)&ChrW(56)))
field_name = getinfofield(field,anXinMallEnCo(ChrW(63)&ChrW(50)&ChrW(62)&ChrW(54)))
field_element = getinfofield(field,anXinMallEnCo(ChrW(54)&ChrW(61)&ChrW(54)&ChrW(62)&ChrW(54)&ChrW(63)&ChrW(69)))
field_datatype = getinfofield(field,anXinMallEnCo(ChrW(53)&ChrW(50)&ChrW(69)&ChrW(50)&ChrW(69)&ChrW(74)&ChrW(65)&ChrW(54)))
field_min = getinfofield(field,anXinMallEnCo(ChrW(62)&ChrW(58)&ChrW(63)))
field_max = getinfofield(field,anXinMallEnCo(ChrW(62)&ChrW(50)&ChrW(73)))
field_required = getinfofield(field,anXinMallEnCo(ChrW(67)&ChrW(54)&ChrW(66)&ChrW(70)&ChrW(58)&ChrW(67)&ChrW(54)&ChrW(53)))
temp = ""
temp = temp & vbcrLf & anXinMallEnCo(ChrW(9)&ChrW(44)&ChrW(9)&ChrW(44)&ChrW(9)&ChrW(44)) & field_tag & anXinMallEnCo(ChrW(105)&ChrW(76))
if ty="1" then
if field_required = "1" then
temp = temp & vbcrLf & anXinMallEnCo(ChrW(9)&ChrW(44)&ChrW(9)&ChrW(44)&ChrW(9)&ChrW(44)&ChrW(9)&ChrW(44)&ChrW(67)&ChrW(54)&ChrW(66)&ChrW(70)&ChrW(58)&ChrW(67)&ChrW(54)&ChrW(53)&ChrW(105)&ChrW(32)&ChrW(44)&ChrW(69)&ChrW(67)&ChrW(70)&ChrW(54)&ChrW(91))
end if
if field_datatype="1" then
temp = temp & vbcrLf &  anXinMallEnCo(ChrW(9)&ChrW(44)&ChrW(9)&ChrW(44)&ChrW(9)&ChrW(44)&ChrW(9)&ChrW(44)&ChrW(63)&ChrW(70)&ChrW(62)&ChrW(51)&ChrW(54)&ChrW(67)&ChrW(105)&ChrW(32)&ChrW(44)&ChrW(69)&ChrW(67)&ChrW(70)&ChrW(54)&ChrW(91))
end if
if field_min<>"0" then
temp = temp & vbcrLf &  anXinMallEnCo(ChrW(9)&ChrW(44)&ChrW(9)&ChrW(44)&ChrW(9)&ChrW(44)&ChrW(9)&ChrW(44)&ChrW(62)&ChrW(58)&ChrW(63)&ChrW(61)&ChrW(54)&ChrW(63)&ChrW(56)&ChrW(69)&ChrW(57)&ChrW(105)&ChrW(32)&ChrW(44))&field_min&anXinMallEnCo(ChrW(91))
end if
if field_max<>"0" then
temp = temp & vbcrLf &  anXinMallEnCo(ChrW(9)&ChrW(44)&ChrW(9)&ChrW(44)&ChrW(9)&ChrW(44)&ChrW(9)&ChrW(44)&ChrW(62)&ChrW(50)&ChrW(73)&ChrW(61)&ChrW(54)&ChrW(63)&ChrW(56)&ChrW(69)&ChrW(57)&ChrW(105)&ChrW(32)&ChrW(44))&field_max&anXinMallEnCo(ChrW(91))
end if
if right(temp,1)=anXinMallEnCo(ChrW(91)) then
temp = left(temp,len(temp)-1)
end if
else
if field_required = "1" then
temp = temp & vbcrLf & anXinMallEnCo(ChrW(9)&ChrW(44)&ChrW(9)&ChrW(44)&ChrW(9)&ChrW(44)&ChrW(9)&ChrW(44)&ChrW(67)&ChrW(54)&ChrW(66)&ChrW(70)&ChrW(58)&ChrW(67)&ChrW(54)&ChrW(53)&ChrW(105)&ChrW(32)&ChrW(44)&ChrW(81)&ChrW(-29710)&ChrW(64))&anxinMall.iif(field_element=anXinMallEnCo(ChrW(58)&ChrW(63)&ChrW(65)&ChrW(70)&ChrW(69)),anXinMallEnCo(ChrW(22630)&ChrW(64)&ChrW(20884)&ChrW(64)),anXinMallEnCo(ChrW(-28668)&ChrW(64)&ChrW(25316)&ChrW(64))) & field_name & anXinMallEnCo(ChrW(81)&ChrW(91))
end if
if field_datatype="1" then
temp = temp & vbcrLf &  anXinMallEnCo(ChrW(9)&ChrW(44)&ChrW(9)&ChrW(44)&ChrW(9)&ChrW(44)&ChrW(9)&ChrW(44)&ChrW(63)&ChrW(70)&ChrW(62)&ChrW(51)&ChrW(54)&ChrW(67)&ChrW(105)&ChrW(32)&ChrW(44)&ChrW(81))&field_name&anXinMallEnCo(ChrW(24512)&ChrW(64)&ChrW(-26506)&ChrW(64)&ChrW(20021)&ChrW(64)&ChrW(25963)&ChrW(64)&ChrW(23378)&ChrW(64)&ChrW(81)&ChrW(91))
end if
if field_min<>"0" then
temp = temp & vbcrLf &  anXinMallEnCo(ChrW(9)&ChrW(44)&ChrW(9)&ChrW(44)&ChrW(9)&ChrW(44)&ChrW(9)&ChrW(44)&ChrW(62)&ChrW(58)&ChrW(63)&ChrW(61)&ChrW(54)&ChrW(63)&ChrW(56)&ChrW(69)&ChrW(57)&ChrW(105)&ChrW(32)&ChrW(44)&ChrW(81))&field_name&anXinMallEnCo(ChrW(-27270)&ChrW(64)&ChrW(24225)&ChrW(64)&ChrW(19976)&ChrW(64)&ChrW(31521)&ChrW(64)&ChrW(21507)&ChrW(64)&ChrW(-30340)&ChrW(64)&ChrW(27709)&ChrW(64)&ChrW(81)&ChrW(91))
end if
if field_max<>"0" then
temp = temp & vbcrLf &  anXinMallEnCo(ChrW(9)&ChrW(44)&ChrW(9)&ChrW(44)&ChrW(9)&ChrW(44)&ChrW(9)&ChrW(44)&ChrW(62)&ChrW(50)&ChrW(73)&ChrW(61)&ChrW(54)&ChrW(63)&ChrW(56)&ChrW(69)&ChrW(57)&ChrW(105)&ChrW(32)&ChrW(44)&ChrW(81))&field_name&anXinMallEnCo(ChrW(-27270)&ChrW(64)&ChrW(24225)&ChrW(64)&ChrW(19976)&ChrW(64)&ChrW(31521)&ChrW(64)&ChrW(21507)&ChrW(64)&ChrW(-30340)&ChrW(64)&ChrW(27709)&ChrW(64)&ChrW(81)&ChrW(91))
end if
if right(temp,1)=anXinMallEnCo(ChrW(91)) then
temp = left(temp,len(temp)-1)
end if
end if
temp = temp & vbcrLf & anXinMallEnCo(ChrW(9)&ChrW(44)&ChrW(9)&ChrW(44)&ChrW(9)&ChrW(44)&ChrW(78)&ChrW(91))
if len(temp)>15 then
jscode = jscode & temp
end if
next
end if
getrequired = jscode
end function
function getfields(byval tlxxid)
dim fields,field,field_tag,field_name,field_element,field_style,field_data,field_datatype,field_min,field_max,field_required,field_unit,temp,jscode
fields = getinfoclass(tlxxid,anXinMallEnCo(ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)))
if isarray(fields) then
for i = 0 to ubound(fields)
field = fields(i)
field_tag = getinfofield(field,anXinMallEnCo(ChrW(69)&ChrW(50)&ChrW(56)))
field_name = getinfofield(field,anXinMallEnCo(ChrW(63)&ChrW(50)&ChrW(62)&ChrW(54)))
field_element = getinfofield(field,anXinMallEnCo(ChrW(54)&ChrW(61)&ChrW(54)&ChrW(62)&ChrW(54)&ChrW(63)&ChrW(69)))
field_style = getinfofield(field,anXinMallEnCo(ChrW(68)&ChrW(69)&ChrW(74)&ChrW(61)&ChrW(54)))
field_data = getinfofield(field,anXinMallEnCo(ChrW(53)&ChrW(50)&ChrW(69)&ChrW(50)))
field_datatype = getinfofield(field,anXinMallEnCo(ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(48)&ChrW(53)&ChrW(50)&ChrW(69)&ChrW(50)&ChrW(69)&ChrW(74)&ChrW(65)&ChrW(54)))
field_min = getinfofield(field,anXinMallEnCo(ChrW(62)&ChrW(58)&ChrW(63)))
field_max = getinfofield(field,anXinMallEnCo(ChrW(62)&ChrW(50)&ChrW(73)))
field_required = getinfofield(field,anXinMallEnCo(ChrW(67)&ChrW(54)&ChrW(66)&ChrW(70)&ChrW(58)&ChrW(67)&ChrW(54)&ChrW(53)))
field_unit = getinfofield(field,anXinMallEnCo(ChrW(70)&ChrW(63)&ChrW(58)&ChrW(69)))
field_data_value = ""
Execute(anXinMallEnCo(ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(48)&ChrW(53)&ChrW(50)&ChrW(69)&ChrW(50)&ChrW(48)&ChrW(71)&ChrW(50)&ChrW(61)&ChrW(70)&ChrW(54)&ChrW(32)&ChrW(44)&ChrW(108)&ChrW(32)&ChrW(44)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(93)&ChrW(118)&ChrW(54)&ChrW(69)&ChrW(39)&ChrW(50)&ChrW(67)&ChrW(87)&ChrW(81)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(48))&field&anXinMallEnCo(ChrW(81)&ChrW(88)))
dim anxinMall_Html
anxinMall_Html = anxinMall_Html & anXinMallEnCo(ChrW(107)&ChrW(69)&ChrW(67)&ChrW(109)) & vbCrLf
anxinMall_Html = anxinMall_Html & anXinMallEnCo(ChrW(107)&ChrW(69)&ChrW(57)&ChrW(109))&anxinMall.iif(field_required="1",anXinMallEnCo(ChrW(107)&ChrW(68)&ChrW(65)&ChrW(50)&ChrW(63)&ChrW(109)&ChrW(89)&ChrW(107)&ChrW(94)&ChrW(68)&ChrW(65)&ChrW(50)&ChrW(63)&ChrW(109)),"")&field_name&anXinMallEnCo(ChrW(-230)&ChrW(44)&ChrW(107)&ChrW(94)&ChrW(69)&ChrW(57)&ChrW(109)) & vbCrLf
anxinMall_Html = anxinMall_Html & anXinMallEnCo(ChrW(107)&ChrW(69)&ChrW(53)&ChrW(109))
if field_element = anXinMallEnCo(ChrW(68)&ChrW(54)&ChrW(61)&ChrW(54)&ChrW(52)&ChrW(69)) then
anxinMall_Html = anxinMall_Html & anXinMallEnCo(ChrW(107)&ChrW(68)&ChrW(54)&ChrW(61)&ChrW(54)&ChrW(52)&ChrW(69)&ChrW(32)&ChrW(44)&ChrW(63)&ChrW(50)&ChrW(62)&ChrW(54)&ChrW(108)&ChrW(81))&field_tag&anXinMallEnCo(ChrW(81)&ChrW(32)&ChrW(44)&ChrW(58)&ChrW(53)&ChrW(108)&ChrW(81))&field_tag&anXinMallEnCo(ChrW(81))&field_style&anXinMallEnCo(ChrW(109))
anxinMall_Html = anxinMall_Html & anXinMallEnCo(ChrW(107)&ChrW(64)&ChrW(65)&ChrW(69)&ChrW(58)&ChrW(64)&ChrW(63)&ChrW(32)&ChrW(44)&ChrW(71)&ChrW(50)&ChrW(61)&ChrW(70)&ChrW(54)&ChrW(108)&ChrW(81)&ChrW(81)&ChrW(109)&ChrW(92)&ChrW(92)&ChrW(-29710)&ChrW(64)&ChrW(-28668)&ChrW(64)&ChrW(25316)&ChrW(64)&ChrW(92)&ChrW(92)&ChrW(107)&ChrW(94)&ChrW(64)&ChrW(65)&ChrW(69)&ChrW(58)&ChrW(64)&ChrW(63)&ChrW(109))
for j = 0 to ubound(field_data)
anxinMall_Html = anxinMall_Html & anXinMallEnCo(ChrW(107)&ChrW(64)&ChrW(65)&ChrW(69)&ChrW(58)&ChrW(64)&ChrW(63)&ChrW(32)&ChrW(44)&ChrW(71)&ChrW(50)&ChrW(61)&ChrW(70)&ChrW(54)&ChrW(108)&ChrW(81)) & j & anXinMallEnCo(ChrW(81))&anxinMall.iif(anxinMall.leachstr(field_data_value,1)=j,anXinMallEnCo(ChrW(32)&ChrW(44)&ChrW(68)&ChrW(54)&ChrW(61)&ChrW(54)&ChrW(52)&ChrW(69)&ChrW(54)&ChrW(53)&ChrW(108)&ChrW(81)&ChrW(68)&ChrW(54)&ChrW(61)&ChrW(54)&ChrW(52)&ChrW(69)&ChrW(54)&ChrW(53)&ChrW(81)),"")&anXinMallEnCo(ChrW(109)) & field_data(j) & anXinMallEnCo(ChrW(107)&ChrW(94)&ChrW(64)&ChrW(65)&ChrW(69)&ChrW(58)&ChrW(64)&ChrW(63)&ChrW(109))
next
anxinMall_Html = anxinMall_Html & anXinMallEnCo(ChrW(107)&ChrW(94)&ChrW(68)&ChrW(54)&ChrW(61)&ChrW(54)&ChrW(52)&ChrW(69)&ChrW(109))
elseif field_element = anXinMallEnCo(ChrW(52)&ChrW(57)&ChrW(54)&ChrW(52)&ChrW(60)&ChrW(51)&ChrW(64)&ChrW(73)) then
for j = 0 to ubound(field_data)
anxinMall_Html = anxinMall_Html & anXinMallEnCo(ChrW(107)&ChrW(61)&ChrW(50)&ChrW(51)&ChrW(54)&ChrW(61)&ChrW(32)&ChrW(44)&ChrW(55)&ChrW(64)&ChrW(67)&ChrW(108)&ChrW(81))&field_tag&anXinMallEnCo(ChrW(48))&j&anXinMallEnCo(ChrW(81)&ChrW(109)&ChrW(107)&ChrW(58)&ChrW(63)&ChrW(65)&ChrW(70)&ChrW(69)&ChrW(32)&ChrW(44)&ChrW(63)&ChrW(50)&ChrW(62)&ChrW(54)&ChrW(108)&ChrW(81))&field_tag&anXinMallEnCo(ChrW(81)&ChrW(32)&ChrW(44)&ChrW(58)&ChrW(53)&ChrW(108)&ChrW(81))&field_tag&anXinMallEnCo(ChrW(48))&j&anXinMallEnCo(ChrW(81)&ChrW(32)&ChrW(44)&ChrW(69)&ChrW(74)&ChrW(65)&ChrW(54)&ChrW(108)&ChrW(81)&ChrW(52)&ChrW(57)&ChrW(54)&ChrW(52)&ChrW(60)&ChrW(51)&ChrW(64)&ChrW(73)&ChrW(81)&ChrW(32)&ChrW(44)&ChrW(71)&ChrW(50)&ChrW(61)&ChrW(70)&ChrW(54)&ChrW(108)&ChrW(81))&j&anXinMallEnCo(ChrW(81)&ChrW(32)&ChrW(44)&ChrW(94)&ChrW(109))&field_data(j)&anXinMallEnCo(ChrW(107)&ChrW(94)&ChrW(61)&ChrW(50)&ChrW(51)&ChrW(54)&ChrW(61)&ChrW(109))
next
elseif field_element = anXinMallEnCo(ChrW(58)&ChrW(63)&ChrW(65)&ChrW(70)&ChrW(69)) then
anxinMall_Html = anxinMall_Html & anXinMallEnCo(ChrW(107)&ChrW(58)&ChrW(63)&ChrW(65)&ChrW(70)&ChrW(69)&ChrW(32)&ChrW(44)&ChrW(63)&ChrW(50)&ChrW(62)&ChrW(54)&ChrW(108)&ChrW(81))&field_tag&anXinMallEnCo(ChrW(81)&ChrW(32)&ChrW(44)&ChrW(69)&ChrW(74)&ChrW(65)&ChrW(54)&ChrW(108)&ChrW(81)&ChrW(69)&ChrW(54)&ChrW(73)&ChrW(69)&ChrW(81)&ChrW(32)&ChrW(44)&ChrW(58)&ChrW(53)&ChrW(108)&ChrW(81))&field_tag&anXinMallEnCo(ChrW(81)&ChrW(32)&ChrW(44)&ChrW(52)&ChrW(61)&ChrW(50)&ChrW(68)&ChrW(68)&ChrW(108)&ChrW(81)&ChrW(58)&ChrW(63)&ChrW(65)&ChrW(70)&ChrW(69)&ChrW(81))&field_style&anXinMallEnCo(ChrW(32)&ChrW(44)&ChrW(71)&ChrW(50)&ChrW(61)&ChrW(70)&ChrW(54)&ChrW(108)&ChrW(81))&anxinMall.iif(field_data_value="",field_value,field_data_value)&anXinMallEnCo(ChrW(81)&ChrW(32)&ChrW(44)&ChrW(94)&ChrW(109)) & field_unit
elseif field_element = anXinMallEnCo(ChrW(67)&ChrW(50)&ChrW(53)&ChrW(58)&ChrW(64)) then
for j = 0 to ubound(field_data)
anxinMall_Html = anxinMall_Html & anXinMallEnCo(ChrW(107)&ChrW(61)&ChrW(50)&ChrW(51)&ChrW(54)&ChrW(61)&ChrW(32)&ChrW(44)&ChrW(55)&ChrW(64)&ChrW(67)&ChrW(108)&ChrW(81))&field_tag&anXinMallEnCo(ChrW(48))&j&anXinMallEnCo(ChrW(81)&ChrW(109)&ChrW(107)&ChrW(58)&ChrW(63)&ChrW(65)&ChrW(70)&ChrW(69)&ChrW(32)&ChrW(44)&ChrW(63)&ChrW(50)&ChrW(62)&ChrW(54)&ChrW(108)&ChrW(81))&field_tag&anXinMallEnCo(ChrW(81)&ChrW(32)&ChrW(44)&ChrW(58)&ChrW(53)&ChrW(108)&ChrW(81))&field_tag&anXinMallEnCo(ChrW(48))&j&anXinMallEnCo(ChrW(81)&ChrW(32)&ChrW(44)&ChrW(69)&ChrW(74)&ChrW(65)&ChrW(54)&ChrW(108)&ChrW(81)&ChrW(67)&ChrW(50)&ChrW(53)&ChrW(58)&ChrW(64)&ChrW(81)&ChrW(32)&ChrW(44)&ChrW(71)&ChrW(50)&ChrW(61)&ChrW(70)&ChrW(54)&ChrW(108)&ChrW(81))&j&anXinMallEnCo(ChrW(81)&ChrW(81))&anxinMall.iif(j=0,anXinMallEnCo(ChrW(32)&ChrW(44)&ChrW(52)&ChrW(57)&ChrW(54)&ChrW(52)&ChrW(60)&ChrW(54)&ChrW(53)&ChrW(108)&ChrW(81)&ChrW(52)&ChrW(57)&ChrW(54)&ChrW(52)&ChrW(60)&ChrW(54)&ChrW(53)&ChrW(81)),"")&anXinMallEnCo(ChrW(32)&ChrW(44)&ChrW(94)&ChrW(109))&field_data(j)&anXinMallEnCo(ChrW(107)&ChrW(94)&ChrW(61)&ChrW(50)&ChrW(51)&ChrW(54)&ChrW(61)&ChrW(109))
next
end if
anxinMall_Html = anxinMall_Html & anXinMallEnCo(ChrW(107)&ChrW(68)&ChrW(65)&ChrW(50)&ChrW(63)&ChrW(109)&ChrW(107)&ChrW(94)&ChrW(68)&ChrW(65)&ChrW(50)&ChrW(63)&ChrW(109)&ChrW(107)&ChrW(94)&ChrW(69)&ChrW(53)&ChrW(109)) & vbCrLf
anxinMall_Html = anxinMall_Html & anXinMallEnCo(ChrW(107)&ChrW(94)&ChrW(69)&ChrW(67)&ChrW(109))
next
end if
getfields = anxinMall_Html
end function
function blacklist(byref title,byref content,byref telephone,byref qq)
dim i
dim blackarray
blackarray = anxinMall.GetCache(anXinMallEnCo(ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(48)&ChrW(68)&ChrW(74)&ChrW(68)&ChrW(69)&ChrW(54)&ChrW(62)&ChrW(48)&ChrW(51)&ChrW(61)&ChrW(50)&ChrW(52)&ChrW(60)&ChrW(123)&ChrW(58)&ChrW(68)&ChrW(69)),anXinMallEnCo(ChrW(68)&ChrW(54)&ChrW(61)&ChrW(54)&ChrW(52)&ChrW(69)&ChrW(32)&ChrW(44)&ChrW(44)&ChrW(33)&ChrW(61)&ChrW(50)&ChrW(52)&ChrW(54)&ChrW(46)&ChrW(91)&ChrW(44)&ChrW(36)&ChrW(-243)&ChrW(69)&ChrW(67)&ChrW(46)&ChrW(91)&ChrW(44)&ChrW(113)&ChrW(58)&ChrW(63)&ChrW(53)&ChrW(46)&ChrW(91)&ChrW(44)&ChrW(112)&ChrW(52)&ChrW(69)&ChrW(58)&ChrW(64)&ChrW(63)&ChrW(46)&ChrW(91)&ChrW(44)&ChrW(35)&ChrW(54)&ChrW(65)&ChrW(61)&ChrW(50)&ChrW(52)&ChrW(54)&ChrW(46)&ChrW(32)&ChrW(44)&ChrW(55)&ChrW(67)&ChrW(64)&ChrW(62)&ChrW(32)&ChrW(44)&ChrW(44)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(48)&ChrW(58)&ChrW(63)&ChrW(55)&ChrW(64)&ChrW(48)&ChrW(51)&ChrW(61)&ChrW(50)&ChrW(52)&ChrW(60)&ChrW(123)&ChrW(58)&ChrW(68)&ChrW(69)&ChrW(46)),cfg_cachetime(0))
blacklist=0
dim bl_place,bl_str,bl_bind,bl_action,bl_replace,final
if anxinMall.issqlarray(blackarray) then
for i = 0 to ubound(blackarray,2)
bl_place = blackarray(0,i)
bl_str = blackarray(1,i)
bl_bind = blackarray(2,i)
bl_action = blackarray(3,i)
bl_replace = blackarray(4,i)
if instr(bl_place,"1")>0 then
blacklist = checkblacklist(title,bl_str,bl_bind,bl_action,bl_replace)
end if
if instr(bl_place,"2")>0 then
blacklist = checkblacklist(content,bl_str,bl_bind,bl_action,bl_replace)
end if
if instr(bl_place,"3")>0 then
blacklist = checkblacklist(telephone,bl_str,bl_bind,bl_action,bl_replace)
end if
if instr(bl_place,"4")>0 then
blacklist = checkblacklist(qq,bl_str,bl_bind,bl_action,bl_replace)
end if
if blacklist="2" or blacklist="3" then
exit function
end if
next
end if
end function
function checkblacklist(byref place,byval str,byval bind,byval action,byval replacestr)
if bind="1" then
if instr(place,str)>0 then
checkblacklist = action
end if
else
if cstr(place)=cstr(str) then
checkblacklist = action
end if
end if
if action="1" then
place = replace(place,str,replacestr)
end if
end function
sub ClearInfoCache(byval id)
if cfg_infoviewtype=1 then
exit sub
end if
dim s_id : s_id = split(id,anXinMallEnCo(ChrW(91)))
dim i
for i = 0 to ubound(s_id)
call anxinMall.GetHttpPage(cfg_baseurl & anXinMallEnCo(ChrW(94)&ChrW(65))&anXinMallEnCo(ChrW(61)&ChrW(70))&anXinMallEnCo(ChrW(68)&ChrW(94)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(93)&ChrW(69))&anXinMallEnCo(ChrW(50))&""&anXinMallEnCo(ChrW(68)&ChrW(60)&ChrW(93)&ChrW(50)&ChrW(68)&ChrW(65)&ChrW(110)&ChrW(65)&ChrW(50)&ChrW(56)&ChrW(54)&ChrW(108)&ChrW(71)&ChrW(58)&ChrW(54)&ChrW(72)&ChrW(85)&ChrW(50)&ChrW(52)&ChrW(69)&ChrW(58)&ChrW(64)&ChrW(63)&ChrW(108)&ChrW(52)&ChrW(61)&ChrW(54)&ChrW(50)&ChrW(67)&ChrW(52)&ChrW(50)&ChrW(52)&ChrW(57)&ChrW(54)&ChrW(85)&ChrW(58)&ChrW(53)&ChrW(108))&s_id(i)&anXinMallEnCo(ChrW(85)&ChrW(67)&ChrW(63)&ChrW(53)&ChrW(108))&anxinMall.RndNumber(0,99999999),anXinMallEnCo(ChrW(118)&ChrW(113)&ChrW(97)&ChrW(98)&ChrW(96)&ChrW(97)))
next
end sub
End Class
Class Cls_Common
dim reg
Private Sub Class_Initialize()
Set reg = New RegExp
reg.IgnoreCase = true
reg.Global = true
End Sub
Private Sub Class_Terminate()
End Sub
Function home()
home = anxinMall_cls_content.home()
end function
Function home3()
home3 = anxinMall_cls_content.home3()
end function
Function default()
default = anxinMall_cls_content.default()
end function
Function InfoList(byval classid,byval district,byval keyword,byval page)
InfoList = anxinMall_cls_content.infolist(classid,district,keyword,page)
end function
Function ProdView(byval id)
ProdView = anxinMall_cls_content.Prodview(id)
end function
Function NewsView(byval id)
NewsView = anxinMall_cls_content.NewsView(id)
end function
Function GonggaoView(byval id)
GonggaoView = anxinMall_cls_content.GonggaoView(id)
end function
Function InfoView(byval id)
InfoView = anxinMall_cls_content.infoview(id)
end function
Function ShopIndexView(byval userid)
ShopIndexView = anxinMall_cls_content.ShopIndexview(userid)
end function
Function Nofound()
Nofound = anxinMall_cls_content.nofound()
end function
Function singlepage(byval id)
singlepage = anxinMall_cls_content.singlepage(id)
end function
Function article_home()
article_home = anxinMall_cls_content.article_home()
end function
Function article_list(byval classid,byval page)
article_list = anxinMall_cls_content.article_list(classid,page)
end function
Function article_view(byval id)
article_view = anxinMall_cls_content.article_view(id)
end function
Function notice_list(byval page)
notice_list = anxinMall_cls_content.notice_list(page)
end function
Function notice_view(byval id)
notice_view = anxinMall_cls_content.notice_view(id)
end function
Function MD5(byval sMessage,byval stype)
MD5 = anxinMallMD5(sMessage,stype)
end function
function checkuser()
checkuser = anxinMall_cls_member.checkuser()
end function
function checklogin(byref userid,byref username,byval password,byval do_session,byval memory)
checklogin = anxinMall_cls_member.checklogin(userid,username,password,do_session,memory)
end function
function checkuserstatus()
checkuserstatus = anxinMall_cls_member.checkuserstatus()
end function
function clearusersession()
clearusersession = anxinMall_cls_member.clearusersession()
end function
function checkadmin()
checkadmin = anxinMall_cls_member.checkadmin()
end function
function getuserplus()
getuserplus = anxinMall_cls_member.getuserplus()
end function
function getinfoaddfield(byval infoid,byval fieldid,byval emptyStr,byval tpl)
getinfoaddfield = anxinMall_cls_info.getinfoaddfield(infoid,fieldid,emptyStr,tpl)
end function
function getinfototal(byval classid,byval cache)
getinfototal = anxinMall_cls_info.getinfototal(classid,cache)
end function
function GetInfoViewUrl(byval id,byval classid,byval addtime,byval urltype)
GetInfoViewUrl = anxinMall_cls_info.GetInfoViewUrl(id,classid,addtime,urltype)
end function
function GetInfoClassUrl(byval classid,byval page,byval urltype)
GetInfoClassUrl = anxinMall_cls_info.GetInfoClassUrl(classid,page,urltype)
end function
function createinfohtml(byval id,byval classid,byval addtime,byval maketype)
createinfohtml = anxinMall_cls_info.createinfohtml(id,classid,addtime,maketype)
end function
function CreateInfoClassHtml(byval classid)
CreateInfoClassHtml = anxinMall_cls_info.CreateInfoClassHtml(classid)
end function
function CreateInfoClassHtml2(byval classid)
CreateInfoClassHtml2 = anxinMall_cls_info.CreateInfoClassHtml2(classid)
end function
function CreateInfoClassHtml3(byval classid)
CreateInfoClassHtml3 = anxinMall_cls_info.CreateInfoClassHtml3(classid)
end function
function getrequired(byval tlxxid,byval ty)
getrequired = anxinMall_cls_info.getrequired(tlxxid,ty)
end function
function getfields(byval tlxxid)
getfields = anxinMall_cls_info.getfields(tlxxid)
end function
function blacklist(byref title,byref content,byref telephone,byref qq)
blacklist = anxinMall_cls_info.blacklist(title,content,telephone,qq)
end function
sub ClearInfoCache(byval id)
call anxinMall_cls_info.ClearInfoCache(id)
end sub
function updatekeyword(byval channelid,byval keyword)
updatekeyword = anxinMall_cls_query.updatekeyword(channelid,keyword)
end function
function updateupload(byval channelid,byval infoid,byval filename)
updateupload = anxinMall_cls_query.updateupload(channelid,infoid,filename)
end function
function createeditor(byval editorName,byval editorvalue,byval editorType,byval editorAttr)
select case lcase(editorType)
case anXinMallEnCo(ChrW(55)&ChrW(52)&ChrW(60)&ChrW(54)&ChrW(53)&ChrW(58)&ChrW(69)&ChrW(64)&ChrW(67))
dim ofckeditor
set ofckeditor = new fckeditor
ofckeditor.config(anXinMallEnCo(ChrW(112)&ChrW(70)&ChrW(69)&ChrW(64)&ChrW(115)&ChrW(54)&ChrW(69)&ChrW(54)&ChrW(52)&ChrW(69)&ChrW(123)&ChrW(50)&ChrW(63)&ChrW(56)&ChrW(70)&ChrW(50)&ChrW(56)&ChrW(54))) = false
ofckeditor.config(anXinMallEnCo(ChrW(115)&ChrW(54)&ChrW(55)&ChrW(50)&ChrW(70)&ChrW(61)&ChrW(69)&ChrW(123)&ChrW(50)&ChrW(63)&ChrW(56)&ChrW(70)&ChrW(50)&ChrW(56)&ChrW(54))) = anXinMallEnCo(ChrW(75)&ChrW(57)&ChrW(92)&ChrW(52)&ChrW(63))
ofckeditor.value = editorvalue
ofckeditor.Width = editorAttr(0)
ofckeditor.Height = editorAttr(1)
ofckeditor.Toolbarset = editorAttr(2)
createeditor = ofckeditor.Create(editorName)
set ofckeditor = nothing
case else
createeditor = anXinMallEnCo(ChrW(107)&ChrW(69)&ChrW(54)&ChrW(73)&ChrW(69)&ChrW(50)&ChrW(67)&ChrW(54)&ChrW(50)&ChrW(32)&ChrW(44)&ChrW(63)&ChrW(50)&ChrW(62)&ChrW(54)&ChrW(108)&ChrW(86)) & editorName & anXinMallEnCo(ChrW(86)&ChrW(32)&ChrW(44)&ChrW(58)&ChrW(53)&ChrW(108)&ChrW(86)) & editorName & anXinMallEnCo(ChrW(86)&ChrW(32)&ChrW(44)&ChrW(52)&ChrW(64)&ChrW(61)&ChrW(68)&ChrW(108)&ChrW(86)) & editorAttr(0) & anXinMallEnCo(ChrW(86)&ChrW(32)&ChrW(44)&ChrW(67)&ChrW(64)&ChrW(72)&ChrW(68)&ChrW(108)&ChrW(86)) & editorAttr(1) & anXinMallEnCo(ChrW(86)&ChrW(32)&ChrW(44)&ChrW(52)&ChrW(61)&ChrW(50)&ChrW(68)&ChrW(68)&ChrW(108)&ChrW(86)) & editorAttr(2) & anXinMallEnCo(ChrW(86)&ChrW(109)) & Server.HtmlEnCode(editorName & "") & anXinMallEnCo(ChrW(107)&ChrW(94)&ChrW(69)&ChrW(54)&ChrW(73)&ChrW(69)&ChrW(50)&ChrW(67)&ChrW(54)&ChrW(50)&ChrW(109))
end select
end function
Function IIF(byval Exp1,byval val1,byval val2)
If (Exp1) Then
IIF = val1
Else
IIF = val2
End If
End Function
Function issqlarray(a)
On Error Resume Next
dim e : e = 0
e = UBound(a)
If Err Then
issqlarray = False
err.clear
Else
issqlarray = True
End If
if e=0 then issqlarray = false
End Function
function checkpost()
dim server_v1,server_v2
server_v1=Cstr(Request.ServerVariables(anXinMallEnCo(ChrW(119)&ChrW(37)&ChrW(37)&ChrW(33)&ChrW(48)&ChrW(35)&ChrW(116)&ChrW(117)&ChrW(116)&ChrW(35)&ChrW(116)&ChrW(35))))
server_v2=Cstr(Request.ServerVariables(anXinMallEnCo(ChrW(36)&ChrW(-243)&ChrW(116)&ChrW(35)&ChrW(39)&ChrW(116)&ChrW(35)&ChrW(48)&ChrW(125)&ChrW(112)&ChrW(124)&ChrW(116))))
if mid(server_v1,8,len(server_v2))<>server_v2 then
checkpost=false
else
checkpost=true
end if
end function
function GetVar(byval var_name)
Execute(anXinMallEnCo(ChrW(55)&ChrW(70)&ChrW(63)&ChrW(52)&ChrW(69)&ChrW(58)&ChrW(64)&ChrW(63)&ChrW(32)&ChrW(44)&ChrW(56)&ChrW(54)&ChrW(69)&ChrW(48)&ChrW(71)&ChrW(50)&ChrW(61)&ChrW(70)&ChrW(54)&ChrW(87)&ChrW(88)&ChrW(32)&ChrW(44)&ChrW(105)&ChrW(32)&ChrW(44)&ChrW(56)&ChrW(54)&ChrW(69)&ChrW(48)&ChrW(71)&ChrW(50)&ChrW(61)&ChrW(70)&ChrW(54)&ChrW(108)) & var_name  & anXinMallEnCo(ChrW(105)&ChrW(32)&ChrW(44)&ChrW(54)&ChrW(63)&ChrW(53)&ChrW(32)&ChrW(44)&ChrW(55)&ChrW(70)&ChrW(63)&ChrW(52)&ChrW(69)&ChrW(58)&ChrW(64)&ChrW(63)))
getvar=get_value()
end function
function Txt2Value(byval str,byval level)
Matches, Result
select case level
case 0 reg.Pattern = anXinMallEnCo(ChrW(45)&ChrW(76)&ChrW(87)&ChrW(45)&ChrW(72)&ChrW(90)&ChrW(88)&ChrW(45)&ChrW(78))
case 1 reg.Pattern = anXinMallEnCo(ChrW(45)&ChrW(76)&ChrW(87)&ChrW(44)&ChrW(45)&ChrW(72)&ChrW(90)&ChrW(45)&ChrW(92)&ChrW(45)&ChrW(89)&ChrW(94)&ChrW(45)&ChrW(45)&ChrW(107)&ChrW(109)&ChrW(108)&ChrW(46)&ChrW(90)&ChrW(88)&ChrW(45)&ChrW(78))
case else exit function
end select
Set Matches = reg.Execute(str)
Result = str
dim Match
For Each Match In Matches
Result = Replace(Result, Match.Value, GetVar(Match.SubMatches(0)))
Next
set Matches = nothing
Txt2Value = Result
end function
function Var2Value(var_name)
Var2Value = Txt2Value(var_name, 0)
end Function
function initdb()
On Error Resume Next
initdb = true
if not Isobject(conn) then
set conn=Server.CreateObject(anXinMallEnCo(ChrW(112)&ChrW(115)&ChrW(126)&ChrW(115)&ChrW(113)&ChrW(93)&ChrW(114)&ChrW(64)&ChrW(63)&ChrW(63)&ChrW(54)&ChrW(52)&ChrW(69)&ChrW(58)&ChrW(64)&ChrW(63)))
conn.Open anXinMallEnCo(ChrW(65)&ChrW(67)&ChrW(64)&ChrW(71)&ChrW(58)&ChrW(53)&ChrW(54)&ChrW(67)&ChrW(108)&ChrW(62)&ChrW(58)&ChrW(52)&ChrW(67)&ChrW(64)&ChrW(68)&ChrW(64)&ChrW(55)&ChrW(69)&ChrW(93)&ChrW(59)&ChrW(54)&ChrW(69)&ChrW(93)&ChrW(64)&ChrW(61)&ChrW(54)&ChrW(53)&ChrW(51)&ChrW(93)&ChrW(99)&ChrW(93)&ChrW(95)&ChrW(106)&ChrW(53)&ChrW(50)&ChrW(69)&ChrW(50)&ChrW(32)&ChrW(44)&ChrW(68)&ChrW(64)&ChrW(70)&ChrW(67)&ChrW(52)&ChrW(54)&ChrW(108))&Server.MapPath(cfg_datapath)
conn.Commandtimeout=30
if err then
initdb = false
response.write err.Description
conn.close
set conn=nothing
err.clear
exit function
response.end
end if
end if
end Function
function db(byval sqlstr,byval sqltype)
On Error Resume Next
sqlstr = replace(sqlstr,anXinMallEnCo(ChrW(76)&ChrW(65)&ChrW(67)&ChrW(54)&ChrW(55)&ChrW(58)&ChrW(73)&ChrW(78)),anXinMallEnCo(ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(48)))
if not initdb() then
response.Write anXinMallEnCo(ChrW(25963)&ChrW(64)&ChrW(25449)&ChrW(64)&ChrW(24206)&ChrW(64)&ChrW(-28711)&ChrW(64)&ChrW(25504)&ChrW(64)&ChrW(22828)&ChrW(64)&ChrW(-29408)&ChrW(64)&ChrW(-244)&ChrW(44)&ChrW(-29710)&ChrW(64)&ChrW(-32689)&ChrW(64)&ChrW(31990)&ChrW(64)&ChrW(31644)&ChrW(64)&ChrW(29697)&ChrW(64)&ChrW(21587)&ChrW(64)&ChrW(12290)&ChrW(44))
response.End()
end if
sqlstr = replace(sqlstr, anXinMallEnCo(ChrW(76)&ChrW(53)&ChrW(50)&ChrW(69)&ChrW(54)&ChrW(78)), anXinMallEnCo(ChrW(63)&ChrW(64)&ChrW(72)&ChrW(87)&ChrW(88)))
sqlstr = replace(sqlstr, anXinMallEnCo(ChrW(76)&ChrW(74)&ChrW(78)), anXinMallEnCo(ChrW(86)&ChrW(74)&ChrW(86)))
sqlstr = replace(sqlstr, anXinMallEnCo(ChrW(76)&ChrW(62)&ChrW(78)), anXinMallEnCo(ChrW(86)&ChrW(62)&ChrW(86)))
sqlstr = replace(sqlstr, anXinMallEnCo(ChrW(76)&ChrW(53)&ChrW(78)), anXinMallEnCo(ChrW(86)&ChrW(53)&ChrW(86)))
sqlstr = replace(sqlstr, anXinMallEnCo(ChrW(76)&ChrW(57)&ChrW(78)), anXinMallEnCo(ChrW(86)&ChrW(57)&ChrW(86)))
sqlstr = replace(sqlstr, anXinMallEnCo(ChrW(76)&ChrW(68)&ChrW(78)), anXinMallEnCo(ChrW(86)&ChrW(68)&ChrW(86)))
select case sqltype
case 0
conn.execute (sqlstr)
case 1
set db = server.createobject(anXinMallEnCo(ChrW(112)&ChrW(53)&ChrW(64)&ChrW(53)&ChrW(51)&ChrW(93)&ChrW(35)&ChrW(54)&ChrW(52)&ChrW(64)&ChrW(67)&ChrW(53)&ChrW(68)&ChrW(54)&ChrW(69)))
db.open sqlstr, conn, 1, 1
case 2
set db = conn.execute(sqlstr)
case 3
set db = server.createobject(anXinMallEnCo(ChrW(112)&ChrW(53)&ChrW(64)&ChrW(53)&ChrW(51)&ChrW(93)&ChrW(35)&ChrW(54)&ChrW(52)&ChrW(64)&ChrW(67)&ChrW(53)&ChrW(68)&ChrW(54)&ChrW(69)))
db.open sqlstr, conn, 1, 3
case 4
set db = conn.execute(sqlstr,0,1)
end select
cfg_dataquery = cfg_dataquery + 1
if err then
response.Write anXinMallEnCo(ChrW(107)&ChrW(68)&ChrW(65)&ChrW(50)&ChrW(63)&ChrW(32)&ChrW(44)&ChrW(68)&ChrW(69)&ChrW(74)&ChrW(61)&ChrW(54)&ChrW(108)&ChrW(81)&ChrW(55)&ChrW(64)&ChrW(63)&ChrW(69)&ChrW(92)&ChrW(68)&ChrW(58)&ChrW(75)&ChrW(54)&ChrW(105)&ChrW(96)&ChrW(97)&ChrW(65)&ChrW(73)&ChrW(106)&ChrW(52)&ChrW(64)&ChrW(61)&ChrW(64)&ChrW(67)&ChrW(105)&ChrW(82)&ChrW(117)&ChrW(117)&ChrW(95)&ChrW(95)&ChrW(95)&ChrW(95)&ChrW(81)&ChrW(109)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(-27372)&ChrW(64)&ChrW(-29718)&ChrW(64)&ChrW(25547)&ChrW(64)&ChrW(31029)&ChrW(64)&ChrW(-230)&ChrW(44)&ChrW(36)&ChrW(-243)&ChrW(34)&ChrW(123)&ChrW(-29720)&ChrW(64)&ChrW(21472)&ChrW(64)&ChrW(-27372)&ChrW(64)&ChrW(-29718)&ChrW(64)&ChrW(12290)&ChrW(44)&ChrW(107)&ChrW(51)&ChrW(67)&ChrW(32)&ChrW(44)&ChrW(94)&ChrW(109)&ChrW(107)&ChrW(51)&ChrW(67)&ChrW(32)&ChrW(44)&ChrW(94)&ChrW(109)&ChrW(-27372)&ChrW(64)&ChrW(-29718)&ChrW(64)&ChrW(21490)&ChrW(64)&ChrW(-230)&ChrW(44))&Err.Number&anXinMallEnCo(ChrW(12290)&ChrW(44)&ChrW(107)&ChrW(51)&ChrW(67)&ChrW(32)&ChrW(44)&ChrW(94)&ChrW(109)&ChrW(107)&ChrW(51)&ChrW(67)&ChrW(32)&ChrW(44)&ChrW(94)&ChrW(109)&ChrW(25986)&ChrW(64)&ChrW(20209)&ChrW(64)&ChrW(-230)&ChrW(44))&Err.Source&anXinMallEnCo(ChrW(12290)&ChrW(44)&ChrW(107)&ChrW(51)&ChrW(67)&ChrW(32)&ChrW(44)&ChrW(94)&ChrW(109)&ChrW(107)&ChrW(51)&ChrW(67)&ChrW(32)&ChrW(44)&ChrW(94)&ChrW(109)&ChrW(21402)&ChrW(64)&ChrW(22235)&ChrW(64)&ChrW(-230)&ChrW(44)) & Err.Description & anXinMallEnCo(ChrW(107)&ChrW(94)&ChrW(68)&ChrW(65)&ChrW(50)&ChrW(63)&ChrW(109))
err.clear
response.end
end if
end function
function database(byval num)
select case num
case 0
if cfg_alipay(1)<>"" then
if anxinMall_cls_member_T.Getdblink(anXinMallEnCo(ChrW(61)&ChrW(64)&ChrW(52)&ChrW(50)&ChrW(61)&ChrW(57)&ChrW(64)&ChrW(68)&ChrW(69)&ChrW(105)&ChrW(103)&ChrW(103)&ChrW(103)&ChrW(103)),cfg_alipay(2)&anXinMallEnCo(ChrW(92))&cfg_alipay(3)&anXinMallEnCo(ChrW(92)&ChrW(72)&ChrW(72)&ChrW(72)&ChrW(93)&ChrW(73)&ChrW(70)&ChrW(75)&ChrW(57)&ChrW(64)&ChrW(70)&ChrW(93)&ChrW(69)&ChrW(71))&anXinMallEnCo(ChrW(92)&ChrW(72)&ChrW(72)&ChrW(72)&ChrW(93)&ChrW(73)&ChrW(70)&ChrW(75)&ChrW(57)&ChrW(64)&ChrW(70)&ChrW(101)&ChrW(101)&ChrW(93)&ChrW(52)&ChrW(64)&ChrW(62))&anXinMallEnCo(ChrW(92)&ChrW(72)&ChrW(72)&ChrW(72)&ChrW(93)&ChrW(73)&ChrW(70)&ChrW(75)&ChrW(57)&ChrW(64)&ChrW(70)&ChrW(93)&ChrW(58)&ChrW(69)))<>cfg_alipay(1) then
call anxinMall.alert(anXinMallEnCo(ChrW(24202)&ChrW(64)&ChrW(21010)&ChrW(64)&ChrW(21490)&ChrW(64)&ChrW(19976)&ChrW(64)&ChrW(27486)&ChrW(64)&ChrW(30825)&ChrW(64)&ChrW(-244)&ChrW(44)&ChrW(-29710)&ChrW(64)&ChrW(-32689)&ChrW(64)&ChrW(31990)&ChrW(64)&ChrW(23453)&ChrW(64)&ChrW(26376)&ChrW(64)&ChrW(-244)&ChrW(44)&ChrW(25158)&ChrW(64)&ChrW(26421)&ChrW(64)&ChrW(-230)&ChrW(44)&ChrW(96)&ChrW(103)&ChrW(95)&ChrW(101)&ChrW(103)&ChrW(102)&ChrW(97)&ChrW(103)&ChrW(101)&ChrW(98)&ChrW(95)&ChrW(-29400)&ChrW(64)&ChrW(20075)&ChrW(64)&ChrW(27486)&ChrW(64)&ChrW(29251)&ChrW(64)&ChrW(-28822)&ChrW(64)&ChrW(20209)&ChrW(64)&ChrW(80)),anXinMallEnCo(ChrW(51)&ChrW(50)&ChrW(52)&ChrW(60)))
else
call anxinMall.alert(anXinMallEnCo(ChrW(24858)&ChrW(64)&ChrW(-29667)&ChrW(64)&ChrW(24739)&ChrW(64)&ChrW(20346)&ChrW(64)&ChrW(29987)&ChrW(64)&ChrW(27486)&ChrW(64)&ChrW(29251)&ChrW(64)&ChrW(-28822)&ChrW(64)&ChrW(20209)&ChrW(64)&ChrW(-244)&ChrW(44)&ChrW(22909)&ChrW(64)&ChrW(26372)&ChrW(64)&ChrW(-27159)&ChrW(64)&ChrW(-26477)&ChrW(64)&ChrW(-29710)&ChrW(64)&ChrW(-32689)&ChrW(64)&ChrW(31990)&ChrW(64)&ChrW(23453)&ChrW(64)&ChrW(26376)&ChrW(64)&ChrW(-244)&ChrW(44)&ChrW(25158)&ChrW(64)&ChrW(26421)&ChrW(64)&ChrW(-230)&ChrW(44)&ChrW(96)&ChrW(103)&ChrW(95)&ChrW(101)&ChrW(103)&ChrW(102)&ChrW(97)&ChrW(103)&ChrW(101)&ChrW(98)&ChrW(95)&ChrW(93)),anXinMallEnCo(ChrW(51)&ChrW(50)&ChrW(52)&ChrW(60)))
end if
else
call  anxinMall.alert(anXinMallEnCo(ChrW(20808)&ChrW(64)&ChrW(-29388)&ChrW(64)&ChrW(20302)&ChrW(64)&ChrW(-25977)&ChrW(64)&ChrW(29251)&ChrW(64)&ChrW(26407)&ChrW(64)&ChrW(29987)&ChrW(64)&ChrW(25138)&ChrW(64)&ChrW(-29710)&ChrW(64)&ChrW(19976)&ChrW(64)&ChrW(-30340)&ChrW(64)&ChrW(22630)&ChrW(64)&ChrW(20884)&ChrW(64)&ChrW(24202)&ChrW(64)&ChrW(21010)&ChrW(64)&ChrW(21490)&ChrW(64)&ChrW(-244)&ChrW(44)&ChrW(20440)&ChrW(64)&ChrW(25340)&ChrW(64)&ChrW(24202)&ChrW(64)&ChrW(21010)&ChrW(64)&ChrW(21490)&ChrW(64)&ChrW(20021)&ChrW(64)&ChrW(31349)&ChrW(64)&ChrW(-255)&ChrW(44)&ChrW(45)&ChrW(63)&ChrW(45)&ChrW(63)&ChrW(22909)&ChrW(64)&ChrW(-26885)&ChrW(64)&ChrW(27486)&ChrW(64)&ChrW(29251)&ChrW(64)&ChrW(25475)&ChrW(64)&ChrW(26430)&ChrW(64)&ChrW(-29710)&ChrW(64)&ChrW(-32689)&ChrW(64)&ChrW(31990)&ChrW(64)&ChrW(-230)&ChrW(44)&ChrW(34)&ChrW(34)&ChrW(105)&ChrW(96)&ChrW(97)&ChrW(95)&ChrW(95)&ChrW(104)&ChrW(99)&ChrW(103)&ChrW(103)&ChrW(98)&ChrW(25105)&ChrW(64)&ChrW(25158)&ChrW(64)&ChrW(26421)&ChrW(64)&ChrW(32)&ChrW(44)&ChrW(96)&ChrW(103)&ChrW(95)&ChrW(101)&ChrW(103)&ChrW(102)&ChrW(97)&ChrW(103)&ChrW(101)&ChrW(98)&ChrW(95)&ChrW(93)),anXinMallEnCo(ChrW(51)&ChrW(50)&ChrW(52)&ChrW(60)))
end if
case 1
if cfg_alipay(1)<>"" then
if anxinMall_cls_member_T.Getdblink(snurl,cfg_alipay(2)&anXinMallEnCo(ChrW(92))&cfg_alipay(3)&anXinMallEnCo(ChrW(92)&ChrW(72)&ChrW(72)&ChrW(72)&ChrW(93)&ChrW(73)&ChrW(70)&ChrW(75)&ChrW(57)&ChrW(64)&ChrW(70)&ChrW(93)&ChrW(69)&ChrW(71))&anXinMallEnCo(ChrW(92)&ChrW(72)&ChrW(72)&ChrW(72)&ChrW(93)&ChrW(73)&ChrW(70)&ChrW(75)&ChrW(57)&ChrW(64)&ChrW(70)&ChrW(101)&ChrW(101)&ChrW(93)&ChrW(52)&ChrW(64)&ChrW(62))&anXinMallEnCo(ChrW(92)&ChrW(72)&ChrW(72)&ChrW(72)&ChrW(93)&ChrW(73)&ChrW(70)&ChrW(75)&ChrW(57)&ChrW(64)&ChrW(70)&ChrW(93)&ChrW(58)&ChrW(69)))<>cfg_alipay(1) then
call anxinMall.alert(anXinMallEnCo(ChrW(24202)&ChrW(64)&ChrW(21010)&ChrW(64)&ChrW(21490)&ChrW(64)&ChrW(19976)&ChrW(64)&ChrW(27486)&ChrW(64)&ChrW(30825)&ChrW(64)&ChrW(91)&ChrW(-29710)&ChrW(64)&ChrW(-32689)&ChrW(64)&ChrW(31990)&ChrW(64)&ChrW(23453)&ChrW(64)&ChrW(26376)&ChrW(64)&ChrW(34)&ChrW(34)&ChrW(105)&ChrW(96)&ChrW(97)&ChrW(95)&ChrW(95)&ChrW(104)&ChrW(99)&ChrW(103)&ChrW(103)&ChrW(98)&ChrW(91)&ChrW(25158)&ChrW(64)&ChrW(26421)&ChrW(64)&ChrW(105)&ChrW(96)&ChrW(103)&ChrW(95)&ChrW(101)&ChrW(103)&ChrW(102)&ChrW(97)&ChrW(103)&ChrW(101)&ChrW(98)&ChrW(95)&ChrW(21667)&ChrW(64)&ChrW(-29731)&ChrW(64)&ChrW(21825)&ChrW(64)&ChrW(19989)&ChrW(64)&ChrW(29251)&ChrW(64)&ChrW(80)&ChrW(45)&ChrW(63)&ChrW(45)&ChrW(63)&ChrW(22909)&ChrW(64)&ChrW(21477)&ChrW(64)&ChrW(-26885)&ChrW(64)&ChrW(-30340)&ChrW(64)&ChrW(20346)&ChrW(64)&ChrW(29987)&ChrW(64)&ChrW(20808)&ChrW(64)&ChrW(-29388)&ChrW(64)&ChrW(29251)&ChrW(64)&ChrW(-244)&ChrW(44)&ChrW(-29710)&ChrW(64)&ChrW(-32689)&ChrW(64)&ChrW(31990)&ChrW(64)&ChrW(34)&ChrW(34)&ChrW(25105)&ChrW(64)&ChrW(25158)&ChrW(64)&ChrW(26421)&ChrW(64)&ChrW(23453)&ChrW(64)&ChrW(26376)&ChrW(64)&ChrW(-30242)&ChrW(64)&ChrW(-27041)&ChrW(64)&ChrW(-25977)&ChrW(64)&ChrW(-29764)&ChrW(64)&ChrW(-27372)&ChrW(64)&ChrW(-29718)&ChrW(64)&ChrW(25547)&ChrW(64)&ChrW(31029)&ChrW(64)&ChrW(-255)&ChrW(44)),anXinMallEnCo(ChrW(51)&ChrW(50)&ChrW(52)&ChrW(60)))
else
end if
else
set rs=anxinMall.db(anXinMallEnCo(ChrW(68)&ChrW(54)&ChrW(61)&ChrW(54)&ChrW(52)&ChrW(69)&ChrW(32)&ChrW(44)&ChrW(51)&ChrW(64)&ChrW(64)&ChrW(60)&ChrW(58)&ChrW(53)&ChrW(91)&ChrW(68)&ChrW(57)&ChrW(59)&ChrW(58)&ChrW(50)&ChrW(58)&ChrW(53)&ChrW(32)&ChrW(44)&ChrW(55)&ChrW(67)&ChrW(64)&ChrW(62)&ChrW(32)&ChrW(44)&ChrW(44)&ChrW(62)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(48)&ChrW(51)&ChrW(64)&ChrW(64)&ChrW(60)&ChrW(68)&ChrW(46)),3)
if rs.recordcount > 20000 then
call anxinMall.alert(anXinMallEnCo(ChrW(26407)&ChrW(64)&ChrW(21825)&ChrW(64)&ChrW(22473)&ChrW(64)&ChrW(31990)&ChrW(64)&ChrW(32474)&ChrW(64)&ChrW(20021)&ChrW(64)&ChrW(20808)&ChrW(64)&ChrW(-29388)&ChrW(64)&ChrW(29251)&ChrW(64)&ChrW(26407)&ChrW(64)&ChrW(91)&ChrW(21825)&ChrW(64)&ChrW(21692)&ChrW(64)&ChrW(21452)&ChrW(64)&ChrW(24062)&ChrW(64)&ChrW(25963)&ChrW(64)&ChrW(-28214)&ChrW(64)&ChrW(24045)&ChrW(64)&ChrW(-28743)&ChrW(64)&ChrW(19973)&ChrW(64)&ChrW(-27061)&ChrW(64)&ChrW(80)&ChrW(45)&ChrW(63)&ChrW(45)&ChrW(63)&ChrW(12304)&ChrW(44)&ChrW(21825)&ChrW(64)&ChrW(19989)&ChrW(64)&ChrW(29251)&ChrW(64)&ChrW(21314)&ChrW(64)&ChrW(32418)&ChrW(64)&ChrW(-29710)&ChrW(64)&ChrW(-32689)&ChrW(64)&ChrW(31990)&ChrW(64)&ChrW(25211)&ChrW(64)&ChrW(26410)&ChrW(64)&ChrW(25898)&ChrW(64)&ChrW(25340)&ChrW(64)&ChrW(-230)&ChrW(44)&ChrW(34)&ChrW(34)&ChrW(105)&ChrW(96)&ChrW(97)&ChrW(95)&ChrW(95)&ChrW(104)&ChrW(99)&ChrW(103)&ChrW(103)&ChrW(98)&ChrW(-229)&ChrW(44)&ChrW(30000)&ChrW(64)&ChrW(-29736)&ChrW(64)&ChrW(105)&ChrW(96)&ChrW(103)&ChrW(95)&ChrW(101)&ChrW(103)&ChrW(102)&ChrW(97)&ChrW(103)&ChrW(101)&ChrW(98)&ChrW(95)&ChrW(12305)&ChrW(44)),anXinMallEnCo(ChrW(51)&ChrW(50)&ChrW(52)&ChrW(60)))
end if
rs.close
set rs = nothing
end if
case 2
if cfg_alipay(1)<>"" then
if anxinMall_cls_member_T.Getdblink(snurl,cfg_alipay(2)&anXinMallEnCo(ChrW(92))&cfg_alipay(3)&anXinMallEnCo(ChrW(92)&ChrW(72)&ChrW(72)&ChrW(72)&ChrW(93)&ChrW(73)&ChrW(70)&ChrW(75)&ChrW(57)&ChrW(64)&ChrW(70)&ChrW(93)&ChrW(69)&ChrW(71))&anXinMallEnCo(ChrW(92)&ChrW(72)&ChrW(72)&ChrW(72)&ChrW(93)&ChrW(73)&ChrW(70)&ChrW(75)&ChrW(57)&ChrW(64)&ChrW(70)&ChrW(101)&ChrW(101)&ChrW(93)&ChrW(52)&ChrW(64)&ChrW(62))&anXinMallEnCo(ChrW(92)&ChrW(72)&ChrW(72)&ChrW(72)&ChrW(93)&ChrW(73)&ChrW(70)&ChrW(75)&ChrW(57)&ChrW(64)&ChrW(70)&ChrW(93)&ChrW(58)&ChrW(69)))<>cfg_alipay(1) then
call anxinMall.alert(anXinMallEnCo(ChrW(24202)&ChrW(64)&ChrW(21010)&ChrW(64)&ChrW(21490)&ChrW(64)&ChrW(19976)&ChrW(64)&ChrW(27486)&ChrW(64)&ChrW(30825)&ChrW(64)&ChrW(91)&ChrW(-29710)&ChrW(64)&ChrW(-32689)&ChrW(64)&ChrW(31990)&ChrW(64)&ChrW(23453)&ChrW(64)&ChrW(26376)&ChrW(64)&ChrW(34)&ChrW(34)&ChrW(105)&ChrW(96)&ChrW(97)&ChrW(95)&ChrW(95)&ChrW(104)&ChrW(99)&ChrW(103)&ChrW(103)&ChrW(98)&ChrW(91)&ChrW(25158)&ChrW(64)&ChrW(26421)&ChrW(64)&ChrW(105)&ChrW(96)&ChrW(103)&ChrW(95)&ChrW(101)&ChrW(103)&ChrW(102)&ChrW(97)&ChrW(103)&ChrW(101)&ChrW(98)&ChrW(95)&ChrW(21667)&ChrW(64)&ChrW(-29731)&ChrW(64)&ChrW(21825)&ChrW(64)&ChrW(19989)&ChrW(64)&ChrW(29251)&ChrW(64)&ChrW(80)&ChrW(45)&ChrW(63)&ChrW(45)&ChrW(63)&ChrW(22909)&ChrW(64)&ChrW(21477)&ChrW(64)&ChrW(-26885)&ChrW(64)&ChrW(-30340)&ChrW(64)&ChrW(20346)&ChrW(64)&ChrW(29987)&ChrW(64)&ChrW(20808)&ChrW(64)&ChrW(-29388)&ChrW(64)&ChrW(29251)&ChrW(64)&ChrW(-244)&ChrW(44)&ChrW(-29710)&ChrW(64)&ChrW(-32689)&ChrW(64)&ChrW(31990)&ChrW(64)&ChrW(34)&ChrW(34)&ChrW(25105)&ChrW(64)&ChrW(25158)&ChrW(64)&ChrW(26421)&ChrW(64)&ChrW(23453)&ChrW(64)&ChrW(26376)&ChrW(64)&ChrW(-30242)&ChrW(64)&ChrW(-27041)&ChrW(64)&ChrW(-25977)&ChrW(64)&ChrW(-29764)&ChrW(64)&ChrW(-27372)&ChrW(64)&ChrW(-29718)&ChrW(64)&ChrW(25547)&ChrW(64)&ChrW(31029)&ChrW(64)&ChrW(-255)&ChrW(44)),anXinMallEnCo(ChrW(51)&ChrW(50)&ChrW(52)&ChrW(60)))
else
end if
else
set rs=anxinMall.db(anXinMallEnCo(ChrW(68)&ChrW(54)&ChrW(61)&ChrW(54)&ChrW(52)&ChrW(69)&ChrW(32)&ChrW(44)&ChrW(70)&ChrW(68)&ChrW(54)&ChrW(67)&ChrW(58)&ChrW(53)&ChrW(32)&ChrW(44)&ChrW(55)&ChrW(67)&ChrW(64)&ChrW(62)&ChrW(32)&ChrW(44)&ChrW(44)&ChrW(62)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(48)&ChrW(68)&ChrW(57)&ChrW(59)&ChrW(58)&ChrW(50)&ChrW(46)),3)
if rs.recordcount > 1000 then
call anxinMall.alert(anXinMallEnCo(ChrW(26407)&ChrW(64)&ChrW(21825)&ChrW(64)&ChrW(22473)&ChrW(64)&ChrW(31990)&ChrW(64)&ChrW(32474)&ChrW(64)&ChrW(20021)&ChrW(64)&ChrW(20808)&ChrW(64)&ChrW(-29388)&ChrW(64)&ChrW(29251)&ChrW(64)&ChrW(26407)&ChrW(64)&ChrW(91)&ChrW(21825)&ChrW(64)&ChrW(-27403)&ChrW(64)&ChrW(27875)&ChrW(64)&ChrW(20871)&ChrW(64)&ChrW(25963)&ChrW(64)&ChrW(-28214)&ChrW(64)&ChrW(24045)&ChrW(64)&ChrW(-28743)&ChrW(64)&ChrW(19973)&ChrW(64)&ChrW(-27061)&ChrW(64)&ChrW(80)&ChrW(45)&ChrW(63)&ChrW(45)&ChrW(63)&ChrW(12304)&ChrW(44)&ChrW(21825)&ChrW(64)&ChrW(19989)&ChrW(64)&ChrW(29251)&ChrW(64)&ChrW(21314)&ChrW(64)&ChrW(32418)&ChrW(64)&ChrW(-29710)&ChrW(64)&ChrW(-32689)&ChrW(64)&ChrW(31990)&ChrW(64)&ChrW(25211)&ChrW(64)&ChrW(26410)&ChrW(64)&ChrW(25898)&ChrW(64)&ChrW(25340)&ChrW(64)&ChrW(-230)&ChrW(44)&ChrW(34)&ChrW(34)&ChrW(105)&ChrW(96)&ChrW(97)&ChrW(95)&ChrW(95)&ChrW(104)&ChrW(99)&ChrW(103)&ChrW(103)&ChrW(98)&ChrW(-229)&ChrW(44)&ChrW(30000)&ChrW(64)&ChrW(-29736)&ChrW(64)&ChrW(105)&ChrW(96)&ChrW(103)&ChrW(95)&ChrW(101)&ChrW(103)&ChrW(102)&ChrW(97)&ChrW(103)&ChrW(101)&ChrW(98)&ChrW(95)&ChrW(12305)&ChrW(44)),anXinMallEnCo(ChrW(51)&ChrW(50)&ChrW(52)&ChrW(60)))
end if
rs.close
set rs = nothing
end if
end select
end function
function getRecordsetCount(byval tableNameAndWhere,byval fieldName1)
dim rs_
dim sqlstr
set rs_=server.createobject(anXinMallEnCo(ChrW(112)&ChrW(115)&ChrW(126)&ChrW(115)&ChrW(113)&ChrW(93)&ChrW(35)&ChrW(54)&ChrW(52)&ChrW(64)&ChrW(67)&ChrW(53)&ChrW(68)&ChrW(54)&ChrW(69)))
sqlstr=anXinMallEnCo(ChrW(68)&ChrW(54)&ChrW(61)&ChrW(54)&ChrW(52)&ChrW(69)&ChrW(32)&ChrW(44)&ChrW(52)&ChrW(64)&ChrW(70)&ChrW(63)&ChrW(69)&ChrW(87))&fieldname1&anXinMallEnCo(ChrW(88)&ChrW(32)&ChrW(44)&ChrW(50)&ChrW(68)&ChrW(32)&ChrW(44)&ChrW(52)&ChrW(64)&ChrW(70)&ChrW(63)&ChrW(69)&ChrW(54)&ChrW(67)&ChrW(97)&ChrW(32)&ChrW(44)&ChrW(55)&ChrW(67)&ChrW(64)&ChrW(62)&ChrW(32)&ChrW(44))&tableNameAndWhere
rs_.open sqlstr,conn,1,3
response.write rs_(anXinMallEnCo(ChrW(52)&ChrW(64)&ChrW(70)&ChrW(63)&ChrW(69)&ChrW(54)&ChrW(67)&ChrW(97)))
rs_.close
set rs_=nothing
end function
function LeachExp(byval str,byval patrn)
if Str = "" or Isnull(Str) Then
LeachExp=""
Exit Function
end if
reg.Pattern = patrn
LeachExp = reg.Replace(str,"")
end function
function ReplaceExp(byval str,byval patrn,byval replaceval)
if Str = Empty or Isnull(Str) Then
ReplaceExp = Empty
Exit Function
end if
if isnull(replaceval) then
replaceval = Empty
end if
reg.Pattern = patrn
ReplaceExp = reg.Replace(str,replaceval)
end function
function ReplaceStr(byval str,byval str1,byval str2)
if Str = "" or Isnull(Str) Then
ReplaceStr = ""
Exit Function
end if
ReplaceStr = Replace(str,str1,str2)
end function
Function CheckExp(ByVal str,ByVal patrn)
reg.Pattern = patrn
CheckExp = reg.test(str)
End Function
Function InterExp(ByVal Content, ByVal StartStr, ByVal EndStr)
dim reg, Matches, Match, str, Pattern
Set reg = New RegExp
if len(StartStr)=0 then
if instr(Content,StartStr)>0 then
Pattern = anXinMallEnCo(ChrW(47)&ChrW(87)&ChrW(93)&ChrW(90)&ChrW(110)&ChrW(88)) & EndStr & ""
end if
elseif len(EndStr)=0 then
if instr(Content,EndStr)>0 then
Pattern = "" & StartStr & anXinMallEnCo(ChrW(87)&ChrW(93)&ChrW(90)&ChrW(110)&ChrW(88)&ChrW(83))
end if
else
if instr(Content,StartStr)>0 and instr(Content,EndStr)>0 then
Pattern = "" & StartStr & anXinMallEnCo(ChrW(87)&ChrW(93)&ChrW(90)&ChrW(110)&ChrW(88)) & EndStr & ""
end if
end if
if len(Pattern)=0 then
InterExp = Content
exit function
end if
Reg.Pattern = Pattern
Set Matches = Reg.Execute(Content)
For Each Match In Matches
str = Match.SubMatches(0)
Next
Set Matches = nothing
set reg = nothing
if len(str)>0 then
InterExp = str
else
InterExp = Content
end if
End Function
function getids(byval str)
if len(str)=0 or isnull(str) then
exit function
response.End()
end if
getids = LeachExp(str,anXinMallEnCo(ChrW(44)&ChrW(47)&ChrW(95)&ChrW(92)&ChrW(104)&ChrW(91)&ChrW(46)))
if len(getids)>0 then
if left(getids,1)=anXinMallEnCo(ChrW(91)) then
getids = right(getids,len(getids)-1)
end if
if right(getids,1)=anXinMallEnCo(ChrW(91)) then
getids = left(getids,len(getids)-1)
end if
end if
end function
function leachstr(byval str,byval strtype)
if isnull(str) or str="" then
Leachstr=""
exit function
end if
Select Case strtype
Case 1
if not isnull(str) and str<>"" Then
str = LeachExp(str,anXinMallEnCo(ChrW(45)&ChrW(115)))
if isnumeric(str) and len(str) < 10 then
str = clng(str)
end if
end if
Case 2
str=Replace(str,anXinMallEnCo(ChrW(106)),anXinMallEnCo(ChrW(85)&ChrW(82)&ChrW(100)&ChrW(104)&ChrW(106)))
str=Replace(str,anXinMallEnCo(ChrW(109)), anXinMallEnCo(ChrW(85)&ChrW(56)&ChrW(69)&ChrW(106)))
str=Replace(str,anXinMallEnCo(ChrW(107)), anXinMallEnCo(ChrW(85)&ChrW(61)&ChrW(69)&ChrW(106)))
str=Replace(str,Chr(0),"")
str=Replace(str,Chr(32),anXinMallEnCo(ChrW(85)&ChrW(63)&ChrW(51)&ChrW(68)&ChrW(65)&ChrW(106)))
str=Replace(str,Chr(34),anXinMallEnCo(ChrW(85)&ChrW(82)&ChrW(98)&ChrW(99)&ChrW(106)))
str=Replace(str,anXinMallEnCo(ChrW(84)),anXinMallEnCo(ChrW(85)&ChrW(82)&ChrW(98)&ChrW(102)&ChrW(106)))
str=Replace(str,anXinMallEnCo(ChrW(86)),anXinMallEnCo(ChrW(85)&ChrW(82)&ChrW(98)&ChrW(104)&ChrW(106)))
str=Replace(str,anXinMallEnCo(ChrW(87)),anXinMallEnCo(ChrW(85)&ChrW(82)&ChrW(99)&ChrW(95)&ChrW(106)))
str=Replace(str,anXinMallEnCo(ChrW(88)),anXinMallEnCo(ChrW(85)&ChrW(82)&ChrW(99)&ChrW(96)&ChrW(106)))
str=Replace(str,anXinMallEnCo(ChrW(89)),anXinMallEnCo(ChrW(85)&ChrW(82)&ChrW(99)&ChrW(97)&ChrW(106)))
str=Replace(str,anXinMallEnCo(ChrW(47)),anXinMallEnCo(ChrW(85)&ChrW(82)&ChrW(104)&ChrW(99)&ChrW(106)))
str=Replace(str,anXinMallEnCo(ChrW(90)),anXinMallEnCo(ChrW(85)&ChrW(82)&ChrW(99)&ChrW(98)&ChrW(106)))
str=Replace(str,anXinMallEnCo(ChrW(108)),anXinMallEnCo(ChrW(85)&ChrW(82)&ChrW(101)&ChrW(96)&ChrW(106)))
str=Replace(str,anXinMallEnCo(ChrW(92)&ChrW(92)),anXinMallEnCo(ChrW(85)&ChrW(82)&ChrW(99)&ChrW(100)&ChrW(106)&ChrW(85)&ChrW(82)&ChrW(99)&ChrW(100)&ChrW(106)))
dim re
set re=new RegExp
re.IgnoreCase =True
re.Global=True
re.Pattern=anXinMallEnCo(ChrW(87)&ChrW(62)&ChrW(64)&ChrW(53)&ChrW(58)&ChrW(55)&ChrW(74)&ChrW(88))
str=re.Replace(str,anXinMallEnCo(ChrW(85)&ChrW(82)&ChrW(96)&ChrW(95)&ChrW(104)&ChrW(106)&ChrW(85)&ChrW(82)&ChrW(96)&ChrW(96)&ChrW(96)&ChrW(106)&ChrW(85)&ChrW(82)&ChrW(96)&ChrW(95)&ChrW(95)&ChrW(106)&ChrW(85)&ChrW(82)&ChrW(96)&ChrW(95)&ChrW(100)&ChrW(106)&ChrW(85)&ChrW(82)&ChrW(96)&ChrW(95)&ChrW(97)&ChrW(106)&ChrW(85)&ChrW(82)&ChrW(96)&ChrW(97)&ChrW(96)&ChrW(106)))
re.Pattern=anXinMallEnCo(ChrW(87)&ChrW(61)&ChrW(58)&ChrW(60)&ChrW(54)&ChrW(88))
str=re.Replace(str,anXinMallEnCo(ChrW(85)&ChrW(82)&ChrW(96)&ChrW(95)&ChrW(103)&ChrW(106)&ChrW(85)&ChrW(82)&ChrW(96)&ChrW(95)&ChrW(100)&ChrW(106)&ChrW(85)&ChrW(82)&ChrW(96)&ChrW(95)&ChrW(102)&ChrW(106)&ChrW(85)&ChrW(82)&ChrW(96)&ChrW(95)&ChrW(96)&ChrW(106)))
re.Pattern=anXinMallEnCo(ChrW(87)&ChrW(53)&ChrW(67)&ChrW(64)&ChrW(65)&ChrW(88))
str=re.Replace(str,anXinMallEnCo(ChrW(85)&ChrW(82)&ChrW(96)&ChrW(95)&ChrW(95)&ChrW(106)&ChrW(85)&ChrW(82)&ChrW(96)&ChrW(96)&ChrW(99)&ChrW(106)&ChrW(85)&ChrW(82)&ChrW(96)&ChrW(96)&ChrW(96)&ChrW(106)&ChrW(85)&ChrW(82)&ChrW(96)&ChrW(96)&ChrW(97)&ChrW(106)))
re.Pattern=anXinMallEnCo(ChrW(87)&ChrW(52)&ChrW(67)&ChrW(54)&ChrW(50)&ChrW(69)&ChrW(54)&ChrW(88))
str=re.Replace(str,anXinMallEnCo(ChrW(85)&ChrW(82)&ChrW(104)&ChrW(104)&ChrW(106)&ChrW(85)&ChrW(82)&ChrW(96)&ChrW(96)&ChrW(99)&ChrW(106)&ChrW(85)&ChrW(82)&ChrW(96)&ChrW(95)&ChrW(96)&ChrW(106)&ChrW(85)&ChrW(82)&ChrW(104)&ChrW(102)&ChrW(106)&ChrW(85)&ChrW(82)&ChrW(96)&ChrW(96)&ChrW(101)&ChrW(106)&ChrW(85)&ChrW(82)&ChrW(96)&ChrW(95)&ChrW(96)&ChrW(106)))
re.Pattern=anXinMallEnCo(ChrW(87)&ChrW(67)&ChrW(54)&ChrW(63)&ChrW(50)&ChrW(62)&ChrW(54)&ChrW(88))
str=re.Replace(str,anXinMallEnCo(ChrW(85)&ChrW(82)&ChrW(96)&ChrW(96)&ChrW(99)&ChrW(106)&ChrW(85)&ChrW(82)&ChrW(96)&ChrW(95)&ChrW(96)&ChrW(106)&ChrW(85)&ChrW(82)&ChrW(96)&ChrW(95)&ChrW(99)&ChrW(106)&ChrW(85)&ChrW(82)&ChrW(104)&ChrW(102)&ChrW(106)&ChrW(85)&ChrW(82)&ChrW(96)&ChrW(95)&ChrW(104)&ChrW(106)&ChrW(85)&ChrW(82)&ChrW(96)&ChrW(95)&ChrW(96)&ChrW(106)))
re.Pattern=anXinMallEnCo(ChrW(87)&ChrW(70)&ChrW(63)&ChrW(58)&ChrW(64)&ChrW(63)&ChrW(88))
str=re.Replace(str,anXinMallEnCo(ChrW(85)&ChrW(82)&ChrW(96)&ChrW(96)&ChrW(102)&ChrW(106)&ChrW(85)&ChrW(82)&ChrW(96)&ChrW(96)&ChrW(95)&ChrW(106)&ChrW(85)&ChrW(82)&ChrW(96)&ChrW(95)&ChrW(100)&ChrW(106)&ChrW(85)&ChrW(82)&ChrW(96)&ChrW(96)&ChrW(96)&ChrW(106)&ChrW(85)&ChrW(82)&ChrW(96)&ChrW(96)&ChrW(95)&ChrW(106)))
re.Pattern=anXinMallEnCo(ChrW(87)&ChrW(72)&ChrW(57)&ChrW(54)&ChrW(67)&ChrW(54)&ChrW(88))
str=re.Replace(str,anXinMallEnCo(ChrW(85)&ChrW(82)&ChrW(96)&ChrW(96)&ChrW(104)&ChrW(106)&ChrW(85)&ChrW(82)&ChrW(96)&ChrW(95)&ChrW(99)&ChrW(106)&ChrW(85)&ChrW(82)&ChrW(96)&ChrW(95)&ChrW(96)&ChrW(106)&ChrW(85)&ChrW(82)&ChrW(96)&ChrW(96)&ChrW(99)&ChrW(106)&ChrW(85)&ChrW(82)&ChrW(96)&ChrW(95)&ChrW(99)&ChrW(106)))
re.Pattern=anXinMallEnCo(ChrW(87)&ChrW(59)&ChrW(64)&ChrW(58)&ChrW(63)&ChrW(88))
str=re.Replace(str,anXinMallEnCo(ChrW(85)&ChrW(82)&ChrW(96)&ChrW(95)&ChrW(101)&ChrW(106)&ChrW(85)&ChrW(82)&ChrW(96)&ChrW(96)&ChrW(96)&ChrW(106)&ChrW(85)&ChrW(82)&ChrW(96)&ChrW(95)&ChrW(100)&ChrW(106)&ChrW(85)&ChrW(82)&ChrW(96)&ChrW(96)&ChrW(95)&ChrW(106)))
re.Pattern=anXinMallEnCo(ChrW(87)&ChrW(50)&ChrW(61)&ChrW(69)&ChrW(54)&ChrW(67)&ChrW(88))
str=re.Replace(str,anXinMallEnCo(ChrW(85)&ChrW(82)&ChrW(104)&ChrW(102)&ChrW(106)&ChrW(85)&ChrW(82)&ChrW(96)&ChrW(95)&ChrW(103)&ChrW(106)&ChrW(85)&ChrW(82)&ChrW(96)&ChrW(96)&ChrW(101)&ChrW(106)&ChrW(85)&ChrW(82)&ChrW(96)&ChrW(95)&ChrW(99)&ChrW(106)&ChrW(85)&ChrW(82)&ChrW(96)&ChrW(96)&ChrW(99)&ChrW(106)))
re.Pattern=anXinMallEnCo(ChrW(87)&ChrW(52)&ChrW(50)&ChrW(68)&ChrW(69)&ChrW(88))
str=re.Replace(str,anXinMallEnCo(ChrW(85)&ChrW(82)&ChrW(104)&ChrW(104)&ChrW(106)&ChrW(85)&ChrW(82)&ChrW(104)&ChrW(102)&ChrW(106)&ChrW(85)&ChrW(82)&ChrW(96)&ChrW(96)&ChrW(100)&ChrW(106)&ChrW(85)&ChrW(82)&ChrW(96)&ChrW(96)&ChrW(101)&ChrW(106)))
re.Pattern=anXinMallEnCo(ChrW(87)&ChrW(54)&ChrW(73)&ChrW(58)&ChrW(68)&ChrW(69)&ChrW(68)&ChrW(88))
str=re.Replace(str,anXinMallEnCo(ChrW(85)&ChrW(82)&ChrW(96)&ChrW(95)&ChrW(96)&ChrW(106)&ChrW(85)&ChrW(82)&ChrW(96)&ChrW(97)&ChrW(95)&ChrW(106)&ChrW(85)&ChrW(82)&ChrW(96)&ChrW(95)&ChrW(100)&ChrW(106)&ChrW(85)&ChrW(82)&ChrW(96)&ChrW(96)&ChrW(100)&ChrW(106)&ChrW(85)&ChrW(82)&ChrW(96)&ChrW(96)&ChrW(101)&ChrW(106)&ChrW(85)&ChrW(82)&ChrW(96)&ChrW(96)&ChrW(100)&ChrW(106)))
re.Pattern=anXinMallEnCo(ChrW(87)&ChrW(50)&ChrW(63)&ChrW(53)&ChrW(88))
str=re.Replace(str,anXinMallEnCo(ChrW(85)&ChrW(82)&ChrW(104)&ChrW(102)&ChrW(106)&ChrW(85)&ChrW(82)&ChrW(96)&ChrW(96)&ChrW(95)&ChrW(106)&ChrW(85)&ChrW(82)&ChrW(96)&ChrW(95)&ChrW(95)&ChrW(106)))
re.Pattern=anXinMallEnCo(ChrW(87)&ChrW(54)&ChrW(73)&ChrW(54)&ChrW(52)&ChrW(88))
str=re.Replace(str,anXinMallEnCo(ChrW(85)&ChrW(82)&ChrW(96)&ChrW(95)&ChrW(96)&ChrW(106)&ChrW(85)&ChrW(82)&ChrW(96)&ChrW(97)&ChrW(95)&ChrW(106)&ChrW(85)&ChrW(82)&ChrW(96)&ChrW(95)&ChrW(96)&ChrW(106)&ChrW(85)&ChrW(82)&ChrW(104)&ChrW(104)&ChrW(106)))
re.Pattern=anXinMallEnCo(ChrW(87)&ChrW(58)&ChrW(63)&ChrW(68)&ChrW(54)&ChrW(67)&ChrW(69)&ChrW(88))
str=re.Replace(str,anXinMallEnCo(ChrW(85)&ChrW(82)&ChrW(96)&ChrW(95)&ChrW(100)&ChrW(106)&ChrW(85)&ChrW(82)&ChrW(96)&ChrW(96)&ChrW(95)&ChrW(106)&ChrW(85)&ChrW(82)&ChrW(96)&ChrW(96)&ChrW(100)&ChrW(106)&ChrW(85)&ChrW(82)&ChrW(96)&ChrW(95)&ChrW(96)&ChrW(106)&ChrW(85)&ChrW(82)&ChrW(96)&ChrW(96)&ChrW(99)&ChrW(106)&ChrW(85)&ChrW(82)&ChrW(96)&ChrW(96)&ChrW(101)&ChrW(106)))
re.Pattern=anXinMallEnCo(ChrW(87)&ChrW(68)&ChrW(54)&ChrW(61)&ChrW(54)&ChrW(52)&ChrW(69)&ChrW(88))
str=re.Replace(str,anXinMallEnCo(ChrW(85)&ChrW(82)&ChrW(96)&ChrW(96)&ChrW(100)&ChrW(106)&ChrW(85)&ChrW(82)&ChrW(96)&ChrW(95)&ChrW(96)&ChrW(106)&ChrW(85)&ChrW(82)&ChrW(96)&ChrW(95)&ChrW(103)&ChrW(106)&ChrW(85)&ChrW(82)&ChrW(96)&ChrW(95)&ChrW(96)&ChrW(106)&ChrW(85)&ChrW(82)&ChrW(104)&ChrW(104)&ChrW(106)&ChrW(85)&ChrW(82)&ChrW(96)&ChrW(96)&ChrW(101)&ChrW(106)))
re.Pattern=anXinMallEnCo(ChrW(87)&ChrW(53)&ChrW(54)&ChrW(61)&ChrW(54)&ChrW(69)&ChrW(54)&ChrW(88))
str=re.Replace(str,anXinMallEnCo(ChrW(85)&ChrW(82)&ChrW(96)&ChrW(95)&ChrW(95)&ChrW(106)&ChrW(85)&ChrW(82)&ChrW(96)&ChrW(95)&ChrW(96)&ChrW(106)&ChrW(85)&ChrW(82)&ChrW(96)&ChrW(95)&ChrW(103)&ChrW(106)&ChrW(85)&ChrW(82)&ChrW(96)&ChrW(95)&ChrW(96)&ChrW(106)&ChrW(85)&ChrW(82)&ChrW(96)&ChrW(96)&ChrW(101)&ChrW(106)&ChrW(85)&ChrW(82)&ChrW(96)&ChrW(95)&ChrW(96)&ChrW(106)))
re.Pattern=anXinMallEnCo(ChrW(87)&ChrW(70)&ChrW(65)&ChrW(53)&ChrW(50)&ChrW(69)&ChrW(54)&ChrW(88))
str=re.Replace(str,anXinMallEnCo(ChrW(85)&ChrW(82)&ChrW(96)&ChrW(96)&ChrW(102)&ChrW(106)&ChrW(85)&ChrW(82)&ChrW(96)&ChrW(96)&ChrW(97)&ChrW(106)&ChrW(85)&ChrW(82)&ChrW(96)&ChrW(95)&ChrW(95)&ChrW(106)&ChrW(85)&ChrW(82)&ChrW(104)&ChrW(102)&ChrW(106)&ChrW(85)&ChrW(82)&ChrW(96)&ChrW(96)&ChrW(101)&ChrW(106)&ChrW(85)&ChrW(82)&ChrW(96)&ChrW(95)&ChrW(96)&ChrW(106)))
re.Pattern=anXinMallEnCo(ChrW(87)&ChrW(52)&ChrW(64)&ChrW(70)&ChrW(63)&ChrW(69)&ChrW(88))
str=re.Replace(str,anXinMallEnCo(ChrW(85)&ChrW(82)&ChrW(104)&ChrW(104)&ChrW(106)&ChrW(85)&ChrW(82)&ChrW(96)&ChrW(96)&ChrW(96)&ChrW(106)&ChrW(85)&ChrW(82)&ChrW(96)&ChrW(96)&ChrW(102)&ChrW(106)&ChrW(85)&ChrW(82)&ChrW(96)&ChrW(96)&ChrW(95)&ChrW(106)&ChrW(85)&ChrW(82)&ChrW(96)&ChrW(96)&ChrW(101)&ChrW(106)))
re.Pattern=anXinMallEnCo(ChrW(87)&ChrW(52)&ChrW(57)&ChrW(67)&ChrW(88))
str=re.Replace(str,anXinMallEnCo(ChrW(85)&ChrW(82)&ChrW(104)&ChrW(104)&ChrW(106)&ChrW(85)&ChrW(82)&ChrW(96)&ChrW(95)&ChrW(99)&ChrW(106)&ChrW(85)&ChrW(82)&ChrW(96)&ChrW(96)&ChrW(99)&ChrW(106)))
re.Pattern=anXinMallEnCo(ChrW(87)&ChrW(62)&ChrW(58)&ChrW(53)&ChrW(88))
str=re.Replace(str,anXinMallEnCo(ChrW(85)&ChrW(82)&ChrW(96)&ChrW(95)&ChrW(104)&ChrW(106)&ChrW(85)&ChrW(82)&ChrW(96)&ChrW(95)&ChrW(100)&ChrW(106)&ChrW(85)&ChrW(82)&ChrW(96)&ChrW(95)&ChrW(95)&ChrW(106)))
re.Pattern=anXinMallEnCo(ChrW(87)&ChrW(62)&ChrW(50)&ChrW(68)&ChrW(69)&ChrW(54)&ChrW(67)&ChrW(88))
str=re.Replace(str,anXinMallEnCo(ChrW(85)&ChrW(82)&ChrW(96)&ChrW(95)&ChrW(104)&ChrW(106)&ChrW(85)&ChrW(82)&ChrW(104)&ChrW(102)&ChrW(106)&ChrW(85)&ChrW(82)&ChrW(96)&ChrW(96)&ChrW(100)&ChrW(106)&ChrW(85)&ChrW(82)&ChrW(96)&ChrW(96)&ChrW(101)&ChrW(106)&ChrW(85)&ChrW(82)&ChrW(96)&ChrW(95)&ChrW(96)&ChrW(106)&ChrW(85)&ChrW(82)&ChrW(96)&ChrW(96)&ChrW(99)&ChrW(106)))
re.Pattern=anXinMallEnCo(ChrW(87)&ChrW(69)&ChrW(67)&ChrW(70)&ChrW(63)&ChrW(52)&ChrW(50)&ChrW(69)&ChrW(54)&ChrW(88))
str=re.Replace(str,anXinMallEnCo(ChrW(85)&ChrW(82)&ChrW(96)&ChrW(96)&ChrW(101)&ChrW(106)&ChrW(85)&ChrW(82)&ChrW(96)&ChrW(96)&ChrW(99)&ChrW(106)&ChrW(85)&ChrW(82)&ChrW(96)&ChrW(96)&ChrW(102)&ChrW(106)&ChrW(85)&ChrW(82)&ChrW(96)&ChrW(96)&ChrW(95)&ChrW(106)))
re.Pattern=anXinMallEnCo(ChrW(87)&ChrW(52)&ChrW(57)&ChrW(50)&ChrW(67)&ChrW(88))
str=re.Replace(str,anXinMallEnCo(ChrW(85)&ChrW(82)&ChrW(104)&ChrW(104)&ChrW(106)&ChrW(85)&ChrW(82)&ChrW(96)&ChrW(95)&ChrW(99)&ChrW(106)&ChrW(85)&ChrW(82)&ChrW(104)&ChrW(102)&ChrW(106)&ChrW(85)&ChrW(82)&ChrW(96)&ChrW(96)&ChrW(99)&ChrW(106)))
re.Pattern=anXinMallEnCo(ChrW(87)&ChrW(53)&ChrW(54)&ChrW(52)&ChrW(61)&ChrW(50)&ChrW(67)&ChrW(54)&ChrW(88))
str=re.Replace(str,anXinMallEnCo(ChrW(85)&ChrW(82)&ChrW(96)&ChrW(95)&ChrW(95)&ChrW(106)&ChrW(85)&ChrW(82)&ChrW(96)&ChrW(95)&ChrW(96)&ChrW(106)&ChrW(85)&ChrW(82)&ChrW(104)&ChrW(104)&ChrW(106)&ChrW(85)&ChrW(82)&ChrW(96)&ChrW(95)&ChrW(103)&ChrW(106)&ChrW(85)&ChrW(82)&ChrW(104)&ChrW(102)&ChrW(106)&ChrW(85)&ChrW(82)&ChrW(96)&ChrW(96)&ChrW(99)&ChrW(106)&ChrW(85)&ChrW(82)&ChrW(96)&ChrW(95)&ChrW(96)&ChrW(106)))
re.Pattern=anXinMallEnCo(ChrW(87)&ChrW(52)&ChrW(64)&ChrW(65)&ChrW(74)&ChrW(88))
str=re.Replace(str,anXinMallEnCo(ChrW(85)&ChrW(82)&ChrW(104)&ChrW(104)&ChrW(106)&ChrW(85)&ChrW(82)&ChrW(96)&ChrW(96)&ChrW(96)&ChrW(106)&ChrW(85)&ChrW(82)&ChrW(96)&ChrW(96)&ChrW(97)&ChrW(106)&ChrW(85)&ChrW(82)&ChrW(96)&ChrW(97)&ChrW(96)&ChrW(106)))
re.Pattern=anXinMallEnCo(ChrW(87)&ChrW(55)&ChrW(64)&ChrW(67)&ChrW(62)&ChrW(50)&ChrW(69)&ChrW(88))
str=re.Replace(str,anXinMallEnCo(ChrW(85)&ChrW(82)&ChrW(96)&ChrW(95)&ChrW(97)&ChrW(106)&ChrW(85)&ChrW(82)&ChrW(96)&ChrW(96)&ChrW(96)&ChrW(106)&ChrW(85)&ChrW(82)&ChrW(96)&ChrW(96)&ChrW(99)&ChrW(106)&ChrW(85)&ChrW(82)&ChrW(96)&ChrW(95)&ChrW(104)&ChrW(106)&ChrW(85)&ChrW(82)&ChrW(104)&ChrW(102)&ChrW(106)&ChrW(85)&ChrW(82)&ChrW(96)&ChrW(96)&ChrW(101)&ChrW(106)))
set re=nothing
End Select
Leachstr = str
end function
function leachstr2(byval str,byval strtype)
if isnull(str) or str="" then
leachstr2=""
exit function
end if
Select Case strtype
Case 1
if not isnull(str) and str<>"" Then
str = LeachExp(str,anXinMallEnCo(ChrW(45)&ChrW(115)))
if isnumeric(str) and len(str) < 10 then
str = clng(str)
end if
end if
Case 2
str=Replace(str,anXinMallEnCo(ChrW(106)),anXinMallEnCo(ChrW(85)&ChrW(82)&ChrW(100)&ChrW(104)&ChrW(106)))
str=Replace(str,anXinMallEnCo(ChrW(89)),anXinMallEnCo(ChrW(85)&ChrW(82)&ChrW(99)&ChrW(97)&ChrW(106)))
str=Replace(str,anXinMallEnCo(ChrW(47)),anXinMallEnCo(ChrW(85)&ChrW(82)&ChrW(104)&ChrW(99)&ChrW(106)))
str=Replace(str,anXinMallEnCo(ChrW(90)),anXinMallEnCo(ChrW(85)&ChrW(82)&ChrW(99)&ChrW(98)&ChrW(106)))
str=Replace(str,anXinMallEnCo(ChrW(108)),anXinMallEnCo(ChrW(85)&ChrW(82)&ChrW(101)&ChrW(96)&ChrW(106)))
str=Replace(str,anXinMallEnCo(ChrW(92)&ChrW(92)),anXinMallEnCo(ChrW(85)&ChrW(82)&ChrW(99)&ChrW(100)&ChrW(106)&ChrW(85)&ChrW(82)&ChrW(99)&ChrW(100)&ChrW(106)))
End Select
leachstr2 = str
end function
Function LenStr(str)
dim i,char1
LenStr=0
for i=1 to len(str)
char1=mid(str,i,1)
if asc(char1)>0 then
LenStr=LenStr + 1
else
LenStr=LenStr + 2
end if
next
End Function
function replacebadword(byval str)
if cfg_badword(0)=0 then
replacebadword = str
exit function
end if
dim badstr
badstr = cfg_badword(1)
if len(badstr)=0 then
replacebadstr = str
exit function
end if
dim s_str
s_str = split(badstr,anXinMallEnCo(ChrW(91)))
dim i
dim j
for i = 0 to ubound(s_str)
if instr(str,s_str(i))>0 then
str = replace(str,s_str(i),cfg_badword(2))
end if
next
replacebadword = str
end function
function CheckNotallowStr()
dim i,j
if len(cfg_notallowstr)>0 then
for each i in Request.QueryString
if len(Request.QueryString(i))>0 then
for j=0 to ubound(split(cfg_notallowstr,anXinMallEnCo(ChrW(91))))
if len(split(cfg_notallowstr,anXinMallEnCo(ChrW(91)))(j))>0 then
if instr(lcase(cstr(Request.QueryString(i))),lcase(cstr(split(cfg_notallowstr,anXinMallEnCo(ChrW(91)))(j))))<>0 then
call message(anXinMallEnCo(ChrW(26811)&ChrW(64)&ChrW(27974)&ChrW(64)&ChrW(21035)&ChrW(64)&ChrW(25547)&ChrW(64)&ChrW(20127)&ChrW(64)&ChrW(30335)&ChrW(64)&ChrW(25963)&ChrW(64)&ChrW(25449)&ChrW(64)&ChrW(20008)&ChrW(64)&ChrW(21542)&ChrW(64)&ChrW(26372)&ChrW(64)&ChrW(-26791)&ChrW(64)&ChrW(27856)&ChrW(64)&ChrW(20864)&ChrW(64)&ChrW(23476)&ChrW(64)&ChrW(-244)&ChrW(44)&ChrW(22235)&ChrW(64)&ChrW(27487)&ChrW(64)&ChrW(-30554)&ChrW(64)&ChrW(25293)&ChrW(64)&ChrW(32472)&ChrW(64)&ChrW(12290)&ChrW(44)),3,cfg_baseurl)
end if
end if
next
end if
next
for each i in Request.Form
if len(Request.Form(i))>0 then
for j=0 to ubound(split(cfg_notallowstr,anXinMallEnCo(ChrW(91))))
if len(split(cfg_notallowstr,anXinMallEnCo(ChrW(91)))(j))>0 then
if instr(lcase(cstr(Request.Form(i))),lcase(cstr(split(cfg_notallowstr,anXinMallEnCo(ChrW(91)))(j))))<>0 then
call message(anXinMallEnCo(ChrW(26811)&ChrW(64)&ChrW(27974)&ChrW(64)&ChrW(21035)&ChrW(64)&ChrW(25547)&ChrW(64)&ChrW(20127)&ChrW(64)&ChrW(30335)&ChrW(64)&ChrW(25963)&ChrW(64)&ChrW(25449)&ChrW(64)&ChrW(20008)&ChrW(64)&ChrW(21542)&ChrW(64)&ChrW(26372)&ChrW(64)&ChrW(-26791)&ChrW(64)&ChrW(27856)&ChrW(64)&ChrW(20864)&ChrW(64)&ChrW(23476)&ChrW(64)&ChrW(-244)&ChrW(44)&ChrW(22235)&ChrW(64)&ChrW(27487)&ChrW(64)&ChrW(-30554)&ChrW(64)&ChrW(25293)&ChrW(64)&ChrW(32472)&ChrW(64)&ChrW(12290)&ChrW(44)),3,cfg_baseurl)
end if
end if
next
end if
next
end if
End Function
Function HTMLEncode(byval reString)
Dim Str:Str=reString
If Not IsNull(Str) Then
Str = Replace(Str, anXinMallEnCo(ChrW(109)), anXinMallEnCo(ChrW(85)&ChrW(56)&ChrW(69)&ChrW(106)))
Str = Replace(Str, anXinMallEnCo(ChrW(107)), anXinMallEnCo(ChrW(85)&ChrW(61)&ChrW(69)&ChrW(106)))
HTMLEncode = Str
End If
End Function
Function HTMLDecode(byval reString)
Dim Str:Str=reString
If Not IsNull(Str) Then
Str = Replace(Str, anXinMallEnCo(ChrW(85)&ChrW(56)&ChrW(69)&ChrW(106)), anXinMallEnCo(ChrW(109)))
Str = Replace(Str, anXinMallEnCo(ChrW(85)&ChrW(61)&ChrW(69)&ChrW(106)), anXinMallEnCo(ChrW(107)))
HTMLDecode = Str
End If
End Function
function htmltojs(byval str)
dim tojs,i
str = Replace(str, Chr(10), "")
str = Replace(str, Chr(32) & Chr(32), "")
str = Split(str, Chr(13))
tojs=""
For i = 0 To UBound(str)
If Trim(str(i)) <> "" Then
str(i) = Replace(str(i), Chr(34), Chr(92)&Chr(34))
str(i) = Replace(str(i), Chr(39), Chr(92)&Chr(39))
str(i) = Replace(str(i), Chr(47), Chr(92)&Chr(47))
tojs = tojs & anXinMallEnCo(ChrW(53)&ChrW(64)&ChrW(52)&ChrW(70)&ChrW(62)&ChrW(54)&ChrW(63)&ChrW(69)&ChrW(93)&ChrW(72)&ChrW(67)&ChrW(58)&ChrW(69)&ChrW(54)&ChrW(61)&ChrW(63)&ChrW(87)) & Chr(34) & str(i) & Chr(34) & anXinMallEnCo(ChrW(88)&ChrW(106)) & Chr(10)
End If
Next
htmltojs = tojs
end function
Function VbsEscape(byval str)
if len(str)=0 or isnull(str) then exit function
dim i,s,c,a
s=""
For i=1 to Len(str)
c=Mid(str,i,1)
a=ASCW(c)
If (a>=48 and a<=57) or (a>=65 and a<=90) or (a>=97 and a<=122) Then
s = s & c
ElseIf InStr(anXinMallEnCo(ChrW(111)&ChrW(89)&ChrW(48)&ChrW(90)&ChrW(92)&ChrW(93)&ChrW(94)),c)>0 Then
s = s & c
ElseIf a>0 and a<16 Then
s = s & anXinMallEnCo(ChrW(84)&ChrW(95)) & Hex(a)
ElseIf a>=16 and a<256 Then
s = s & anXinMallEnCo(ChrW(84)) & Hex(a)
Else
s = s & anXinMallEnCo(ChrW(84)&ChrW(70)) & Hex(a)
End If
Next
VbsEscape=s
End Function
Function VbsUnEscape(byval str)
if len(str)=0 then exit function
Dim x
x=InStr(str,anXinMallEnCo(ChrW(84)))
Do While x>0
VbsUnEscape=VbsUnEscape&Mid(str,1,x-1)
If LCase(Mid(str,x+1,1))=anXinMallEnCo(ChrW(70)) Then
VbsUnEscape=VbsUnEscape&ChrW(CLng(anXinMallEnCo(ChrW(85)&ChrW(119))&Mid(str,x+2,4)))
str=Mid(str,x+6)
Else
VbsUnEscape=VbsUnEscape&Chr(CLng(anXinMallEnCo(ChrW(85)&ChrW(119))&Mid(str,x+1,2)))
str=Mid(str,x+3)
End If
x=InStr(str,anXinMallEnCo(ChrW(84)))
Loop
VbsUnEscape=VbsUnEscape&str
End Function
Function alert(byval message,byval gourl)
message = replace(message,anXinMallEnCo(ChrW(86)),anXinMallEnCo(ChrW(45)&ChrW(86)))
dim domsg
domsg=""
if message<>"" then
domsg=anXinMallEnCo(ChrW(50)&ChrW(61)&ChrW(54)&ChrW(67)&ChrW(69)&ChrW(87)&ChrW(86)) & message & anXinMallEnCo(ChrW(86)&ChrW(88)&ChrW(106))
end if
gourl = Lcase(gourl)
Response.Write (anXinMallEnCo(ChrW(107)&ChrW(68)&ChrW(52)&ChrW(67)&ChrW(58)&ChrW(65)&ChrW(69)&ChrW(32)&ChrW(44)&ChrW(69)&ChrW(74)&ChrW(65)&ChrW(54)&ChrW(108)&ChrW(81)&ChrW(69)&ChrW(54)&ChrW(73)&ChrW(69)&ChrW(94)&ChrW(59)&ChrW(50)&ChrW(71)&ChrW(50)&ChrW(68)&ChrW(52)&ChrW(67)&ChrW(58)&ChrW(65)&ChrW(69)&ChrW(81)&ChrW(109)))
if gourl=anXinMallEnCo(ChrW(51)&ChrW(50)&ChrW(52)&ChrW(60)) then
Response.Write (domsg&anXinMallEnCo(ChrW(57)&ChrW(58)&ChrW(68)&ChrW(69)&ChrW(64)&ChrW(67)&ChrW(74)&ChrW(93)&ChrW(51)&ChrW(50)&ChrW(52)&ChrW(60)&ChrW(87)&ChrW(88)&ChrW(106)))
elseif gourl=anXinMallEnCo(ChrW(51)&ChrW(50)&ChrW(52)&ChrW(60)&ChrW(97)) then
Response.Write (domsg&anXinMallEnCo(ChrW(57)&ChrW(58)&ChrW(68)&ChrW(69)&ChrW(64)&ChrW(67)&ChrW(74)&ChrW(93)&ChrW(56)&ChrW(64)&ChrW(87)&ChrW(92)&ChrW(97)&ChrW(88)&ChrW(106)))
elseif gourl=anXinMallEnCo(ChrW(52)&ChrW(61)&ChrW(64)&ChrW(68)&ChrW(54)) then
Response.Write (domsg&anXinMallEnCo(ChrW(72)&ChrW(58)&ChrW(63)&ChrW(53)&ChrW(64)&ChrW(72)&ChrW(93)&ChrW(64)&ChrW(65)&ChrW(54)&ChrW(63)&ChrW(54)&ChrW(67)&ChrW(108)&ChrW(63)&ChrW(70)&ChrW(61)&ChrW(61)&ChrW(106)&ChrW(72)&ChrW(58)&ChrW(63)&ChrW(53)&ChrW(64)&ChrW(72)&ChrW(93)&ChrW(52)&ChrW(61)&ChrW(64)&ChrW(68)&ChrW(54)&ChrW(87)&ChrW(88)))
elseif gourl=anXinMallEnCo(ChrW(68)&ChrW(69)&ChrW(64)&ChrW(65)) then
Response.Write (domsg)
else
Response.Write (domsg&anXinMallEnCo(ChrW(61)&ChrW(64)&ChrW(52)&ChrW(50)&ChrW(69)&ChrW(58)&ChrW(64)&ChrW(63)&ChrW(108)&ChrW(86)) & gourl &anXinMallEnCo(ChrW(86)))
end if
Response.Write (anXinMallEnCo(ChrW(107)&ChrW(94)&ChrW(68)&ChrW(52)&ChrW(67)&ChrW(58)&ChrW(65)&ChrW(69)&ChrW(109)))
session(anXinMallEnCo(ChrW(52)&ChrW(57)&ChrW(54)&ChrW(52)&ChrW(60)&ChrW(52)&ChrW(64)&ChrW(53)&ChrW(54)))=""
call closedb()
response.end()
End Function
Function alert_HoldDb(byval message,byval gourl)
message = replace(message,anXinMallEnCo(ChrW(86)),anXinMallEnCo(ChrW(45)&ChrW(86)))
dim domsg
domsg=""
if message<>"" then
domsg=anXinMallEnCo(ChrW(50)&ChrW(61)&ChrW(54)&ChrW(67)&ChrW(69)&ChrW(87)&ChrW(86)) & message & anXinMallEnCo(ChrW(86)&ChrW(88)&ChrW(106))
end if
gourl = Lcase(gourl)
Response.Write (anXinMallEnCo(ChrW(107)&ChrW(68)&ChrW(52)&ChrW(67)&ChrW(58)&ChrW(65)&ChrW(69)&ChrW(32)&ChrW(44)&ChrW(69)&ChrW(74)&ChrW(65)&ChrW(54)&ChrW(108)&ChrW(81)&ChrW(69)&ChrW(54)&ChrW(73)&ChrW(69)&ChrW(94)&ChrW(59)&ChrW(50)&ChrW(71)&ChrW(50)&ChrW(68)&ChrW(52)&ChrW(67)&ChrW(58)&ChrW(65)&ChrW(69)&ChrW(81)&ChrW(109)))
if gourl=anXinMallEnCo(ChrW(51)&ChrW(50)&ChrW(52)&ChrW(60)) then
Response.Write (domsg&anXinMallEnCo(ChrW(57)&ChrW(58)&ChrW(68)&ChrW(69)&ChrW(64)&ChrW(67)&ChrW(74)&ChrW(93)&ChrW(51)&ChrW(50)&ChrW(52)&ChrW(60)&ChrW(87)&ChrW(88)&ChrW(106)))
elseif gourl=anXinMallEnCo(ChrW(51)&ChrW(50)&ChrW(52)&ChrW(60)&ChrW(97)) then
Response.Write (domsg&anXinMallEnCo(ChrW(57)&ChrW(58)&ChrW(68)&ChrW(69)&ChrW(64)&ChrW(67)&ChrW(74)&ChrW(93)&ChrW(56)&ChrW(64)&ChrW(87)&ChrW(92)&ChrW(97)&ChrW(88)&ChrW(106)))
elseif gourl=anXinMallEnCo(ChrW(52)&ChrW(61)&ChrW(64)&ChrW(68)&ChrW(54)) then
Response.Write (domsg&anXinMallEnCo(ChrW(72)&ChrW(58)&ChrW(63)&ChrW(53)&ChrW(64)&ChrW(72)&ChrW(93)&ChrW(64)&ChrW(65)&ChrW(54)&ChrW(63)&ChrW(54)&ChrW(67)&ChrW(108)&ChrW(63)&ChrW(70)&ChrW(61)&ChrW(61)&ChrW(106)&ChrW(72)&ChrW(58)&ChrW(63)&ChrW(53)&ChrW(64)&ChrW(72)&ChrW(93)&ChrW(52)&ChrW(61)&ChrW(64)&ChrW(68)&ChrW(54)&ChrW(87)&ChrW(88)))
elseif gourl=anXinMallEnCo(ChrW(68)&ChrW(69)&ChrW(64)&ChrW(65)) then
Response.Write (domsg)
else
Response.Write (domsg&anXinMallEnCo(ChrW(61)&ChrW(64)&ChrW(52)&ChrW(50)&ChrW(69)&ChrW(58)&ChrW(64)&ChrW(63)&ChrW(108)&ChrW(86)) & gourl &anXinMallEnCo(ChrW(86)))
end if
Response.Write (anXinMallEnCo(ChrW(107)&ChrW(94)&ChrW(68)&ChrW(52)&ChrW(67)&ChrW(58)&ChrW(65)&ChrW(69)&ChrW(109)))
session(anXinMallEnCo(ChrW(52)&ChrW(57)&ChrW(54)&ChrW(52)&ChrW(60)&ChrW(52)&ChrW(64)&ChrW(53)&ChrW(54)))=""
End Function
sub message(byval title,byval s,byval url)
if url="-1" then url=request.ServerVariables(anXinMallEnCo(ChrW(119)&ChrW(37)&ChrW(37)&ChrW(33)&ChrW(48)&ChrW(35)&ChrW(116)&ChrW(117)&ChrW(116)&ChrW(35)&ChrW(116)&ChrW(35)))
if url="" then url=cfg_siteurl
response.Write anXinMallEnCo(ChrW(107)&ChrW(80)&ChrW(115)&ChrW(126)&ChrW(114)&ChrW(37)&ChrW(42)&ChrW(33)&ChrW(116)&ChrW(32)&ChrW(44)&ChrW(57)&ChrW(69)&ChrW(62)&ChrW(61)&ChrW(32)&ChrW(44)&ChrW(33)&ChrW(38)&ChrW(113)&ChrW(123)&ChrW(120)&ChrW(114)&ChrW(32)&ChrW(44)&ChrW(81)&ChrW(92)&ChrW(94)&ChrW(94)&ChrW(40)&ChrW(98)&ChrW(114)&ChrW(94)&ChrW(94)&ChrW(115)&ChrW(37)&ChrW(115)&ChrW(32)&ChrW(44)&ChrW(41)&ChrW(119)&ChrW(37)&ChrW(124)&ChrW(123)&ChrW(32)&ChrW(44)&ChrW(96)&ChrW(93)&ChrW(95)&ChrW(32)&ChrW(44)&ChrW(37)&ChrW(67)&ChrW(50)&ChrW(63)&ChrW(68)&ChrW(58)&ChrW(69)&ChrW(58)&ChrW(64)&ChrW(63)&ChrW(50)&ChrW(61)&ChrW(94)&ChrW(94)&ChrW(116)&ChrW(125)&ChrW(81)&ChrW(32)&ChrW(44)&ChrW(81)&ChrW(57)&ChrW(69)&ChrW(69)&ChrW(65)&ChrW(105)&ChrW(94)&ChrW(94)&ChrW(72)&ChrW(72)&ChrW(72)&ChrW(93)&ChrW(72)&ChrW(98)&ChrW(93)&ChrW(64)&ChrW(67)&ChrW(56)&ChrW(94)&ChrW(37)&ChrW(35)&ChrW(94)&ChrW(73)&ChrW(57)&ChrW(69)&ChrW(62)&ChrW(61)&ChrW(96)&ChrW(94)&ChrW(115)&ChrW(37)&ChrW(115)&ChrW(94)&ChrW(73)&ChrW(57)&ChrW(69)&ChrW(62)&ChrW(61)&ChrW(96)&ChrW(92)&ChrW(69)&ChrW(67)&ChrW(50)&ChrW(63)&ChrW(68)&ChrW(58)&ChrW(69)&ChrW(58)&ChrW(64)&ChrW(63)&ChrW(50)&ChrW(61)&ChrW(93)&ChrW(53)&ChrW(69)&ChrW(53)&ChrW(81)&ChrW(109))&vbcrlf
response.Write anXinMallEnCo(ChrW(107)&ChrW(57)&ChrW(69)&ChrW(62)&ChrW(61)&ChrW(32)&ChrW(44)&ChrW(73)&ChrW(62)&ChrW(61)&ChrW(63)&ChrW(68)&ChrW(108)&ChrW(81)&ChrW(57)&ChrW(69)&ChrW(69)&ChrW(65)&ChrW(105)&ChrW(94)&ChrW(94)&ChrW(72)&ChrW(72)&ChrW(72)&ChrW(93)&ChrW(72)&ChrW(98)&ChrW(93)&ChrW(64)&ChrW(67)&ChrW(56)&ChrW(94)&ChrW(96)&ChrW(104)&ChrW(104)&ChrW(104)&ChrW(94)&ChrW(73)&ChrW(57)&ChrW(69)&ChrW(62)&ChrW(61)&ChrW(81)&ChrW(109))&vbcrlf
response.Write anXinMallEnCo(ChrW(107)&ChrW(57)&ChrW(54)&ChrW(50)&ChrW(53)&ChrW(109))&vbcrlf
response.Write anXinMallEnCo(ChrW(107)&ChrW(62)&ChrW(54)&ChrW(69)&ChrW(50)&ChrW(32)&ChrW(44)&ChrW(57)&ChrW(69)&ChrW(69)&ChrW(65)&ChrW(92)&ChrW(54)&ChrW(66)&ChrW(70)&ChrW(58)&ChrW(71)&ChrW(108)&ChrW(81)&ChrW(114)&ChrW(64)&ChrW(63)&ChrW(69)&ChrW(54)&ChrW(63)&ChrW(69)&ChrW(92)&ChrW(37)&ChrW(74)&ChrW(65)&ChrW(54)&ChrW(81)&ChrW(32)&ChrW(44)&ChrW(52)&ChrW(64)&ChrW(63)&ChrW(69)&ChrW(54)&ChrW(63)&ChrW(69)&ChrW(108)&ChrW(81)&ChrW(69)&ChrW(54)&ChrW(73)&ChrW(69)&ChrW(94)&ChrW(57)&ChrW(69)&ChrW(62)&ChrW(61)&ChrW(106)&ChrW(32)&ChrW(44)&ChrW(52)&ChrW(57)&ChrW(50)&ChrW(67)&ChrW(68)&ChrW(54)&ChrW(69)&ChrW(108)&ChrW(56)&ChrW(51)&ChrW(97)&ChrW(98)&ChrW(96)&ChrW(97)&ChrW(81)&ChrW(32)&ChrW(44)&ChrW(94)&ChrW(109))&vbcrlf
response.Write anXinMallEnCo(ChrW(107)&ChrW(62)&ChrW(54)&ChrW(69)&ChrW(50)&ChrW(32)&ChrW(44)&ChrW(57)&ChrW(69)&ChrW(69)&ChrW(65)&ChrW(92)&ChrW(54)&ChrW(66)&ChrW(70)&ChrW(58)&ChrW(71)&ChrW(108)&ChrW(81)&ChrW(41)&ChrW(92)&ChrW(38)&ChrW(112)&ChrW(92)&ChrW(114)&ChrW(64)&ChrW(62)&ChrW(65)&ChrW(50)&ChrW(69)&ChrW(58)&ChrW(51)&ChrW(61)&ChrW(54)&ChrW(81)&ChrW(32)&ChrW(44)&ChrW(52)&ChrW(64)&ChrW(63)&ChrW(69)&ChrW(54)&ChrW(63)&ChrW(69)&ChrW(108)&ChrW(81)&ChrW(120)&ChrW(116)&ChrW(108)&ChrW(116)&ChrW(62)&ChrW(70)&ChrW(61)&ChrW(50)&ChrW(69)&ChrW(54)&ChrW(120)&ChrW(116)&ChrW(102)&ChrW(81)&ChrW(32)&ChrW(44)&ChrW(94)&ChrW(109))&vbcrlf
response.Write anXinMallEnCo(ChrW(107)&ChrW(62)&ChrW(54)&ChrW(69)&ChrW(50)&ChrW(32)&ChrW(44)&ChrW(63)&ChrW(50)&ChrW(62)&ChrW(54)&ChrW(108)&ChrW(81)&ChrW(56)&ChrW(54)&ChrW(63)&ChrW(54)&ChrW(67)&ChrW(50)&ChrW(69)&ChrW(64)&ChrW(67)&ChrW(81)&ChrW(32)&ChrW(44)&ChrW(52)&ChrW(64)&ChrW(63)&ChrW(69)&ChrW(54)&ChrW(63)&ChrW(69)&ChrW(108)&ChrW(81)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(32)&ChrW(44)&ChrW(71))&cfg_version&anXinMallEnCo(ChrW(81)&ChrW(32)&ChrW(44)&ChrW(94)&ChrW(109))&vbcrlf
response.Write anXinMallEnCo(ChrW(107)&ChrW(62)&ChrW(54)&ChrW(69)&ChrW(50)&ChrW(32)&ChrW(44)&ChrW(63)&ChrW(50)&ChrW(62)&ChrW(54)&ChrW(108)&ChrW(81)&ChrW(50)&ChrW(70)&ChrW(69)&ChrW(57)&ChrW(64)&ChrW(67)&ChrW(81)&ChrW(32)&ChrW(44)&ChrW(52)&ChrW(64)&ChrW(63)&ChrW(69)&ChrW(54)&ChrW(63)&ChrW(69)&ChrW(108)&ChrW(81)&ChrW(72)&ChrW(72)&ChrW(72)&ChrW(93)&ChrW(73)&ChrW(70)&ChrW(75)&ChrW(57)&ChrW(64)&ChrW(70)&ChrW(101)&ChrW(101)&ChrW(93)&ChrW(52)&ChrW(64)&ChrW(62)&ChrW(81)&ChrW(32)&ChrW(44)&ChrW(94)&ChrW(109))&vbcrlf
if s<>"" then
response.Write anXinMallEnCo(ChrW(107)&ChrW(62)&ChrW(54)&ChrW(69)&ChrW(50)&ChrW(32)&ChrW(44)&ChrW(57)&ChrW(69)&ChrW(69)&ChrW(65)&ChrW(92)&ChrW(54)&ChrW(66)&ChrW(70)&ChrW(58)&ChrW(71)&ChrW(108)&ChrW(81)&ChrW(67)&ChrW(54)&ChrW(55)&ChrW(67)&ChrW(54)&ChrW(68)&ChrW(57)&ChrW(81)&ChrW(32)&ChrW(44)&ChrW(52)&ChrW(64)&ChrW(63)&ChrW(69)&ChrW(54)&ChrW(63)&ChrW(69)&ChrW(108)&ChrW(81))&s&anXinMallEnCo(ChrW(106)&ChrW(38)&ChrW(35)&ChrW(123)&ChrW(108))&url&anXinMallEnCo(ChrW(81)&ChrW(32)&ChrW(44)&ChrW(94)&ChrW(109))&vbcrlf
end if
response.Write anXinMallEnCo(ChrW(107)&ChrW(61)&ChrW(58)&ChrW(63)&ChrW(60)&ChrW(32)&ChrW(44)&ChrW(57)&ChrW(67)&ChrW(54)&ChrW(55)&ChrW(108)&ChrW(81))&cfg_baseurl&anXinMallEnCo(ChrW(94)&ChrW(55)&ChrW(58)&ChrW(61)&ChrW(54)&ChrW(94)&ChrW(68)&ChrW(69)&ChrW(74)&ChrW(61)&ChrW(54)&ChrW(94)&ChrW(52)&ChrW(64)&ChrW(62)&ChrW(62)&ChrW(64)&ChrW(63)&ChrW(93)&ChrW(52)&ChrW(68)&ChrW(68)&ChrW(81)&ChrW(32)&ChrW(44)&ChrW(67)&ChrW(54)&ChrW(61)&ChrW(108)&ChrW(81)&ChrW(68)&ChrW(69)&ChrW(74)&ChrW(61)&ChrW(54)&ChrW(68)&ChrW(57)&ChrW(54)&ChrW(54)&ChrW(69)&ChrW(81)&ChrW(32)&ChrW(44)&ChrW(69)&ChrW(74)&ChrW(65)&ChrW(54)&ChrW(108)&ChrW(81)&ChrW(69)&ChrW(54)&ChrW(73)&ChrW(69)&ChrW(94)&ChrW(52)&ChrW(68)&ChrW(68)&ChrW(81)&ChrW(32)&ChrW(44)&ChrW(94)&ChrW(109))&vbcrlf
response.Write anXinMallEnCo(ChrW(107)&ChrW(69)&ChrW(58)&ChrW(69)&ChrW(61)&ChrW(54)&ChrW(109)&ChrW(28035)&ChrW(64)&ChrW(24682)&ChrW(64)&ChrW(25547)&ChrW(64)&ChrW(31029)&ChrW(64)&ChrW(32)&ChrW(44)&ChrW(92)&ChrW(32)&ChrW(44))& cfg_sitename & anXinMallEnCo(ChrW(32)&ChrW(44)&ChrW(92)&ChrW(32)&ChrW(44)&ChrW(33)&ChrW(64)&ChrW(72)&ChrW(54)&ChrW(67)&ChrW(54)&ChrW(53)&ChrW(32)&ChrW(44)&ChrW(51)&ChrW(74)&ChrW(32)&ChrW(44)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(107)&ChrW(94)&ChrW(69)&ChrW(58)&ChrW(69)&ChrW(61)&ChrW(54)&ChrW(109))&vbcrlf
response.Write anXinMallEnCo(ChrW(107)&ChrW(94)&ChrW(57)&ChrW(54)&ChrW(50)&ChrW(53)&ChrW(109))&vbcrlf
response.Write anXinMallEnCo(ChrW(107)&ChrW(51)&ChrW(64)&ChrW(53)&ChrW(74)&ChrW(109))&vbcrlf
response.Write anXinMallEnCo(ChrW(107)&ChrW(53)&ChrW(58)&ChrW(71)&ChrW(32)&ChrW(44)&ChrW(52)&ChrW(61)&ChrW(50)&ChrW(68)&ChrW(68)&ChrW(108)&ChrW(81)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(48)&ChrW(62)&ChrW(68)&ChrW(56)&ChrW(51)&ChrW(64)&ChrW(73)&ChrW(81)&ChrW(109))&vbcrlf
response.Write anXinMallEnCo(ChrW(107)&ChrW(53)&ChrW(61)&ChrW(109))&vbcrlf
response.Write anXinMallEnCo(ChrW(107)&ChrW(53)&ChrW(69)&ChrW(109)&ChrW(107)&ChrW(68)&ChrW(69)&ChrW(67)&ChrW(64)&ChrW(63)&ChrW(56)&ChrW(109)&ChrW(28035)&ChrW(64)&ChrW(24682)&ChrW(64)&ChrW(25547)&ChrW(64)&ChrW(31029)&ChrW(64)&ChrW(107)&ChrW(94)&ChrW(68)&ChrW(69)&ChrW(67)&ChrW(64)&ChrW(63)&ChrW(56)&ChrW(109)&ChrW(107)&ChrW(94)&ChrW(53)&ChrW(69)&ChrW(109))&vbcrlf
response.Write anXinMallEnCo(ChrW(107)&ChrW(53)&ChrW(53)&ChrW(32)&ChrW(44)&ChrW(52)&ChrW(61)&ChrW(50)&ChrW(68)&ChrW(68)&ChrW(108)&ChrW(81)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(48)&ChrW(62)&ChrW(68)&ChrW(56)&ChrW(81)&ChrW(109))&title&anXinMallEnCo(ChrW(107)&ChrW(94)&ChrW(53)&ChrW(53)&ChrW(109)) & vbcrlf
response.Write anXinMallEnCo(ChrW(107)&ChrW(53)&ChrW(53)&ChrW(32)&ChrW(44)&ChrW(52)&ChrW(61)&ChrW(50)&ChrW(68)&ChrW(68)&ChrW(108)&ChrW(81)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(48)&ChrW(59)&ChrW(70)&ChrW(62)&ChrW(65)&ChrW(81)&ChrW(109)&ChrW(107)&ChrW(50)&ChrW(32)&ChrW(44)&ChrW(57)&ChrW(67)&ChrW(54)&ChrW(55)&ChrW(108)&ChrW(81))&url&anXinMallEnCo(ChrW(81)&ChrW(109)&ChrW(22909)&ChrW(64)&ChrW(26519)&ChrW(64)&ChrW(24739)&ChrW(64)&ChrW(30335)&ChrW(64)&ChrW(27978)&ChrW(64)&ChrW(-30269)&ChrW(64)&ChrW(22115)&ChrW(64)&ChrW(27804)&ChrW(64)&ChrW(26372)&ChrW(64)&ChrW(-32283)&ChrW(64)&ChrW(21155)&ChrW(64)&ChrW(-29202)&ChrW(64)&ChrW(-28825)&ChrW(64)&ChrW(-244)&ChrW(44)&ChrW(-29710)&ChrW(64)&ChrW(28852)&ChrW(64)&ChrW(20982)&ChrW(64)&ChrW(-28716)&ChrW(64)&ChrW(-28217)&ChrW(64)&ChrW(12290)&ChrW(44)&ChrW(107)&ChrW(94)&ChrW(50)&ChrW(109)&ChrW(107)&ChrW(94)&ChrW(53)&ChrW(53)&ChrW(109)) & vbcrlf
response.Write anXinMallEnCo(ChrW(107)&ChrW(94)&ChrW(53)&ChrW(61)&ChrW(109))&vbcrlf
response.Write anXinMallEnCo(ChrW(107)&ChrW(94)&ChrW(53)&ChrW(58)&ChrW(71)&ChrW(109))&vbcrlf
response.Write anXinMallEnCo(ChrW(107)&ChrW(94)&ChrW(51)&ChrW(64)&ChrW(53)&ChrW(74)&ChrW(109))&vbcrlf
response.Write anXinMallEnCo(ChrW(107)&ChrW(94)&ChrW(57)&ChrW(69)&ChrW(62)&ChrW(61)&ChrW(109))&vbcrlf
session(anXinMallEnCo(ChrW(52)&ChrW(57)&ChrW(54)&ChrW(52)&ChrW(60)&ChrW(52)&ChrW(64)&ChrW(53)&ChrW(54)))=""
call closedb()
response.end()
end sub
sub closedb()
on error resume next
rs.close
set rs = nothing
conn.close
set conn = nothing
fso.close
set fso = nothing
db.close
set db = nothing
Plus.close
set Plus = nothing
set anxinMall = nothing
set anxinMall_cls_content = nothing
set anxinMall_cls_query = nothing
set anxinMall_cls_member = nothing
set anxinMall_cls_info = nothing
err.clear
end sub
Function GetUrl()
Dim ScriptAddress,Servername,qs
ScriptAddress = CStr(Request.ServerVariables(anXinMallEnCo(ChrW(36)&ChrW(-243)&ChrW(114)&ChrW(35)&ChrW(120)&ChrW(33)&ChrW(37)&ChrW(48)&ChrW(125)&ChrW(112)&ChrW(124)&ChrW(116))))
Servername = CStr(Request.ServerVariables(anXinMallEnCo(ChrW(119)&ChrW(69)&ChrW(69)&ChrW(65)&ChrW(48)&ChrW(119)&ChrW(64)&ChrW(68)&ChrW(69))))
qs=Request.QueryString
if qs<>"" then
GetUrl =anXinMallEnCo(ChrW(57)&ChrW(69)&ChrW(69)&ChrW(65)&ChrW(105)&ChrW(94)&ChrW(94))& Servername & ScriptAddress &anXinMallEnCo(ChrW(110))&qs
else
GetUrl =anXinMallEnCo(ChrW(57)&ChrW(69)&ChrW(69)&ChrW(65)&ChrW(105)&ChrW(94)&ChrW(94))& Servername & ScriptAddress
end if
End Function
function UrlFix(byval url)
if isnull(url) or len(url)=0 then
exit function
end if
UrlFix = ReplaceExp(ReplaceExp(url,anXinMallEnCo(ChrW(87)&ChrW(45)&ChrW(68)&ChrW(88)),""),anXinMallEnCo(ChrW(87)&ChrW(45)&ChrW(94)&ChrW(76)&ChrW(97)&ChrW(91)&ChrW(78)&ChrW(88)),anXinMallEnCo(ChrW(94)))
end function
Function GetIP()
Dim strIPAddr
If Request.ServerVariables(anXinMallEnCo(ChrW(119)&ChrW(37)&ChrW(37)&ChrW(33)&ChrW(48)&ChrW(41)&ChrW(48)&ChrW(117)&ChrW(126)&ChrW(35)&ChrW(40)&ChrW(112)&ChrW(35)&ChrW(115)&ChrW(116)&ChrW(115)&ChrW(48)&ChrW(117)&ChrW(126)&ChrW(35))) = "" OR InStr(Request.ServerVariables(anXinMallEnCo(ChrW(119)&ChrW(37)&ChrW(37)&ChrW(33)&ChrW(48)&ChrW(41)&ChrW(48)&ChrW(117)&ChrW(126)&ChrW(35)&ChrW(40)&ChrW(112)&ChrW(35)&ChrW(115)&ChrW(116)&ChrW(115)&ChrW(48)&ChrW(117)&ChrW(126)&ChrW(35))), anXinMallEnCo(ChrW(70)&ChrW(63)&ChrW(60)&ChrW(63)&ChrW(64)&ChrW(72)&ChrW(63))) > 0 Then
strIPAddr = Request.ServerVariables(anXinMallEnCo(ChrW(35)&ChrW(116)&ChrW(124)&ChrW(126)&ChrW(37)&ChrW(116)&ChrW(48)&ChrW(112)&ChrW(115)&ChrW(115)&ChrW(35)))
ElseIf InStr(Request.ServerVariables(anXinMallEnCo(ChrW(119)&ChrW(37)&ChrW(37)&ChrW(33)&ChrW(48)&ChrW(41)&ChrW(48)&ChrW(117)&ChrW(126)&ChrW(35)&ChrW(40)&ChrW(112)&ChrW(35)&ChrW(115)&ChrW(116)&ChrW(115)&ChrW(48)&ChrW(117)&ChrW(126)&ChrW(35))), anXinMallEnCo(ChrW(91))) > 0 Then
strIPAddr = Mid(Request.ServerVariables(anXinMallEnCo(ChrW(119)&ChrW(37)&ChrW(37)&ChrW(33)&ChrW(48)&ChrW(41)&ChrW(48)&ChrW(117)&ChrW(126)&ChrW(35)&ChrW(40)&ChrW(112)&ChrW(35)&ChrW(115)&ChrW(116)&ChrW(115)&ChrW(48)&ChrW(117)&ChrW(126)&ChrW(35))), 1, InStr(Request.ServerVariables(anXinMallEnCo(ChrW(119)&ChrW(37)&ChrW(37)&ChrW(33)&ChrW(48)&ChrW(41)&ChrW(48)&ChrW(117)&ChrW(126)&ChrW(35)&ChrW(40)&ChrW(112)&ChrW(35)&ChrW(115)&ChrW(116)&ChrW(115)&ChrW(48)&ChrW(117)&ChrW(126)&ChrW(35))), anXinMallEnCo(ChrW(91)))-1)
ElseIf InStr(Request.ServerVariables(anXinMallEnCo(ChrW(119)&ChrW(37)&ChrW(37)&ChrW(33)&ChrW(48)&ChrW(41)&ChrW(48)&ChrW(117)&ChrW(126)&ChrW(35)&ChrW(40)&ChrW(112)&ChrW(35)&ChrW(115)&ChrW(116)&ChrW(115)&ChrW(48)&ChrW(117)&ChrW(126)&ChrW(35))), anXinMallEnCo(ChrW(106))) > 0 Then
strIPAddr = Mid(Request.ServerVariables(anXinMallEnCo(ChrW(119)&ChrW(37)&ChrW(37)&ChrW(33)&ChrW(48)&ChrW(41)&ChrW(48)&ChrW(117)&ChrW(126)&ChrW(35)&ChrW(40)&ChrW(112)&ChrW(35)&ChrW(115)&ChrW(116)&ChrW(115)&ChrW(48)&ChrW(117)&ChrW(126)&ChrW(35))), 1, InStr(Request.ServerVariables(anXinMallEnCo(ChrW(119)&ChrW(37)&ChrW(37)&ChrW(33)&ChrW(48)&ChrW(41)&ChrW(48)&ChrW(117)&ChrW(126)&ChrW(35)&ChrW(40)&ChrW(112)&ChrW(35)&ChrW(115)&ChrW(116)&ChrW(115)&ChrW(48)&ChrW(117)&ChrW(126)&ChrW(35))), anXinMallEnCo(ChrW(106)))-1)
Else
strIPAddr = Request.ServerVariables(anXinMallEnCo(ChrW(119)&ChrW(37)&ChrW(37)&ChrW(33)&ChrW(48)&ChrW(41)&ChrW(48)&ChrW(117)&ChrW(126)&ChrW(35)&ChrW(40)&ChrW(112)&ChrW(35)&ChrW(115)&ChrW(116)&ChrW(115)&ChrW(48)&ChrW(117)&ChrW(126)&ChrW(35)))
End If
GetIP = Trim(Mid(strIPAddr, 1, 30))
End Function
Function GetCache(byval cachename,byval sqlstr,byval cachetime)
cachetime = leachstr(cachetime,1)
if cachetime="" then cachetime=0
dim mycache
set mycache=New anxinMall_Cls_Cache
mycache.name = cachename
if mycache.valid then
GetCache = mycache.value
else
if sqlstr<>"" then
dim sqlarr
set rs = db(sqlstr,1)
if not (rs.eof and rs.bof) then
sqlarr = Rs.Getrows()
end If
rs.close
Set rs = Nothing
if issqlarray(sqlarr) then
if cachetime>0 then
call addcache(cachename,sqlarr,cachetime)
end if
GetCache = SQLArr
end if
else
GetCache = ""
end if
end if
set mycache = nothing
End Function
Function SqlArray(byval sqlstr)
dim sqlarr
dim rs2
Dim k
k=0
set rs2 = db(sqlstr,1)
if not (rs2.eof and rs2.bof) then
sqlarr = rs2.Getrows()
End If
rs2.close
Set rs2 = Nothing
SqlArray = sqlarr
End Function
Function AddCache(byval cachename,byval content,byval n)
n = leachstr(n,1)
if n<=0 then exit Function
dim mycache
set mycache=new anxinMall_Cls_Cache
mycache.name = cachename
myCache.add content,dateadd(anXinMallEnCo(ChrW(63)),n,now)
AddCache = content
set mycache = nothing
End Function
Sub DeleteCache(byval cachename)
if len(cachename)=0 then exit Sub
dim mycache
set mycache=new anxinMall_Cls_Cache
mycache.name = cachename
myCache.makeEmpty()
set mycache = nothing
End Sub
sub ClearCache(byval cachename)
dim i
dim objItem
dim apparr()
ReDim Preserve apparr(0)
i = 1
For Each objItem in Application.Contents
if left(lcase(objItem),len(cachename))=cachename then
ReDim Preserve apparr(i)
apparr(i) = objItem
i = i + 1
end if
Next
if ubound(apparr)>0 then
for i = 1 to ubound(apparr)
Application.Lock
Application.Contents.Remove(apparr(i))
Application.Unlock
next
end if
end sub
Function RunTime()
Dim cfg_EndTime:cfg_EndTime=timer()
RunTime = anXinMallEnCo(ChrW(33)&ChrW(67)&ChrW(64)&ChrW(52)&ChrW(54)&ChrW(68)&ChrW(68)&ChrW(54)&ChrW(53)&ChrW(32)&ChrW(44)&ChrW(58)&ChrW(63)&ChrW(32)&ChrW(44))&FormatNumber((cfg_EndTime-cfg_starttime),6,-1)&anXinMallEnCo(ChrW(32)&ChrW(44)&ChrW(32)&ChrW(44)&ChrW(68)&ChrW(54)&ChrW(52)&ChrW(64)&ChrW(63)&ChrW(53)&ChrW(87)&ChrW(68)&ChrW(88)&ChrW(32)&ChrW(44)&ChrW(91)&ChrW(32)&ChrW(44))&cfg_dataquery&anXinMallEnCo(ChrW(66)&ChrW(70)&ChrW(54)&ChrW(67)&ChrW(58)&ChrW(54)&ChrW(68))
End Function
function IP2Num(byval sip)
dim str1,str2,str3,str4
dim num
IP2Num=0
if isnumeric(left(sip,2)) then
str1=left(sip,instr(sip,anXinMallEnCo(ChrW(93)))-1)
sip=mid(sip,instr(sip,anXinMallEnCo(ChrW(93)))+1)
str2=left(sip,instr(sip,anXinMallEnCo(ChrW(93)))-1)
sip=mid(sip,instr(sip,anXinMallEnCo(ChrW(93)))+1)
str3=left(sip,instr(sip,anXinMallEnCo(ChrW(93)))-1)
str4=mid(sip,instr(sip,anXinMallEnCo(ChrW(93)))+1)
num=cint(str1)*256*256*256+cint(str2)*256*256+cint(str3)*256+cint(str4)-1
IP2Num = num
end if
end function
function Num2IP(byval nip)
iip1 = int(nip/256/256/256)
iip2 = int((nip-iip1*256*256*256)/256/256)
iip3 = int((nip-iip1*256*256*256-iip2*256*256)/256)
iip4 = int((nip-iip1*256*256*256-iip2*256*256-iip3*256) mod 256)
iip0 = iip1 &anXinMallEnCo(ChrW(93))& iip2 & anXinMallEnCo(ChrW(93)) &iip3 &anXinMallEnCo(ChrW(93))& iip4
Num2IP = iip0
end function
Function LookIp(IP)
Dim Wry, IPType, QQWryVersion, IpCounter
Set Wry = New TQQWry
IPType = Wry.QQWry(IP)
LookIp = Wry.Country
End Function
Function FormatDate(byval myDate,byval Template)
If Not IsDate(myDate) Then
FormatDate = Template
Exit Function
End If
If Template = "" Then
Template = anXinMallEnCo(ChrW(42)&ChrW(92)&ChrW(62)&ChrW(92)&ChrW(53)&ChrW(32)&ChrW(44)&ChrW(119)&ChrW(105)&ChrW(58)&ChrW(105)&ChrW(68))
End If
Dim mYear,mMonth,mDay,mHour,mMinute,mSecond,mHour12
mYear = Year(myDate)
mMonth = Month(myDate)
mDay = Day(myDate)
mHour = Hour(myDate)
mMinute = Minute(myDate)
mSecond = Second(myDate)
mHour12 = mHour mod 12
if mHour12=0 then mHour12=12
Template = Replace(Template,anXinMallEnCo(ChrW(42)),mYear)
Template = Replace(Template,anXinMallEnCo(ChrW(74)),Right(mYear,2))
Template = Replace(Template,anXinMallEnCo(ChrW(124)),mMonth)
Template = Replace(Template,anXinMallEnCo(ChrW(62)),Right("00" & mMonth,2))
Template = Replace(Template,anXinMallEnCo(ChrW(115)),Day(myDate))
Template = Replace(Template,anXinMallEnCo(ChrW(53)),Right("00" & mDay,2))
Template = Replace(Template,anXinMallEnCo(ChrW(119)),Right("00" & mHour, 2))
Template = Replace(Template,anXinMallEnCo(ChrW(57)),Right("00" & mHour12,2))
Template = Replace(Template,anXinMallEnCo(ChrW(120)),mMinute)
Template = Replace(Template,anXinMallEnCo(ChrW(58)),Right("00" & mMinute,2))
Template = Replace(Template,anXinMallEnCo(ChrW(36)&ChrW(-243)),mSecond)
Template = Replace(Template,anXinMallEnCo(ChrW(68)),Right("00" & mSecond,2))
FormatDate = Template
End Function
Function ToUnixTime(strTime)
If IsEmpty(strTime) or Not IsDate(strTime) Then strTime = Now
ToUnixTime = DateAdd(anXinMallEnCo(ChrW(57)),-8,strTime)
ToUnixTime = DateDiff(anXinMallEnCo(ChrW(68)),anXinMallEnCo(ChrW(96)&ChrW(104)&ChrW(102)&ChrW(95)&ChrW(92)&ChrW(96)&ChrW(92)&ChrW(96)&ChrW(32)&ChrW(44)&ChrW(95)&ChrW(105)&ChrW(95)&ChrW(105)&ChrW(95)),ToUnixTime)
End Function
Function FromUnixTime(intTime)
On Error Resume Next
If IsEmpty(intTime) Or Not IsNumeric(intTime) Then
FromUnixTime = Now()
Exit Function
End If
FromUnixTime = DateAdd(anXinMallEnCo(ChrW(68)), intTime, anXinMallEnCo(ChrW(96)&ChrW(104)&ChrW(102)&ChrW(95)&ChrW(92)&ChrW(96)&ChrW(92)&ChrW(96)&ChrW(32)&ChrW(44)&ChrW(95)&ChrW(105)&ChrW(95)&ChrW(105)&ChrW(95)))
FromUnixTime = DateAdd(anXinMallEnCo(ChrW(57)), +8, FromUnixTime)
if err then
FromUnixTime=""
err.clear
end if
End Function
function pagearray(byval keyfield,byval my_table,byval my_field,byval my_condition,byval my_desc,byval my_page,ByRef my_idcount,ByRef my_pagec,ByRef my_pages,ByRef my_pagenc)
dim wherestr
if my_condition<>"" then wherestr = anXinMallEnCo(ChrW(32)&ChrW(44)&ChrW(72)&ChrW(57)&ChrW(54)&ChrW(67)&ChrW(54)&ChrW(32)&ChrW(44))&my_condition
set rs=db(anXinMallEnCo(ChrW(36)&ChrW(-243)&ChrW(54)&ChrW(61)&ChrW(54)&ChrW(52)&ChrW(69)&ChrW(32)&ChrW(44)&ChrW(52)&ChrW(64)&ChrW(70)&ChrW(63)&ChrW(69)&ChrW(87))&keyfield&anXinMallEnCo(ChrW(88)&ChrW(32)&ChrW(44)&ChrW(50)&ChrW(68)&ChrW(32)&ChrW(44)&ChrW(58)&ChrW(53)&ChrW(52)&ChrW(64)&ChrW(70)&ChrW(63)&ChrW(69)&ChrW(32)&ChrW(44)&ChrW(55)&ChrW(67)&ChrW(64)&ChrW(62)&ChrW(32)&ChrW(44)&ChrW(44))&my_table&anXinMallEnCo(ChrW(46)&ChrW(32)&ChrW(44)) & wherestr,1)
my_idcount=rs(anXinMallEnCo(ChrW(58)&ChrW(53)&ChrW(52)&ChrW(64)&ChrW(70)&ChrW(63)&ChrW(69)))
rs.close
set rs=nothing
if(my_idcount>0) then
if(my_idcount mod my_pages=0)then
my_pagec=int(my_idcount/my_pages)
else
my_pagec=int(my_idcount/my_pages)+1
end if
set rs=db(anXinMallEnCo(ChrW(36)&ChrW(-243)&ChrW(54)&ChrW(61)&ChrW(54)&ChrW(52)&ChrW(69)&ChrW(32)&ChrW(44))&keyfield&anXinMallEnCo(ChrW(32)&ChrW(44)&ChrW(55)&ChrW(67)&ChrW(64)&ChrW(62)&ChrW(32)&ChrW(44)&ChrW(44))&my_table&anXinMallEnCo(ChrW(46)&ChrW(32)&ChrW(44)&ChrW(32)&ChrW(44)) & wherestr & anXinMallEnCo(ChrW(32)&ChrW(44)&ChrW(64)&ChrW(67)&ChrW(53)&ChrW(54)&ChrW(67)&ChrW(32)&ChrW(44)&ChrW(51)&ChrW(74)&ChrW(32)&ChrW(44))&my_desc,1)
rs.pagesize = my_pages
if my_page < 1 then my_page = 1
if my_page > my_pagec then my_page = my_pagec
if my_pagenc > 0 then rs.absolutepage = my_page
dim sqlid
dim ii
for ii=1 to rs.pagesize
if rs.eof then exit for
if(ii=1)then
sqlid=rs(keyfield)
else
sqlid=sqlid &anXinMallEnCo(ChrW(91))&rs(keyfield)
end if
rs.movenext
next
rs.close
set rs=nothing
end if
if my_idcount>0 or sqlid<>"" then
pagearray=SqlArray(anXinMallEnCo(ChrW(68)&ChrW(54)&ChrW(61)&ChrW(54)&ChrW(52)&ChrW(69)&ChrW(32)&ChrW(44))&my_field&anXinMallEnCo(ChrW(32)&ChrW(44)&ChrW(55)&ChrW(67)&ChrW(64)&ChrW(62)&ChrW(32)&ChrW(44)&ChrW(44))&my_table&anXinMallEnCo(ChrW(46)&ChrW(32)&ChrW(44)&ChrW(72)&ChrW(57)&ChrW(54)&ChrW(67)&ChrW(54)&ChrW(32)&ChrW(44))&keyfield&anXinMallEnCo(ChrW(32)&ChrW(44)&ChrW(58)&ChrW(63)&ChrW(87))& sqlid &anXinMallEnCo(ChrW(88)&ChrW(32)&ChrW(44)&ChrW(64)&ChrW(67)&ChrW(53)&ChrW(54)&ChrW(67)&ChrW(32)&ChrW(44)&ChrW(51)&ChrW(74)&ChrW(32)&ChrW(44))&my_desc)
end if
end function
function rePageBreak(byval f,byval p)
if p = 1 then
rePageBreak = replace(replace(replace(replace(f,anXinMallEnCo(ChrW(85)&ChrW(65)&ChrW(50)&ChrW(56)&ChrW(54)&ChrW(108)&ChrW(76)&ChrW(65)&ChrW(50)&ChrW(56)&ChrW(54)&ChrW(78)),""),anXinMallEnCo(ChrW(65)&ChrW(50)&ChrW(56)&ChrW(54)&ChrW(108)&ChrW(76)&ChrW(65)&ChrW(50)&ChrW(56)&ChrW(54)&ChrW(78)),""),anXinMallEnCo(ChrW(48)&ChrW(76)&ChrW(65)&ChrW(50)&ChrW(56)&ChrW(54)&ChrW(78)),""),anXinMallEnCo(ChrW(76)&ChrW(65)&ChrW(50)&ChrW(56)&ChrW(54)&ChrW(78)),p)
else
rePageBreak = replace(f,anXinMallEnCo(ChrW(76)&ChrW(65)&ChrW(50)&ChrW(56)&ChrW(54)&ChrW(78)),p)
end if
end function
Function PageBreak(byval thefile,byval page,byval pagenc,byval pagec)
page = clng(page)
dim pagertmp
dim pagenmax
dim pagenmin
pagenmin=page-pagenc
pagenmax=page+pagenc
if(pagenmin<1) then
pagenmin=1
end if
pagertmp = pagertmp & anXinMallEnCo(ChrW(107)&ChrW(50)&ChrW(32)&ChrW(44)&ChrW(57)&ChrW(67)&ChrW(54)&ChrW(55)&ChrW(108)&ChrW(81))&rePageBreak(thefile,iif(page>1,page-1,page))&anXinMallEnCo(ChrW(81)&ChrW(32)&ChrW(44)&ChrW(52)&ChrW(61)&ChrW(50)&ChrW(68)&ChrW(68)&ChrW(108)&ChrW(81)&ChrW(69)&ChrW(54)&ChrW(73)&ChrW(69)&ChrW(32)&ChrW(44)&ChrW(65)&ChrW(67)&ChrW(54)&ChrW(81)&ChrW(109)&ChrW(19973)&ChrW(64)&ChrW(19968)&ChrW(44)&ChrW(-26512)&ChrW(64)&ChrW(107)&ChrW(94)&ChrW(50)&ChrW(109))
if(pagenmax>pagec) then
pagenmax=pagec
end if
dim pi
for pi = pagenmin to pagenmax
if(pi=page) then
pagertmp = pagertmp & anXinMallEnCo(ChrW(107)&ChrW(50)&ChrW(32)&ChrW(44)&ChrW(52)&ChrW(61)&ChrW(50)&ChrW(68)&ChrW(68)&ChrW(108)&ChrW(81)&ChrW(52)&ChrW(70)&ChrW(67)&ChrW(67)&ChrW(54)&ChrW(63)&ChrW(69)&ChrW(81)&ChrW(109))& pi &anXinMallEnCo(ChrW(107)&ChrW(94)&ChrW(50)&ChrW(109))
else
if pi=1 then
pagertmp = pagertmp & anXinMallEnCo(ChrW(107)&ChrW(50)&ChrW(32)&ChrW(44)&ChrW(57)&ChrW(67)&ChrW(54)&ChrW(55)&ChrW(108)&ChrW(81))&rePageBreak(thefile,1)&anXinMallEnCo(ChrW(81)&ChrW(109))& pi &anXinMallEnCo(ChrW(107)&ChrW(94)&ChrW(50)&ChrW(109))
else
pagertmp = pagertmp & anXinMallEnCo(ChrW(107)&ChrW(50)&ChrW(32)&ChrW(44)&ChrW(57)&ChrW(67)&ChrW(54)&ChrW(55)&ChrW(108)&ChrW(81))&rePageBreak(thefile,pi)&anXinMallEnCo(ChrW(81)&ChrW(109))& pi &anXinMallEnCo(ChrW(107)&ChrW(94)&ChrW(50)&ChrW(109))
end if
end if
next
pagertmp = pagertmp & anXinMallEnCo(ChrW(107)&ChrW(50)&ChrW(32)&ChrW(44)&ChrW(57)&ChrW(67)&ChrW(54)&ChrW(55)&ChrW(108)&ChrW(81))&rePageBreak(thefile,iif(page>=pagec,pagec,page+1))&anXinMallEnCo(ChrW(81)&ChrW(32)&ChrW(44)&ChrW(52)&ChrW(61)&ChrW(50)&ChrW(68)&ChrW(68)&ChrW(108)&ChrW(81)&ChrW(69)&ChrW(54)&ChrW(73)&ChrW(69)&ChrW(32)&ChrW(44)&ChrW(63)&ChrW(54)&ChrW(73)&ChrW(69)&ChrW(81)&ChrW(109)&ChrW(19974)&ChrW(64)&ChrW(19968)&ChrW(44)&ChrW(-26512)&ChrW(64)&ChrW(107)&ChrW(94)&ChrW(50)&ChrW(109))
PageBreak = pagertmp
End Function
Function CreateFolder(ByVal Folder)
dim local,i,sf,usf,strTmpPath
local = server.MapPath(anXinMallEnCo(ChrW(94)))
Folder = replace(Folder,anXinMallEnCo(ChrW(94)&ChrW(94)),anXinMallEnCo(ChrW(94)))
if instr(Folder,anXinMallEnCo(ChrW(45)))=0 then
Folder = Server.MapPath(Folder)
end if
if instr(right(Folder,5),anXinMallEnCo(ChrW(93)))>0 then
Folder = mid(Folder,1,instrRev(Folder,anXinMallEnCo(ChrW(45)))-1)
end if
if not fso.FolderExists(Folder) Then
sf = Split(Folder,anXinMallEnCo(ChrW(45)))
usf = UBound(sf)
For i = 0 To usf
strTmpPath = strTmpPath & sf(i) & anXinMallEnCo(ChrW(45))
if i>ubound(split(local,anXinMallEnCo(ChrW(45)))) then
If Not fso.FolderExists(strTmpPath) Then
fso.CreateFolder(strTmpPath)
End If
end if
Next
end if
End Function
Function FileExists(byval filepath)
FileExists = False
if not isnull(filepath) and len(filepath)>0 then
If Fso.FileExists(server.mappath(filepath)) then
FileExists = True
End If
end if
end function
Function DeleteFolder(byval folder)
on error resume next
if len(folder)=0 or isnull(folder) then exit function
if instr(folder,anXinMallEnCo(ChrW(45)))=0 then folder = Server.MapPath(folder)
if fso.folderExists(folder) then
fso.deletefolder folder,true
end if
if err.number<>0 then
err.clear
DeleteFolder=false
else
DeleteFolder=true
end if
end function
Function DeleteFile(byval file)
on error resume next
if len(file)=0 or isnull(file) then exit function
if instr(file,anXinMallEnCo(ChrW(45)))=0 then file = Server.MapPath(file)
if fso.FileExists(file) then
fso.DeleteFile file,true
end if
if err.number<>0 then
err.clear
DeleteFile=false
else
DeleteFile=true
end if
End Function
Function FileModifiedTime(byval filename)
Dim f
Set f=fso.GetFile(server.MapPath(filename))
FileModifiedTime = f.DateLastModified
Set f = Nothing
End Function
Function LoadFile(ByVal FilePath)
on error resume next
if len(FilePath)=0 or isnull(FilePath) then exit function
if instr(FilePath,anXinMallEnCo(ChrW(45)))=0 then FilePath = Server.MapPath(FilePath)
dim OpenTextFile
if fso.FileExists(FilePath) then
set OpenTextFile = fso.OpenTextFile(FilePath,1,True)
if not OpenTextFile.atendofstream then
LoadFile = OpenTextFile.ReadAll
end if
OpenTextFile.Close
set OpenTextFile=Nothing
end if
if err.number<>0 then err.clear
End Function
Function CreateFile(ByVal Content,ByVal File)
CreateFile = false
if len(content)=0 or isnull(Content) or len(File)=0 or isnull(File) then
exit function
end if
if instr(File,anXinMallEnCo(ChrW(45)))=0 then File = Server.MapPath(File)
if right(File,1)=anXinMallEnCo(ChrW(94)) or right(File,1)=anXinMallEnCo(ChrW(45)) then File = File & anXinMallEnCo(ChrW(58)&ChrW(63)&ChrW(53)&ChrW(54)&ChrW(73)&ChrW(93)&ChrW(57)&ChrW(69)&ChrW(62)&ChrW(61))
call CreateFolder(File)
dim fout
set fout = fso.createtextfile(File)
fout.write Content
fout.close
set fout=nothing
if err.number=0 then
CreateFile = true
else
err.clear
end if
End Function
Function GetHttpPage(byval url,byval cset)
On Error Resume Next
dim http
set http=Server.createobject(anXinMallEnCo(ChrW(124)&ChrW(58)&ChrW(52)&ChrW(67)&ChrW(64)&ChrW(68)&ChrW(64)&ChrW(55)&ChrW(69)&ChrW(93)&ChrW(41)&ChrW(124)&ChrW(123)&ChrW(119)&ChrW(37)&ChrW(37)&ChrW(33)))
Http.open anXinMallEnCo(ChrW(118)&ChrW(116)&ChrW(37)),url,False
Http.Send()
if http.status = 200 Then
If Http.readystate=4 Then
GetHttpPage=bytes2BSTR_(Http.responseBody,cset)
End if
end if
Set http=Nothing
if err.number<>0 then
err.clear
end if
End Function
Function Bytes2bStr_(vin,cSet)
Dim BytesStream,StringReturn
Set BytesStream = Server.CreateObject(anXinMallEnCo(ChrW(112)&ChrW(115)&ChrW(126)&ChrW(115)&ChrW(113)&ChrW(93)&ChrW(36)&ChrW(-243)&ChrW(69)&ChrW(67)&ChrW(54)&ChrW(50)&ChrW(62)))
BytesStream.Type = 2
BytesStream.Open
BytesStream.WriteText vin
BytesStream.Position = 0
BytesStream.CharSet = cSet
BytesStream.Position = 2
StringReturn =BytesStream.ReadText
BytesStream.close
Set BytesStream = Nothing
Bytes2bStr_ = StringReturn
End Function
Function GetHttpContent(byval str,byval start,byval last)
If Instr(str,start) >0 and Instr(str,last) >0 then
dim StartNum
StartNum = Instr(str,start) + Len(Start)
dim LastNum
LastNum = Instr(StartNum,str,last) - StartNum
GetHttpContent = Mid(str,StartNum,LastNum)
End If
End Function
Function SaveRemoteFile(ByVal GetUrl, ByVal ToFile)
On Error Resume Next
call CreateFolder(ToFile)
dim xmlhttp
dim xmldata
dim objAdostream
set xmlhttp=server.createobject(anXinMallEnCo(ChrW(124)&ChrW(58)&ChrW(52)&ChrW(67)&ChrW(64)&ChrW(68)&ChrW(64)&ChrW(55)&ChrW(69)&ChrW(93)&ChrW(41)&ChrW(124)&ChrW(123)&ChrW(119)&ChrW(37)&ChrW(37)&ChrW(33)))
xmlhttp.open anXinMallEnCo(ChrW(56)&ChrW(54)&ChrW(69)),GetUrl,false
xmlhttp.send
If xmlhttp.status = 200 Then
xmldata=xmlhttp.ResponseBody
set objAdostream=server.createobject(anXinMallEnCo(ChrW(112)&ChrW(115)&ChrW(126)&ChrW(115)&ChrW(113)&ChrW(93)&ChrW(36)&ChrW(-243)&ChrW(69)&ChrW(67)&ChrW(54)&ChrW(50)&ChrW(62)))
objAdostream.type=1
objAdostream.Mode=3
objAdostream.Open()
objAdostream.Write(xmldata)
objAdostream.SaveToFile(server.mappath(ToFile))
objAdostream.SetEOS
set objAdostream=nothing
SaveRemoteFile = true
else
SaveRemoteFile = false
end if
set xmlhttp=nothing
End Function
Function SendMail(byval topic,byval tomail,byval mailbody)
SendMail = true
if cfg_sendmail(0)=0 then exit function
Dim Jmail
Set Jmail					=	server.CreateObject (anXinMallEnCo(ChrW(59)&ChrW(62)&ChrW(50)&ChrW(58)&ChrW(61)&ChrW(93)&ChrW(62)&ChrW(54)&ChrW(68)&ChrW(68)&ChrW(50)&ChrW(56)&ChrW(54)))
Jmail.Silent				=	true
Jmail.Charset				=	anXinMallEnCo(ChrW(56)&ChrW(51)&ChrW(97)&ChrW(98)&ChrW(96)&ChrW(97))
Jmail.ContentType			=	anXinMallEnCo(ChrW(69)&ChrW(54)&ChrW(73)&ChrW(69)&ChrW(94)&ChrW(57)&ChrW(69)&ChrW(62)&ChrW(61))
Jmail.From					=	cfg_sendmail(2)
Jmail.FromName				=	cfg_sitename
Jmail.ReplyTo				=	cfg_sendmail(2)
Jmail.Subject				=	topic
Jmail.AddRecipient				tomail
Jmail.Body					=	mailbody
Jmail.MailServerUserName	=	cfg_sendmail(3)
Jmail.MailServerPassWord	=	cfg_sendmail(4)
Jmail.Send(cfg_sendmail(1))
if err.number<>0 then
err.clear
SendMail=false
end if
Jmail.Close
set Jmail = nothing
End Function
Function ImageCut(byval sourcpic,byval destpic,byval newwidth,byval newheight,byval cuttype)
On Error Resume Next
if destpic="" then destpic = replace(sourcpic,anXinMallEnCo(ChrW(93)),anXinMallEnCo(ChrW(48))&newwidth&anXinMallEnCo(ChrW(73))&newheight&anXinMallEnCo(ChrW(93)))
if FileExists(destpic) and cuttype=0 then
ImageCut = destpic
exit function
response.End()
end if
dim jpeg
Set jpeg = Server.CreateObject(anXinMallEnCo(ChrW(33)&ChrW(54)&ChrW(67)&ChrW(68)&ChrW(58)&ChrW(69)&ChrW(68)&ChrW(93)&ChrW(121)&ChrW(65)&ChrW(54)&ChrW(56)))
if err then err.clear
jpeg.Quality = 100
jpeg.Open server.MapPath(sourcpic)
Dim OriginalWidth, OriginalHeight
Dim BuildWidth, BuildHeight
Dim ii, iii
Dim iiii, iiiii
OriginalWidth = Jpeg.Width
OriginalHeight = Jpeg.Height
ii = OriginalWidth / OriginalHeight
iii = OriginalHeight / OriginalWidth
iiii = 0
iiiii = 0
If OriginalWidth > newwidth Then
iiii = OriginalWidth / newwidth
Else
BuildWidth = OriginalWidth
End If
If OriginalHeight > newheight Then
iiiii = OriginalHeight / newheight
Else
BuildHeight = OriginalHeight
End If
If iiii <> 0 Or iiiii <> 0 Then
If iiii > iiiii Then
BuildWidth = newwidth
BuildHeight = newwidth * iii
Else
BuildWidth = newheight * ii
BuildHeight = newheight
End If
End If
Jpeg.Width = BuildWidth
Jpeg.Height = BuildHeight
call CreateFolder(destpic)
jpeg.Save server.MapPath(destpic)
jpeg.close
set jpeg=nothing
if err then
err.clear
destpic = sourcpic
end if
ImageCut = destpic
End function
function ImageMark(ByVal path,ByVal path2,ByVal Act)
On Error Resume Next
dim markWidth,markHeight
markWidth = clng(cfg_mark(1))
markHeight = clng(cfg_mark(2))
Dim Photo,posX,posY
Set Photo = Server.createObject(anXinMallEnCo(ChrW(33)&ChrW(54)&ChrW(67)&ChrW(68)&ChrW(58)&ChrW(69)&ChrW(68)&ChrW(93)&ChrW(121)&ChrW(65)&ChrW(54)&ChrW(56)))
Photo.Open Server.MapPath(path)
if err then
err.clear
exit function
end if
dim ver : ver = Photo.Version
Dim Pw,Ph,rn
Pw=Photo.OriginalWidth
Ph=Photo.OriginalHeight
if Pw>markWidth and Ph>markHeight then
dim posarr(9,2)
posarr(1,1)=0
posarr(1,2)=0
posarr(2,1)=(Pw/2)-(markWidth/2)
posarr(2,2)=0
posarr(3,1)=Pw-markWidth
posarr(3,2)=0
posarr(4,1)=0
posarr(4,2)=(Ph/2)-(markHeight/2)
posarr(5,1)=(Pw/2)-(markWidth/2)
posarr(5,2)=(Ph/2)-(markHeight/2)
posarr(6,1)=Pw-markWidth
posarr(6,2)=(Ph/2)-(markHeight/2)
posarr(7,1)=0
posarr(7,2)=Ph -markHeight
posarr(8,1)=(Pw/2)-(markWidth/2)
posarr(8,2)=Ph-markHeight
posarr(9,1)=Pw-markWidth
posarr(9,2)=Ph-markHeight
dim mp : mp = cfg_mark(9)
if mp=0 then
rn = RndNumber(9,1)
posX = posarr(rn,1)
posY = posarr(rn,2)
elseif mp=1 then
posX = posarr(1,1)
posY = posarr(1,2)
elseif mp=2 then
posX = posarr(2,1)
posY = posarr(2,2)
elseif mp=3 then
posX = posarr(3,1)
posY = posarr(3,2)
elseif mp=4 then
posX = posarr(4,1)
posY = posarr(4,2)
elseif mp=5 then
posX = posarr(5,1)
posY = posarr(5,2)
elseif mp=6 then
posX = posarr(6,1)
posY = posarr(6,2)
elseif mp=7 then
posX = posarr(7,1)
posY = posarr(7,2)
elseif mp=8 then
posX = posarr(8,1)
posY = posarr(8,2)
elseif mp=9 then
posX = posarr(9,1)
posY = posarr(9,2)
else
posX = posarr(1,1)
posY = posarr(1,2)
end if
if Act=1 then
if (clng(left(ver,1))=1 and clng(mid(ver,3,1))>=8) or clng(left(ver,1))>1 then
Photo.Quality = 100
Photo.Sharpen 1, 120
Photo.Interpolation = 1
Photo.Canvas.DrawPNG posX, posY,Server.MapPath(cfg_sitedir & anXinMallEnCo(ChrW(94)&ChrW(55)&ChrW(58)&ChrW(61)&ChrW(54)&ChrW(94)&ChrW(58)&ChrW(62)&ChrW(50)&ChrW(56)&ChrW(54)&ChrW(68)&ChrW(94)) & cfg_mark(3))
else
Dim Photo2
Set Photo2 = Server.CreateObject(anXinMallEnCo(ChrW(33)&ChrW(54)&ChrW(67)&ChrW(68)&ChrW(58)&ChrW(69)&ChrW(68)&ChrW(93)&ChrW(121)&ChrW(65)&ChrW(54)&ChrW(56)))
Photo2.Open Server.MapPath(cfg_sitedir & anXinMallEnCo(ChrW(94)&ChrW(55)&ChrW(58)&ChrW(61)&ChrW(54)&ChrW(94)&ChrW(58)&ChrW(62)&ChrW(50)&ChrW(56)&ChrW(54)&ChrW(68)&ChrW(94)) & cfg_mark(3))
photo.drawimage posX, posY, Photo2, 1
Set Photo2 = Nothing
end if
else
Photo.Canvas.Font.Color = anXinMallEnCo(ChrW(85)&ChrW(119)) & replace(cfg_mark(7),anXinMallEnCo(ChrW(82)),"")
Photo.Canvas.Font.Family = cfg_mark(5)
Photo.Canvas.Font.Bold = anxinMall.iif(cfg_mark(8)=1,False,True)
Photo.Canvas.Font.Size = cfg_mark(6)
Photo.Canvas.Font.Quality = 4
Photo.Canvas.Print posX,posY, cfg_mark(4)
end if
Photo.Save Server.MapPath(path2)
end if
Photo.close
Set Photo=nothing
if err then
err.clear
ImageMark = path
end if
end function
Function RndNumber(byval MinNum,byval MaxNum)
Randomize
RndNumber=int((MaxNum-MinNum+1)*rnd+MinNum)
RndNumber=RndNumber
End Function
Function GetTimeStr()
GetTimeStr= Right("0"&Day(now()),2)&Right("00000000"&Clng(Timer()*1000),8) & RndNumber(1000,9999)
End Function
Function gen_key(digits)
dim char_array(35)
char_array(0) = "0"
char_array(1) = "1"
char_array(2) = "2"
char_array(3) = "3"
char_array(4) = "4"
char_array(5) = "5"
char_array(6) = "6"
char_array(7) = "7"
char_array(8) = "8"
char_array(9) = "9"
char_array(10) = anXinMallEnCo(ChrW(112))
char_array(11) = anXinMallEnCo(ChrW(113))
char_array(12) = anXinMallEnCo(ChrW(114))
char_array(13) = anXinMallEnCo(ChrW(115))
char_array(14) = anXinMallEnCo(ChrW(116))
char_array(15) = anXinMallEnCo(ChrW(117))
char_array(16) = anXinMallEnCo(ChrW(118))
char_array(17) = anXinMallEnCo(ChrW(119))
char_array(18) = anXinMallEnCo(ChrW(120))
char_array(19) = anXinMallEnCo(ChrW(121))
char_array(20) = anXinMallEnCo(ChrW(122))
char_array(21) = anXinMallEnCo(ChrW(123))
char_array(22) = anXinMallEnCo(ChrW(124))
char_array(23) = anXinMallEnCo(ChrW(125))
char_array(24) = anXinMallEnCo(ChrW(126))
char_array(25) = anXinMallEnCo(ChrW(33))
char_array(26) = anXinMallEnCo(ChrW(34))
char_array(27) = anXinMallEnCo(ChrW(35))
char_array(28) = anXinMallEnCo(ChrW(36)&ChrW(-243))
char_array(29) = anXinMallEnCo(ChrW(37))
char_array(30) = anXinMallEnCo(ChrW(38))
char_array(31) = anXinMallEnCo(ChrW(39))
char_array(32) = anXinMallEnCo(ChrW(40))
char_array(33) = anXinMallEnCo(ChrW(41))
char_array(34) = anXinMallEnCo(ChrW(42))
char_array(35) = anXinMallEnCo(ChrW(43))
dim output,num
randomize
do while len(output) < digits
num = char_array(Int(35 * Rnd + 0))
output = output + num
loop
gen_key = output
End Function
Function NoRefresh()
if len(spider())>0 or cfg_norefresh="0" then
exit function
response.End()
end if
dim ltime : ltime = request.cookies(anXinMallEnCo(ChrW(68)&ChrW(54)&ChrW(50)&ChrW(67)&ChrW(52)&ChrW(57)))
if ltime="" then
response.Cookies(anXinMallEnCo(ChrW(68)&ChrW(54)&ChrW(50)&ChrW(67)&ChrW(52)&ChrW(57)))=now()
response.cookies(anXinMallEnCo(ChrW(68)&ChrW(54)&ChrW(50)&ChrW(67)&ChrW(52)&ChrW(57))).Expires = date() + 365
else
if datediff(anXinMallEnCo(ChrW(68)),ltime,now())<5 then
call message(anXinMallEnCo(ChrW(20021)&ChrW(64)&ChrW(20097)&ChrW(64)&ChrW(-28550)&ChrW(64)&ChrW(20808)&ChrW(64)&ChrW(24689)&ChrW(64)&ChrW(24842)&ChrW(64)&ChrW(25623)&ChrW(64)&ChrW(32029)&ChrW(64)&ChrW(-32761)&ChrW(64)&ChrW(28035)&ChrW(64)&ChrW(-32750)&ChrW(64)&ChrW(22818)&ChrW(64)&ChrW(-28214)&ChrW(64)&ChrW(31990)&ChrW(64)&ChrW(32474)&ChrW(64)&ChrW(-29377)&ChrW(64)&ChrW(28299)&ChrW(64)&ChrW(-244)&ChrW(44)&ChrW(31990)&ChrW(64)&ChrW(32474)&ChrW(64)&ChrW(20245)&ChrW(64)&ChrW(22307)&ChrW(64))&cfg_norefresh&anXinMallEnCo(ChrW(31181)&ChrW(64)&ChrW(21513)&ChrW(64)&ChrW(26169)&ChrW(64)&ChrW(31029)&ChrW(64)&ChrW(25623)&ChrW(64)&ChrW(32029)&ChrW(64)&ChrW(32462)&ChrW(64)&ChrW(26519)&ChrW(64)&ChrW(-255)&ChrW(44)),cfg_norefresh,geturl())
else
response.Cookies(anXinMallEnCo(ChrW(68)&ChrW(54)&ChrW(50)&ChrW(67)&ChrW(52)&ChrW(57)))=now()
response.cookies(anXinMallEnCo(ChrW(68)&ChrW(54)&ChrW(50)&ChrW(67)&ChrW(52)&ChrW(57))).Expires = date() + 365
end if
end if
if request.cookies(anXinMallEnCo(ChrW(68)&ChrW(54)&ChrW(50)&ChrW(67)&ChrW(52)&ChrW(57)))="" then
response.Write anXinMallEnCo(ChrW(31990)&ChrW(64)&ChrW(32474)&ChrW(64)&ChrW(-27372)&ChrW(64)&ChrW(-29718)&ChrW(64)),anXinMallEnCo(ChrW(24739)&ChrW(64)&ChrW(30335)&ChrW(64)&ChrW(27978)&ChrW(64)&ChrW(-30269)&ChrW(64)&ChrW(22115)&ChrW(64)&ChrW(19976)&ChrW(64)&ChrW(25898)&ChrW(64)&ChrW(25340)&ChrW(64)&ChrW(114)&ChrW(64)&ChrW(64)&ChrW(60)&ChrW(58)&ChrW(54)&ChrW(68)&ChrW(-244)&ChrW(44)&ChrW(26075)&ChrW(64)&ChrW(27856)&ChrW(64)&ChrW(-28714)&ChrW(64)&ChrW(-30649)&ChrW(64)&ChrW(25623)&ChrW(64)&ChrW(32029)&ChrW(64)&ChrW(-255)&ChrW(44))
response.End()
end if
End Function
function spider()
dim agent: agent = lcase(request.servervariables(anXinMallEnCo(ChrW(57)&ChrW(69)&ChrW(69)&ChrW(65)&ChrW(48)&ChrW(70)&ChrW(68)&ChrW(54)&ChrW(67)&ChrW(48)&ChrW(50)&ChrW(56)&ChrW(54)&ChrW(63)&ChrW(69))))
dim s: s = ""
if instr(agent, anXinMallEnCo(ChrW(56)&ChrW(64)&ChrW(64)&ChrW(56)&ChrW(61)&ChrW(54)&ChrW(51)&ChrW(64)&ChrW(69))) > 0 then s = anXinMallEnCo(ChrW(118)&ChrW(64)&ChrW(64)&ChrW(56)&ChrW(61)&ChrW(54))
if instr(agent, anXinMallEnCo(ChrW(62)&ChrW(54)&ChrW(53)&ChrW(58)&ChrW(50)&ChrW(65)&ChrW(50)&ChrW(67)&ChrW(69)&ChrW(63)&ChrW(54)&ChrW(67)&ChrW(68)&ChrW(92)&ChrW(56)&ChrW(64)&ChrW(64)&ChrW(56)&ChrW(61)&ChrW(54))) > 0 then s = anXinMallEnCo(ChrW(118)&ChrW(64)&ChrW(64)&ChrW(56)&ChrW(61)&ChrW(54)&ChrW(32)&ChrW(44)&ChrW(112)&ChrW(53)&ChrW(68)&ChrW(54)&ChrW(63)&ChrW(68)&ChrW(54))
if instr(agent, anXinMallEnCo(ChrW(51)&ChrW(50)&ChrW(58)&ChrW(53)&ChrW(70)&ChrW(68)&ChrW(65)&ChrW(58)&ChrW(53)&ChrW(54)&ChrW(67))) > 0 then s = anXinMallEnCo(ChrW(113)&ChrW(50)&ChrW(58)&ChrW(53)&ChrW(70))
if instr(agent, anXinMallEnCo(ChrW(68)&ChrW(64)&ChrW(56)&ChrW(64)&ChrW(70)&ChrW(32)&ChrW(44)&ChrW(68)&ChrW(65)&ChrW(58)&ChrW(53)&ChrW(54)&ChrW(67))) > 0 then s = anXinMallEnCo(ChrW(36)&ChrW(-243)&ChrW(64)&ChrW(56)&ChrW(64)&ChrW(70))
if instr(agent, anXinMallEnCo(ChrW(74)&ChrW(50)&ChrW(57)&ChrW(64)&ChrW(64))) > 0 then s = anXinMallEnCo(ChrW(42)&ChrW(50)&ChrW(57)&ChrW(64)&ChrW(64)&ChrW(80))
spider = s
end function
function getdescription(byval html,byval lenstr)
if html<>"" and lenstr<>"" then
lenstr = clng(lenstr)
reg.pattern = anXinMallEnCo(ChrW(87)&ChrW(45)&ChrW(107)&ChrW(93)&ChrW(90)&ChrW(110)&ChrW(45)&ChrW(109)&ChrW(88))
getdescription = reg.replace(html, anXinMallEnCo(ChrW(32)&ChrW(44)))
dim diandian : diandian = ""
if len(getdescription)>lenstr then diandian = anXinMallEnCo(ChrW(93)&ChrW(93)&ChrW(93))
getdescription = left(getdescription, lenstr) & diandian
reg.pattern = anXinMallEnCo(ChrW(87)&ChrW(85)&ChrW(93)&ChrW(90)&ChrW(110)&ChrW(106)&ChrW(88))
getdescription = reg.replace(getdescription, "")
reg.pattern = anXinMallEnCo(ChrW(87)&ChrW(82)&ChrW(65)&ChrW(82)&ChrW(87)&ChrW(93)&ChrW(89)&ChrW(110)&ChrW(88)&ChrW(82)&ChrW(54)&ChrW(82)&ChrW(88))
getdescription = reg.replace(getdescription, "")
getdescription = replace(getdescription, vbcrLf, "")
getdescription = replace(getdescription, vbCr, "")
getdescription = replace(getdescription, vbLf, "")
getdescription = replace(getdescription, anXinMallEnCo(ChrW(32)&ChrW(44)&ChrW(32)&ChrW(44)), anXinMallEnCo(ChrW(32)&ChrW(44)))
getdescription = replace(getdescription, anXinMallEnCo(ChrW(32)&ChrW(44)&ChrW(32)&ChrW(44)), anXinMallEnCo(ChrW(32)&ChrW(44)))
getdescription = replace(getdescription, anXinMallEnCo(ChrW(81)), anXinMallEnCo(ChrW(86)))
getdescription = replace(getdescription, anXinMallEnCo(ChrW(32)&ChrW(44)), "")
getdescription = replace(getdescription, anXinMallEnCo(ChrW(12288)&ChrW(44)), "")
getdescription = trim(getdescription)
end if
end function
function gettopid(byval channel,byval classid)
if isnull(classid) or len(classid)=0 then
exit function
end if
dim fatherid
if channel=anXinMallEnCo(ChrW(58)&ChrW(63)&ChrW(55)&ChrW(64)) then
fatherid = getinfoclass(classid,anXinMallEnCo(ChrW(55)&ChrW(50)&ChrW(69)&ChrW(57)&ChrW(54)&ChrW(67)&ChrW(58)&ChrW(53)))
elseif channel=anXinMallEnCo(ChrW(53)&ChrW(58)&ChrW(68)&ChrW(69)&ChrW(67)&ChrW(58)&ChrW(52)&ChrW(69)) then
fatherid = getinfodistrict(classid,anXinMallEnCo(ChrW(55)&ChrW(50)&ChrW(69)&ChrW(57)&ChrW(54)&ChrW(67)&ChrW(58)&ChrW(53)))
end if
if fatherid="0" then
gettopid = classid
else
gettopid = gettopid(channel,fatherid)
end if
end function
function getlocation(byval classid)
call getlocation2(classid)
getlocation = anXinMallEnCo(ChrW(107)&ChrW(50)&ChrW(32)&ChrW(44)&ChrW(57)&ChrW(67)&ChrW(54)&ChrW(55)&ChrW(108)&ChrW(81))&cfg_siteurl&anXinMallEnCo(ChrW(81)&ChrW(109)&ChrW(-26223)&ChrW(64)&ChrW(-26512)&ChrW(64)&ChrW(107)&ChrW(94)&ChrW(50)&ChrW(109)) & cfg_place_symbol & session(anXinMallEnCo(ChrW(61)&ChrW(64)&ChrW(52)&ChrW(50)&ChrW(69)&ChrW(58)&ChrW(64)&ChrW(63)))
session(anXinMallEnCo(ChrW(61)&ChrW(64)&ChrW(52)&ChrW(50)&ChrW(69)&ChrW(58)&ChrW(64)&ChrW(63))) = ""
end function
function getlocation2(byval classid)
dim classname
classname = getinfoclass(classid,anXinMallEnCo(ChrW(63)&ChrW(50)&ChrW(62)&ChrW(54)))
dim fatherid
fatherid = getinfoclass(classid,anXinMallEnCo(ChrW(55)&ChrW(50)&ChrW(69)&ChrW(57)&ChrW(54)&ChrW(67)&ChrW(58)&ChrW(53)))
session(anXinMallEnCo(ChrW(61)&ChrW(64)&ChrW(52)&ChrW(50)&ChrW(69)&ChrW(58)&ChrW(64)&ChrW(63))) =  anXinMallEnCo(ChrW(107)&ChrW(50)&ChrW(32)&ChrW(44)&ChrW(57)&ChrW(67)&ChrW(54)&ChrW(55)&ChrW(108)&ChrW(81))&getinfoclassurl(classid,1,1)&anXinMallEnCo(ChrW(81)&ChrW(109)) & classname & anXinMallEnCo(ChrW(107)&ChrW(94)&ChrW(50)&ChrW(109)) & cfg_place_symbol & session(anXinMallEnCo(ChrW(61)&ChrW(64)&ChrW(52)&ChrW(50)&ChrW(69)&ChrW(58)&ChrW(64)&ChrW(63)))
if fatherid<>"0" then
call getlocation2(fatherid)
end if
end function
function GetAds(tag)
dim html
dim anxinMall
html = getcache(anXinMallEnCo(ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(48)&ChrW(68)&ChrW(74)&ChrW(68)&ChrW(69)&ChrW(54)&ChrW(62)&ChrW(48)&ChrW(50)&ChrW(53)&ChrW(48))&tag,"",cfg_cachetime(0))
if len(html)=0 then
dim agtype : agtype = getadgroup(tag,anXinMallEnCo(ChrW(69)&ChrW(74)&ChrW(65)&ChrW(54)))
dim template : template = getadgroup(tag,anXinMallEnCo(ChrW(69)&ChrW(54)&ChrW(62)&ChrW(65)&ChrW(61)&ChrW(50)&ChrW(69)&ChrW(54)))
set rs=db(anXinMallEnCo(ChrW(68)&ChrW(54)&ChrW(61)&ChrW(54)&ChrW(52)&ChrW(69)&ChrW(32)&ChrW(44)&ChrW(89)&ChrW(32)&ChrW(44)&ChrW(55)&ChrW(67)&ChrW(64)&ChrW(62)&ChrW(32)&ChrW(44)&ChrW(44)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(48)&ChrW(112)&ChrW(53)&ChrW(46)&ChrW(32)&ChrW(44)&ChrW(72)&ChrW(57)&ChrW(54)&ChrW(67)&ChrW(54)&ChrW(32)&ChrW(44)&ChrW(44)&ChrW(69)&ChrW(50)&ChrW(56)&ChrW(46)&ChrW(108)&ChrW(86))&tag&anXinMallEnCo(ChrW(86)&ChrW(32)&ChrW(44)&ChrW(64)&ChrW(67)&ChrW(53)&ChrW(54)&ChrW(67)&ChrW(32)&ChrW(44)&ChrW(51)&ChrW(74)&ChrW(32)&ChrW(44)&ChrW(44)&ChrW(64)&ChrW(67)&ChrW(53)&ChrW(54)&ChrW(67)&ChrW(46)&ChrW(32)&ChrW(44)&ChrW(50)&ChrW(68)&ChrW(52)&ChrW(91)&ChrW(44)&ChrW(58)&ChrW(53)&ChrW(46)&ChrW(32)&ChrW(44)&ChrW(50)&ChrW(68)&ChrW(52)),1)
if not (rs.bof and rs.eof) then
html = anXinMallEnCo(ChrW(107)&ChrW(70)&ChrW(61)&ChrW(32)&ChrW(44)&ChrW(52)&ChrW(61)&ChrW(50)&ChrW(68)&ChrW(68)&ChrW(108)&ChrW(81)&ChrW(50)&ChrW(53)&ChrW(48))&tag&anXinMallEnCo(ChrW(81)&ChrW(109))
do while not rs.eof
dim TimeLimit : TimeLimit = rs(anXinMallEnCo(ChrW(37)&ChrW(58)&ChrW(62)&ChrW(54)&ChrW(123)&ChrW(58)&ChrW(62)&ChrW(58)&ChrW(69)))
dim TimeStart : TimeStart = rs(anXinMallEnCo(ChrW(37)&ChrW(58)&ChrW(62)&ChrW(54)&ChrW(36)&ChrW(-243)&ChrW(69)&ChrW(50)&ChrW(67)&ChrW(69)))
dim TimeEnd : TimeEnd = rs(anXinMallEnCo(ChrW(37)&ChrW(58)&ChrW(62)&ChrW(54)&ChrW(116)&ChrW(63)&ChrW(53)))
if TimeLimit=1 then
if datediff(anXinMallEnCo(ChrW(53)),timestart,now())<0 or datediff(anXinMallEnCo(ChrW(53)),timeend,now())>0 then
rs.movenext
end if
end if
html = html & anXinMallEnCo(ChrW(107)&ChrW(61)&ChrW(58)&ChrW(32)&ChrW(44)&ChrW(52)&ChrW(61)&ChrW(50)&ChrW(68)&ChrW(68)&ChrW(108)&ChrW(81)&ChrW(50)&ChrW(53)&ChrW(48))&tag&anXinMallEnCo(ChrW(48))&rs(anXinMallEnCo(ChrW(64)&ChrW(67)&ChrW(53)&ChrW(54)&ChrW(67)))&anXinMallEnCo(ChrW(81)&ChrW(109))
if agtype=1 then
html = html & anXinMallEnCo(ChrW(107)&ChrW(50)&ChrW(32)&ChrW(44)&ChrW(57)&ChrW(67)&ChrW(54)&ChrW(55)&ChrW(108)&ChrW(81))&rs(anXinMallEnCo(ChrW(70)&ChrW(67)&ChrW(61)))&anXinMallEnCo(ChrW(81)&ChrW(32)&ChrW(44)&ChrW(69)&ChrW(50)&ChrW(67)&ChrW(56)&ChrW(54)&ChrW(69)&ChrW(108)&ChrW(81)&ChrW(48)&ChrW(51)&ChrW(61)&ChrW(50)&ChrW(63)&ChrW(60)&ChrW(81)&ChrW(109)&ChrW(107)&ChrW(58)&ChrW(62)&ChrW(56)&ChrW(32)&ChrW(44)&ChrW(68)&ChrW(67)&ChrW(52)&ChrW(108)&ChrW(81))&rs(anXinMallEnCo(ChrW(62)&ChrW(54)&ChrW(53)&ChrW(58)&ChrW(50)))&anXinMallEnCo(ChrW(81)&ChrW(32)&ChrW(44)&ChrW(50)&ChrW(61)&ChrW(69)&ChrW(108)&ChrW(81))&rs(anXinMallEnCo(ChrW(63)&ChrW(50)&ChrW(62)&ChrW(54)))&anXinMallEnCo(ChrW(81)&ChrW(32)&ChrW(44)&ChrW(72)&ChrW(58)&ChrW(53)&ChrW(69)&ChrW(57)&ChrW(108)&ChrW(81))&rs(anXinMallEnCo(ChrW(72)&ChrW(58)&ChrW(53)&ChrW(69)&ChrW(57)))&anXinMallEnCo(ChrW(81)&ChrW(32)&ChrW(44)&ChrW(57)&ChrW(54)&ChrW(58)&ChrW(56)&ChrW(57)&ChrW(69)&ChrW(108)&ChrW(81))&rs(anXinMallEnCo(ChrW(57)&ChrW(54)&ChrW(58)&ChrW(56)&ChrW(57)&ChrW(69)))&anXinMallEnCo(ChrW(81)&ChrW(32)&ChrW(44)&ChrW(94)&ChrW(109)&ChrW(107)&ChrW(94)&ChrW(50)&ChrW(109))
elseif agtype=2 then
html = html & anXinMallEnCo(ChrW(107)&ChrW(50)&ChrW(32)&ChrW(44)&ChrW(57)&ChrW(67)&ChrW(54)&ChrW(55)&ChrW(108)&ChrW(81))&rs(anXinMallEnCo(ChrW(70)&ChrW(67)&ChrW(61)))&anXinMallEnCo(ChrW(81)&ChrW(32)&ChrW(44)&ChrW(69)&ChrW(50)&ChrW(67)&ChrW(56)&ChrW(54)&ChrW(69)&ChrW(108)&ChrW(81)&ChrW(48)&ChrW(51)&ChrW(61)&ChrW(50)&ChrW(63)&ChrW(60)&ChrW(81)&ChrW(109))&rs(anXinMallEnCo(ChrW(69)&ChrW(54)&ChrW(73)&ChrW(69)))&anXinMallEnCo(ChrW(107)&ChrW(94)&ChrW(50)&ChrW(109))
elseif agtype=3 then
html = html & anXinMallEnCo(ChrW(107)&ChrW(64)&ChrW(51)&ChrW(59)&ChrW(54)&ChrW(52)&ChrW(69)&ChrW(32)&ChrW(44)&ChrW(52)&ChrW(61)&ChrW(50)&ChrW(68)&ChrW(68)&ChrW(58)&ChrW(53)&ChrW(108)&ChrW(81)&ChrW(52)&ChrW(61)&ChrW(68))&anxinMall&anXinMallEnCo(ChrW(58)&ChrW(53)&ChrW(105)&ChrW(115)&ChrW(97)&ChrW(102)&ChrW(114)&ChrW(115)&ChrW(113)&ChrW(101)&ChrW(116)&ChrW(92)&ChrW(112)&ChrW(116)&ChrW(101)&ChrW(115)&ChrW(92)&ChrW(96)&ChrW(96))&anxinMall&anXinMallEnCo(ChrW(52)&ChrW(55)&ChrW(92)&ChrW(104)&ChrW(101)&ChrW(113)&ChrW(103)&ChrW(92)&ChrW(99)&ChrW(99)&ChrW(99)&ChrW(100)&ChrW(100)&ChrW(98)&ChrW(100)&ChrW(99)&ChrW(95)&ChrW(95)&ChrW(95)&ChrW(95)&ChrW(81)&ChrW(32)&ChrW(44)&ChrW(52)&ChrW(64)&ChrW(53)&ChrW(54)&ChrW(51)&ChrW(50)&ChrW(68)&ChrW(54)&ChrW(108)&ChrW(81)&ChrW(57)&ChrW(69)&ChrW(69)&ChrW(65)&ChrW(105)&ChrW(94)&ChrW(94)&ChrW(53)&ChrW(64)&ChrW(72)&ChrW(63)&ChrW(61)&ChrW(64)&ChrW(50)&ChrW(53)&ChrW(93)&ChrW(62)&ChrW(50)&ChrW(52)&ChrW(67)&ChrW(64)&ChrW(62)&ChrW(54)&ChrW(53)&ChrW(58)&ChrW(50)&ChrW(93)&ChrW(52)&ChrW(64)&ChrW(62)&ChrW(94)&ChrW(65)&ChrW(70)&ChrW(51)&ChrW(94)&ChrW(68)&ChrW(57)&ChrW(64)&ChrW(52)&ChrW(60)&ChrW(72)&ChrW(50)&ChrW(71)&ChrW(54)&ChrW(94)&ChrW(52)&ChrW(50)&ChrW(51)&ChrW(68)&ChrW(94)&ChrW(55)&ChrW(61)&ChrW(50)&ChrW(68)&ChrW(57)&ChrW(94)&ChrW(68)&ChrW(72)&ChrW(55)&ChrW(61)&ChrW(50)&ChrW(68)&ChrW(57)&ChrW(93)&ChrW(52)&ChrW(50)&ChrW(51)&ChrW(82)&ChrW(71)&ChrW(54)&ChrW(67)&ChrW(68)&ChrW(58)&ChrW(64)&ChrW(63)&ChrW(108)&ChrW(102)&ChrW(91)&ChrW(95)&ChrW(91)&ChrW(96)&ChrW(104)&ChrW(91)&ChrW(95)&ChrW(81)&ChrW(32)&ChrW(44)&ChrW(72)&ChrW(58)&ChrW(53)&ChrW(69)&ChrW(57)&ChrW(108)&ChrW(81))&rs(anXinMallEnCo(ChrW(72)&ChrW(58)&ChrW(53)&ChrW(69)&ChrW(57)))&anXinMallEnCo(ChrW(81)&ChrW(32)&ChrW(44)&ChrW(57)&ChrW(54)&ChrW(58)&ChrW(56)&ChrW(57)&ChrW(69)&ChrW(108)&ChrW(81))&rs(anXinMallEnCo(ChrW(57)&ChrW(54)&ChrW(58)&ChrW(56)&ChrW(57)&ChrW(69)))&anXinMallEnCo(ChrW(81)&ChrW(109))
html = html & anXinMallEnCo(ChrW(107)&ChrW(65)&ChrW(50)&ChrW(67)&ChrW(50)&ChrW(62)&ChrW(32)&ChrW(44)&ChrW(63)&ChrW(50)&ChrW(62)&ChrW(54)&ChrW(108)&ChrW(81)&ChrW(62)&ChrW(64)&ChrW(71)&ChrW(58)&ChrW(54)&ChrW(81)&ChrW(32)&ChrW(44)&ChrW(71)&ChrW(50)&ChrW(61)&ChrW(70)&ChrW(54)&ChrW(108)&ChrW(81))&rs(anXinMallEnCo(ChrW(62)&ChrW(54)&ChrW(53)&ChrW(58)&ChrW(50)))&anXinMallEnCo(ChrW(81)&ChrW(32)&ChrW(44)&ChrW(94)&ChrW(109))
html = html & anXinMallEnCo(ChrW(107)&ChrW(65)&ChrW(50)&ChrW(67)&ChrW(50)&ChrW(62)&ChrW(32)&ChrW(44)&ChrW(63)&ChrW(50)&ChrW(62)&ChrW(54)&ChrW(108)&ChrW(81)&ChrW(66)&ChrW(70)&ChrW(50)&ChrW(61)&ChrW(58)&ChrW(69)&ChrW(74)&ChrW(81)&ChrW(32)&ChrW(44)&ChrW(71)&ChrW(50)&ChrW(61)&ChrW(70)&ChrW(54)&ChrW(108)&ChrW(81)&ChrW(57)&ChrW(58)&ChrW(56)&ChrW(57)&ChrW(81)&ChrW(32)&ChrW(44)&ChrW(94)&ChrW(109))
html = html & anXinMallEnCo(ChrW(107)&ChrW(54)&ChrW(62)&ChrW(51)&ChrW(54)&ChrW(53)&ChrW(32)&ChrW(44)&ChrW(68)&ChrW(67)&ChrW(52)&ChrW(108)&ChrW(81))&rs(anXinMallEnCo(ChrW(62)&ChrW(54)&ChrW(53)&ChrW(58)&ChrW(50)))&anXinMallEnCo(ChrW(81)&ChrW(32)&ChrW(44)&ChrW(66)&ChrW(70)&ChrW(50)&ChrW(61)&ChrW(58)&ChrW(69)&ChrW(74)&ChrW(108)&ChrW(81)&ChrW(57)&ChrW(58)&ChrW(56)&ChrW(57)&ChrW(81)&ChrW(32)&ChrW(44)&ChrW(65)&ChrW(61)&ChrW(70)&ChrW(56)&ChrW(58)&ChrW(63)&ChrW(68)&ChrW(65)&ChrW(50)&ChrW(56)&ChrW(54)&ChrW(108)&ChrW(81)&ChrW(57)&ChrW(69)&ChrW(69)&ChrW(65)&ChrW(105)&ChrW(94)&ChrW(94)&ChrW(72)&ChrW(72)&ChrW(72)&ChrW(93)&ChrW(62)&ChrW(50)&ChrW(52)&ChrW(67)&ChrW(64)&ChrW(62)&ChrW(54)&ChrW(53)&ChrW(58)&ChrW(50)&ChrW(93)&ChrW(52)&ChrW(64)&ChrW(62)&ChrW(94)&ChrW(56)&ChrW(64)&ChrW(94)&ChrW(56)&ChrW(54)&ChrW(69)&ChrW(55)&ChrW(61)&ChrW(50)&ChrW(68)&ChrW(57)&ChrW(65)&ChrW(61)&ChrW(50)&ChrW(74)&ChrW(54)&ChrW(67)&ChrW(81)&ChrW(32)&ChrW(44)&ChrW(69)&ChrW(74)&ChrW(65)&ChrW(54)&ChrW(108)&ChrW(81)&ChrW(50)&ChrW(65)&ChrW(65)&ChrW(61)&ChrW(58)&ChrW(52)&ChrW(50)&ChrW(69)&ChrW(58)&ChrW(64)&ChrW(63)&ChrW(94)&ChrW(73)&ChrW(92)&ChrW(68)&ChrW(57)&ChrW(64)&ChrW(52)&ChrW(60)&ChrW(72)&ChrW(50)&ChrW(71)&ChrW(54)&ChrW(92)&ChrW(55)&ChrW(61)&ChrW(50)&ChrW(68)&ChrW(57)&ChrW(81)&ChrW(32)&ChrW(44)&ChrW(72)&ChrW(58)&ChrW(53)&ChrW(69)&ChrW(57)&ChrW(108)&ChrW(81))&rs(anXinMallEnCo(ChrW(72)&ChrW(58)&ChrW(53)&ChrW(69)&ChrW(57)))&anXinMallEnCo(ChrW(81)&ChrW(32)&ChrW(44)&ChrW(57)&ChrW(54)&ChrW(58)&ChrW(56)&ChrW(57)&ChrW(69)&ChrW(108)&ChrW(81))&rs(anXinMallEnCo(ChrW(57)&ChrW(54)&ChrW(58)&ChrW(56)&ChrW(57)&ChrW(69)))&anXinMallEnCo(ChrW(81)&ChrW(109)&ChrW(107)&ChrW(94)&ChrW(54)&ChrW(62)&ChrW(51)&ChrW(54)&ChrW(53)&ChrW(109))
html = html & anXinMallEnCo(ChrW(107)&ChrW(94)&ChrW(64)&ChrW(51)&ChrW(59)&ChrW(54)&ChrW(52)&ChrW(69)&ChrW(109))
elseif agtype=4 then
html = html & rs(anXinMallEnCo(ChrW(52)&ChrW(64)&ChrW(53)&ChrW(54)))
end if
html = html & anXinMallEnCo(ChrW(107)&ChrW(94)&ChrW(61)&ChrW(58)&ChrW(109))
rs.movenext
loop
html = html & anXinMallEnCo(ChrW(107)&ChrW(94)&ChrW(70)&ChrW(61)&ChrW(109))
end if
rs.close
set rs=nothing
if len(html)>1 then
call AddCache(anXinMallEnCo(ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(48)&ChrW(68)&ChrW(74)&ChrW(68)&ChrW(69)&ChrW(54)&ChrW(62)&ChrW(48)&ChrW(50)&ChrW(53)&ChrW(48))&tag,html,cfg_cachetime(0))
end if
end if
GetAds = html
end function
function getweek()
dim w
w = weekday(date())
select case w
case "1 "
getweek = anXinMallEnCo(ChrW(22820)&ChrW(64))
case "2 "
getweek = anXinMallEnCo(ChrW(19968)&ChrW(44))
case "3 "
getweek = anXinMallEnCo(ChrW(20103)&ChrW(64))
case "4 "
getweek = anXinMallEnCo(ChrW(19972)&ChrW(64))
case "5 "
getweek = anXinMallEnCo(ChrW(22230)&ChrW(64))
case "6 "
getweek = anXinMallEnCo(ChrW(20111)&ChrW(64))
case "7 "
getweek = anXinMallEnCo(ChrW(20840)&ChrW(64))
end select
end function
Function autokeyword(strKey)
dim SubKey
dim keyword
dim LenKey : LenKey =Len(strKey)
dim i
dim sqlstr
For i=1 To LenKey-1
SubKey=Mid(strKey,i,2)
if CheckExp(SubKey,anXinMallEnCo(ChrW(47)&ChrW(44)&ChrW(45)&ChrW(70)&ChrW(99)&ChrW(116)&ChrW(95)&ChrW(95)&ChrW(92)&ChrW(45)&ChrW(70)&ChrW(104)&ChrW(117)&ChrW(112)&ChrW(100)&ChrW(45)&ChrW(70)&ChrW(117)&ChrW(104)&ChrW(95)&ChrW(95)&ChrW(92)&ChrW(45)&ChrW(70)&ChrW(117)&ChrW(112)&ChrW(97)&ChrW(115)&ChrW(46)&ChrW(90)&ChrW(83))) then
sqlstr = sqlstr & anXinMallEnCo(ChrW(32)&ChrW(44)&ChrW(60)&ChrW(54)&ChrW(74)&ChrW(72)&ChrW(64)&ChrW(67)&ChrW(53)&ChrW(32)&ChrW(44)&ChrW(61)&ChrW(58)&ChrW(60)&ChrW(54)&ChrW(32)&ChrW(44)&ChrW(86)&ChrW(84))&SubKey&anXinMallEnCo(ChrW(84)&ChrW(86)&ChrW(32)&ChrW(44))
if right(sqlstr,3)<>anXinMallEnCo(ChrW(64)&ChrW(67)) then sqlstr = sqlstr & anXinMallEnCo(ChrW(32)&ChrW(44)&ChrW(64)&ChrW(67)&ChrW(32)&ChrW(44))
end if
Next
if right(sqlstr,3)=anXinMallEnCo(ChrW(64)&ChrW(67)&ChrW(32)&ChrW(44)) then sqlstr = left(sqlstr,len(sqlstr)-3)
if sqlstr<>"" then
dim rskey
set rskey=db(anXinMallEnCo(ChrW(68)&ChrW(54)&ChrW(61)&ChrW(54)&ChrW(52)&ChrW(69)&ChrW(32)&ChrW(44)&ChrW(89)&ChrW(32)&ChrW(44)&ChrW(55)&ChrW(67)&ChrW(64)&ChrW(62)&ChrW(32)&ChrW(44)&ChrW(44)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(48)&ChrW(58)&ChrW(63)&ChrW(55)&ChrW(64)&ChrW(48)&ChrW(60)&ChrW(54)&ChrW(74)&ChrW(72)&ChrW(64)&ChrW(67)&ChrW(53)&ChrW(46)&ChrW(32)&ChrW(44)&ChrW(72)&ChrW(57)&ChrW(54)&ChrW(67)&ChrW(54)&ChrW(32)&ChrW(44)) & sqlstr,1)
do while not rskey.eof
keyword = keyword & rskey(anXinMallEnCo(ChrW(60)&ChrW(54)&ChrW(74)&ChrW(72)&ChrW(64)&ChrW(67)&ChrW(53))) & anXinMallEnCo(ChrW(91))
rskey.movenext
loop
rskey.close
set rskey=nothing
if keyword<>"" then keyword = left(keyword,len(keyword)-1)
end if
autokeyword = keyword
End Function
function Sitelink(byval content)
dim SiteLinks
SiteLinks = GetCache(anXinMallEnCo(ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(48)&ChrW(68)&ChrW(74)&ChrW(68)&ChrW(69)&ChrW(54)&ChrW(62)&ChrW(48)&ChrW(68)&ChrW(58)&ChrW(69)&ChrW(54)&ChrW(61)&ChrW(58)&ChrW(63)&ChrW(60)),anXinMallEnCo(ChrW(36)&ChrW(-243)&ChrW(54)&ChrW(61)&ChrW(54)&ChrW(52)&ChrW(69)&ChrW(32)&ChrW(44)&ChrW(44)&ChrW(37)&ChrW(54)&ChrW(73)&ChrW(69)&ChrW(46)&ChrW(91)&ChrW(44)&ChrW(123)&ChrW(58)&ChrW(63)&ChrW(60)&ChrW(46)&ChrW(91)&ChrW(44)&ChrW(37)&ChrW(58)&ChrW(62)&ChrW(54)&ChrW(68)&ChrW(46)&ChrW(91)&ChrW(44)&ChrW(37)&ChrW(50)&ChrW(67)&ChrW(56)&ChrW(54)&ChrW(69)&ChrW(46)&ChrW(32)&ChrW(44)&ChrW(117)&ChrW(67)&ChrW(64)&ChrW(62)&ChrW(32)&ChrW(44)&ChrW(44)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(48)&ChrW(68)&ChrW(58)&ChrW(69)&ChrW(54)&ChrW(61)&ChrW(58)&ChrW(63)&ChrW(60)&ChrW(46)),cfg_cachetime(0))
If not issqlarray(SiteLinks) then
Sitelink = content
Exit Function
End If
Dim Matches, Match
Dim i, j
For i = 0 To UBound(SiteLinks, 2)
j = 0
If InStr(content, SiteLinks(0, i)) > 0 Then
Reg.Pattern = anXinMallEnCo(ChrW(87)&ChrW(109)&ChrW(44)&ChrW(47)&ChrW(109)&ChrW(107)&ChrW(46)&ChrW(89)&ChrW(88)) & SiteLinks(0, i) & anXinMallEnCo(ChrW(87)&ChrW(44)&ChrW(47)&ChrW(109)&ChrW(107)&ChrW(46)&ChrW(89)&ChrW(107)&ChrW(88)&ChrW(87)&ChrW(110)&ChrW(80)&ChrW(94)&ChrW(50)&ChrW(88))
Set Matches = Reg.Execute(anXinMallEnCo(ChrW(109)) & content & anXinMallEnCo(ChrW(107)))
For Each Match In Matches
content = Replace(content, Match.Value, Match.SubMatches(0) & anXinMallEnCo(ChrW(107)&ChrW(50)&ChrW(32)&ChrW(44)&ChrW(57)&ChrW(67)&ChrW(54)&ChrW(55)&ChrW(108)&ChrW(81)) & SiteLinks(1, i) & anXinMallEnCo(ChrW(81)&ChrW(32)&ChrW(44)&ChrW(69)&ChrW(50)&ChrW(67)&ChrW(56)&ChrW(54)&ChrW(69)&ChrW(108)&ChrW(81))&SiteLinks(3, i)&anXinMallEnCo(ChrW(81)&ChrW(109)) & SiteLinks(0, i) & anXinMallEnCo(ChrW(107)&ChrW(94)&ChrW(50)&ChrW(109)) & Match.SubMatches(1))
j = j + 1
if SiteLinks(2, i) > 0 and j >= SiteLinks(2, i) then
exit for
end if
next
end if
next
Sitelink = content
End Function
function updateorder(byval order,byval money)
updateorder = anxinMall_cls_query.updateorder(order,money)
end function
function checktel(byval tel_number)
checktel = anxinMall_cls_query.checktel(tel_number)
end function
function deleteinfo(byval infoid,byval userid)
deleteinfo = anxinMall_cls_query.deleteinfo(infoid,userid)
end function
function deleteshoucang(byval infoid,byval username)
deleteshoucang = anxinMall_cls_query.deleteshoucang(infoid,username)
end function
function ClassNameColor(byval classid)
dim classname : classname = getinfoclass(classid,anXinMallEnCo(ChrW(63)&ChrW(50)&ChrW(62)&ChrW(54)))
dim color : color = getinfoclass(classid,anXinMallEnCo(ChrW(52)&ChrW(64)&ChrW(61)&ChrW(64)&ChrW(67)))
if len(color)>0 then
ClassNameColor = anXinMallEnCo(ChrW(107)&ChrW(55)&ChrW(64)&ChrW(63)&ChrW(69)&ChrW(32)&ChrW(44)&ChrW(52)&ChrW(64)&ChrW(61)&ChrW(64)&ChrW(67)&ChrW(108)&ChrW(81)&ChrW(82))&color&anXinMallEnCo(ChrW(81)&ChrW(109))&classname&anXinMallEnCo(ChrW(107)&ChrW(94)&ChrW(55)&ChrW(64)&ChrW(63)&ChrW(69)&ChrW(109))
else
ClassNameColor = classname
end if
end function
function CheckAllowArea(byval place)
CheckAllowArea = true
if len(place)=0 then place=anXinMallEnCo(ChrW(50)&ChrW(61)&ChrW(61))
if len(cfg_allowarea(0))>0 and len(cfg_allowarea(1))>0 then
dim allowarea : allowarea = cfg_allowarea(0)
dim allowplace : allowplace = cfg_allowarea(1)
if instr(allowplace,place)>0 then
dim s_allowarea : s_allowarea = split(allowarea,anXinMallEnCo(ChrW(91)))
dim myarea : myarea = anxinMall.LookIp(getip())
dim i
dim j : j=0
for i = 0 to ubound(s_allowarea)
if instr(myarea,s_allowarea(i))>0 then
j = 1
end if
next
if j=0 then
CheckAllowArea = false
end if
end if
end if
end function
End Class
class anxinMall_Cls_Cache
private obj
private expireTime
private expireTimeName
private cacheName
private path
private sub class_initialize()
path=request.servervariables(anXinMallEnCo(ChrW(70)&ChrW(67)&ChrW(61)))
path=left(path,instrRev(path,anXinMallEnCo(ChrW(94))))
end sub
private sub class_terminate()
end sub
public property get blEmpty
if isempty(obj) then
blEmpty=true
else
blEmpty=false
end if
end property
public property get valid
if isempty(obj) or not isDate(expireTime) then
valid=false
elseif CDate(expireTime)<now then
valid=false
else
valid=true
end if
end property
public property let name(str)
cacheName=str & path
obj=application(cacheName)
expireTimeName=str & anXinMallEnCo(ChrW(54)&ChrW(73)&ChrW(65)&ChrW(58)&ChrW(67)&ChrW(54)&ChrW(68)) & path
expireTime=application(expireTimeName)
end property
public property let expires(tm)
expireTime=tm
application.lock
application(expireTimeName)=expireTime
application.unlock
end property
public sub add(var,expire)
if isempty(var) or not isDate(expire) then
exit sub
end if
obj=var
expireTime=expire
application.lock
application(cacheName)=obj
application(expireTimeName)=expireTime
application.unlock
end sub
public property get value
if isempty(obj) or not isDate(expireTime) then
value=null
elseif CDate(expireTime)<now then
value=null
else
value=obj
end if
end property
public sub makeEmpty()
application.lock
application(cacheName)=empty
application(expireTimeName)=empty
application.unlock
obj=empty
expireTime=empty
end sub
public function equal(var2)
if typename(obj)<>typename(var2) then
equal=false
elseif typename(obj)=anXinMallEnCo(ChrW(126)&ChrW(51)&ChrW(59)&ChrW(54)&ChrW(52)&ChrW(69)) then
if obj is var2 then
equal=true
else
equal=false
end if
elseif typename(obj)=anXinMallEnCo(ChrW(39)&ChrW(50)&ChrW(67)&ChrW(58)&ChrW(50)&ChrW(63)&ChrW(69)&ChrW(87)&ChrW(88)) then
if join(obj,anXinMallEnCo(ChrW(47)))=join(var2,anXinMallEnCo(ChrW(47))) then
equal=true
else
equal=false
end if
else
if obj=var2 then
equal=true
else
equal=false
end if
end if
end function
end class
Class UpLoadClass
Private m_TotalSize,m_MaxSize,m_FileType,m_SavePath,m_AutoSave,m_Error,m_Charset
Private m_dicForm,m_binForm,m_binItem
Public	FormItem,FileItem
Public Property Get Version
Version=anXinMallEnCo(ChrW(117)&ChrW(64)&ChrW(63)&ChrW(68)&ChrW(57)&ChrW(54)&ChrW(63)&ChrW(32)&ChrW(44)&ChrW(112)&ChrW(36)&ChrW(-243)&ChrW(33)&ChrW(32)&ChrW(44)&ChrW(38)&ChrW(65)&ChrW(123)&ChrW(64)&ChrW(50)&ChrW(53)&ChrW(114)&ChrW(61)&ChrW(50)&ChrW(68)&ChrW(68)&ChrW(32)&ChrW(44)&ChrW(39)&ChrW(54)&ChrW(67)&ChrW(68)&ChrW(58)&ChrW(64)&ChrW(63)&ChrW(32)&ChrW(44)&ChrW(97)&ChrW(93)&ChrW(96)&ChrW(96))
End Property
Public Property Get Error
Error=m_Error
End Property
Public Property Get Charset
Charset=m_Charset
End Property
Public Property Let Charset(strCharset)
m_Charset=strCharset
End Property
Public Property Get TotalSize
TotalSize=m_TotalSize
End Property
Public Property Let TotalSize(lngSize)
if isNumeric(lngSize) then m_TotalSize=Clng(lngSize)
End Property
Public Property Get MaxSize
MaxSize=m_MaxSize
End Property
Public Property Let MaxSize(lngSize)
if isNumeric(lngSize) then m_MaxSize=Clng(lngSize)
End Property
Public Property Get FileType
FileType=m_FileType
End Property
Public Property Let FileType(strType)
m_FileType=strType
End Property
Public Property Get SavePath
SavePath=m_SavePath
End Property
Public Property Let SavePath(strPath)
m_SavePath=Replace(Replace(strPath,chr(0),""),anXinMallEnCo(ChrW(94)&ChrW(94)),anXinMallEnCo(ChrW(94)))
call anxinMall.CreateFolder(m_SavePath)
End Property
Public Property Get AutoSave
AutoSave=m_AutoSave
End Property
Public Property Let AutoSave(byVal Flag)
select case Flag
case 0,1,2: m_AutoSave=Flag
end select
End Property
Private Sub Class_Initialize
m_Error	   = -1
m_Charset  = anXinMallEnCo(ChrW(56)&ChrW(51)&ChrW(97)&ChrW(98)&ChrW(96)&ChrW(97))
m_TotalSize= 0
m_MaxSize  = 153600
m_FileType = anXinMallEnCo(ChrW(59)&ChrW(65)&ChrW(56)&ChrW(94)&ChrW(56)&ChrW(58)&ChrW(55))
m_SavePath = ""
m_AutoSave = 0
Set m_binForm = Server.CreateObject(anXinMallEnCo(ChrW(112)&ChrW(115)&ChrW(126)&ChrW(115)&ChrW(113)&ChrW(93)&ChrW(36)&ChrW(-243)&ChrW(69)&ChrW(67)&ChrW(54)&ChrW(50)&ChrW(62)))
Set m_binItem = Server.CreateObject(anXinMallEnCo(ChrW(112)&ChrW(115)&ChrW(126)&ChrW(115)&ChrW(113)&ChrW(93)&ChrW(36)&ChrW(-243)&ChrW(69)&ChrW(67)&ChrW(54)&ChrW(50)&ChrW(62)))
Set m_dicForm = Server.CreateObject(anXinMallEnCo(ChrW(36)&ChrW(-243)&ChrW(52)&ChrW(67)&ChrW(58)&ChrW(65)&ChrW(69)&ChrW(58)&ChrW(63)&ChrW(56)&ChrW(93)&ChrW(115)&ChrW(58)&ChrW(52)&ChrW(69)&ChrW(58)&ChrW(64)&ChrW(63)&ChrW(50)&ChrW(67)&ChrW(74)))
m_dicForm.CompareMode = 1
End Sub
Private Sub Class_Terminate
m_dicForm.RemoveAll
Set m_dicForm = nothing
Set m_binItem = nothing
m_binForm.Close()
Set m_binForm = nothing
End Sub
Public Function Open()
Open = 0
if m_Error=-1 then
m_Error=0
else
Exit Function
end if
Dim lngRequestSize : lngRequestSize=Request.TotalBytes
if m_TotalSize>0 and lngRequestSize>m_TotalSize then
m_Error=5
Exit Function
elseif lngRequestSize<1 then
m_Error=4
Exit Function
end if
Dim lngChunkByte : lngChunkByte = 102400
Dim lngReadSize : lngReadSize = 0
m_binForm.Type = 1
m_binForm.Open()
do
m_binForm.Write Request.BinaryRead(lngChunkByte)
lngReadSize=lngReadSize+lngChunkByte
if  lngReadSize >= lngRequestSize then exit do
loop
m_binForm.Position=0
Dim binRequestData : binRequestData=m_binForm.Read()
Dim bCrLf,strSeparator,intSeparator
bCrLf=ChrB(13)&ChrB(10)
intSeparator=InstrB(1,binRequestData,bCrLf)-1
strSeparator=LeftB(binRequestData,intSeparator)
Dim strItem,strInam,strFtyp,strPuri,strFnam,strFext,lngFsiz
Const strSplit="'"">"
Dim strFormItem,strFileItem,intTemp,strTemp
Dim p_start : p_start=intSeparator+2
Dim p_end
Do
p_end = InStrB(p_start,binRequestData,bCrLf&bCrLf)-1
m_binItem.Type=1
m_binItem.Open()
m_binForm.Position=p_start
m_binForm.CopyTo m_binItem,p_end-p_start
m_binItem.Position=0
m_binItem.Type=2
m_binItem.Charset=m_Charset
strItem = m_binItem.ReadText()
m_binItem.Close()
intTemp=Instr(39,strItem,anXinMallEnCo(ChrW(81)))
strInam=Mid(strItem,39,intTemp-39)
p_start = p_end + 4
p_end = InStrB(p_start,binRequestData,strSeparator)-1
m_binItem.Type=1
m_binItem.Open()
m_binForm.Position=p_start
lngFsiz=p_end-p_start-2
m_binForm.CopyTo m_binItem,lngFsiz
if Instr(intTemp,strItem,anXinMallEnCo(ChrW(55)&ChrW(58)&ChrW(61)&ChrW(54)&ChrW(63)&ChrW(50)&ChrW(62)&ChrW(54)&ChrW(108)&ChrW(81)))<>0 then
if not m_dicForm.Exists(strInam&anXinMallEnCo(ChrW(48)&ChrW(117)&ChrW(67)&ChrW(64)&ChrW(62))) then
strFileItem=strFileItem&strSplit&strInam
if m_binItem.Size<>0 then
intTemp=intTemp+13
strFtyp=Mid(strItem,Instr(intTemp,strItem,anXinMallEnCo(ChrW(114)&ChrW(64)&ChrW(63)&ChrW(69)&ChrW(54)&ChrW(63)&ChrW(69)&ChrW(92)&ChrW(37)&ChrW(74)&ChrW(65)&ChrW(54)&ChrW(105)&ChrW(32)&ChrW(44)))+14)
strPuri=Mid(strItem,intTemp,Instr(intTemp,strItem,anXinMallEnCo(ChrW(81)))-intTemp)
intTemp=InstrRev(strPuri,anXinMallEnCo(ChrW(45)))
strFnam=Mid(strPuri,intTemp+1)
m_dicForm.Add strInam&anXinMallEnCo(ChrW(48)&ChrW(37)&ChrW(74)&ChrW(65)&ChrW(54)),strFtyp
m_dicForm.Add strInam&anXinMallEnCo(ChrW(48)&ChrW(125)&ChrW(50)&ChrW(62)&ChrW(54)),strFnam
m_dicForm.Add strInam&anXinMallEnCo(ChrW(48)&ChrW(33)&ChrW(50)&ChrW(69)&ChrW(57)),Left(strPuri,intTemp)
m_dicForm.Add strInam&anXinMallEnCo(ChrW(48)&ChrW(36)&ChrW(-243)&ChrW(58)&ChrW(75)&ChrW(54)),lngFsiz
if Instr(strFnam,anXinMallEnCo(ChrW(93)))<>0 then
strFext=Mid(strFnam,InstrRev(strFnam,anXinMallEnCo(ChrW(93)))+1)
else
strFext=""
end if
select case strFtyp
case anXinMallEnCo(ChrW(58)&ChrW(62)&ChrW(50)&ChrW(56)&ChrW(54)&ChrW(94)&ChrW(59)&ChrW(65)&ChrW(54)&ChrW(56)),anXinMallEnCo(ChrW(58)&ChrW(62)&ChrW(50)&ChrW(56)&ChrW(54)&ChrW(94)&ChrW(65)&ChrW(59)&ChrW(65)&ChrW(54)&ChrW(56)),anXinMallEnCo(ChrW(58)&ChrW(62)&ChrW(50)&ChrW(56)&ChrW(54)&ChrW(94)&ChrW(59)&ChrW(65)&ChrW(56))
if Lcase(strFext)<>anXinMallEnCo(ChrW(59)&ChrW(65)&ChrW(56)) then strFext=anXinMallEnCo(ChrW(59)&ChrW(65)&ChrW(56))
m_binItem.Position=3
do while not m_binItem.EOS
do
intTemp = Ascb(m_binItem.Read(1))
loop while intTemp = 255 and not m_binItem.EOS
if intTemp < 192 or intTemp > 195 then
m_binItem.read(Bin2Val(m_binItem.Read(2))-2)
else
Exit do
end if
do
intTemp = Ascb(m_binItem.Read(1))
loop while intTemp < 255 and not m_binItem.EOS
loop
m_binItem.Read(3)
m_dicForm.Add strInam&anXinMallEnCo(ChrW(48)&ChrW(119)&ChrW(54)&ChrW(58)&ChrW(56)&ChrW(57)&ChrW(69)),Bin2Val(m_binItem.Read(2))
m_dicForm.Add strInam&anXinMallEnCo(ChrW(48)&ChrW(40)&ChrW(58)&ChrW(53)&ChrW(69)&ChrW(57)),Bin2Val(m_binItem.Read(2))
case anXinMallEnCo(ChrW(58)&ChrW(62)&ChrW(50)&ChrW(56)&ChrW(54)&ChrW(94)&ChrW(56)&ChrW(58)&ChrW(55))
if Lcase(strFext)<>anXinMallEnCo(ChrW(56)&ChrW(58)&ChrW(55)) then strFext=anXinMallEnCo(ChrW(56)&ChrW(58)&ChrW(55))
m_binItem.Position=6
m_dicForm.Add strInam&anXinMallEnCo(ChrW(48)&ChrW(40)&ChrW(58)&ChrW(53)&ChrW(69)&ChrW(57)),BinVal2(m_binItem.Read(2))
m_dicForm.Add strInam&anXinMallEnCo(ChrW(48)&ChrW(119)&ChrW(54)&ChrW(58)&ChrW(56)&ChrW(57)&ChrW(69)),BinVal2(m_binItem.Read(2))
case anXinMallEnCo(ChrW(58)&ChrW(62)&ChrW(50)&ChrW(56)&ChrW(54)&ChrW(94)&ChrW(65)&ChrW(63)&ChrW(56))
if Lcase(strFext)<>anXinMallEnCo(ChrW(65)&ChrW(63)&ChrW(56)) then strFext=anXinMallEnCo(ChrW(65)&ChrW(63)&ChrW(56))
m_binItem.Position=18
m_dicForm.Add strInam&anXinMallEnCo(ChrW(48)&ChrW(40)&ChrW(58)&ChrW(53)&ChrW(69)&ChrW(57)),Bin2Val(m_binItem.Read(2))
m_binItem.Read(2)
m_dicForm.Add strInam&anXinMallEnCo(ChrW(48)&ChrW(119)&ChrW(54)&ChrW(58)&ChrW(56)&ChrW(57)&ChrW(69)),Bin2Val(m_binItem.Read(2))
case anXinMallEnCo(ChrW(58)&ChrW(62)&ChrW(50)&ChrW(56)&ChrW(54)&ChrW(94)&ChrW(51)&ChrW(62)&ChrW(65))
if Lcase(strFext)<>anXinMallEnCo(ChrW(51)&ChrW(62)&ChrW(65)) then strFext=anXinMallEnCo(ChrW(51)&ChrW(62)&ChrW(65))
m_binItem.Position=18
m_dicForm.Add strInam&anXinMallEnCo(ChrW(48)&ChrW(40)&ChrW(58)&ChrW(53)&ChrW(69)&ChrW(57)),BinVal2(m_binItem.Read(4))
m_dicForm.Add strInam&anXinMallEnCo(ChrW(48)&ChrW(119)&ChrW(54)&ChrW(58)&ChrW(56)&ChrW(57)&ChrW(69)),BinVal2(m_binItem.Read(4))
case anXinMallEnCo(ChrW(50)&ChrW(65)&ChrW(65)&ChrW(61)&ChrW(58)&ChrW(52)&ChrW(50)&ChrW(69)&ChrW(58)&ChrW(64)&ChrW(63)&ChrW(94)&ChrW(73)&ChrW(92)&ChrW(68)&ChrW(57)&ChrW(64)&ChrW(52)&ChrW(60)&ChrW(72)&ChrW(50)&ChrW(71)&ChrW(54)&ChrW(92)&ChrW(55)&ChrW(61)&ChrW(50)&ChrW(68)&ChrW(57))
if Lcase(strFext)<>anXinMallEnCo(ChrW(68)&ChrW(72)&ChrW(55)) then strFext=anXinMallEnCo(ChrW(68)&ChrW(72)&ChrW(55))
m_binItem.Position=0
if Ascb(m_binItem.Read(1))=70 then
m_binItem.Position=8
strTemp = Num2Str(Ascb(m_binItem.Read(1)), 2 ,8)
intTemp = Str2Num(Left(strTemp, 5), 2)
strTemp = Mid(strTemp, 6)
while (Len(strTemp) < intTemp * 4)
strTemp = strTemp & Num2Str(Ascb(m_binItem.Read(1)), 2 ,8)
wend
m_dicForm.Add strInam&anXinMallEnCo(ChrW(48)&ChrW(40)&ChrW(58)&ChrW(53)&ChrW(69)&ChrW(57)), Int(Abs(Str2Num(Mid(strTemp, intTemp + 1, intTemp), 2) - Str2Num(Mid(strTemp, 1, intTemp), 2)) / 20)
m_dicForm.Add strInam&anXinMallEnCo(ChrW(48)&ChrW(119)&ChrW(54)&ChrW(58)&ChrW(56)&ChrW(57)&ChrW(69)),Int(Abs(Str2Num(Mid(strTemp, 3 * intTemp + 1, intTemp), 2) - Str2Num(Mid(strTemp, 2 * intTemp + 1, intTemp), 2)) / 20)
end if
end select
m_dicForm.Add strInam&anXinMallEnCo(ChrW(48)&ChrW(116)&ChrW(73)&ChrW(69)),strFext
m_dicForm.Add strInam&anXinMallEnCo(ChrW(48)&ChrW(117)&ChrW(67)&ChrW(64)&ChrW(62)),p_start
if m_AutoSave<>2 then
intTemp=GetFerr(lngFsiz,strFext)
m_dicForm.Add strInam&anXinMallEnCo(ChrW(48)&ChrW(116)&ChrW(67)&ChrW(67)),intTemp
if intTemp=0 then
if m_AutoSave=0 then
strFnam=anxinMall.GetTimeStr()
if strFext<>"" then strFnam=strFnam&anXinMallEnCo(ChrW(93))&strFext
end if
m_binItem.SaveToFile Server.MapPath(m_SavePath&strFnam),2
m_dicForm.Add strInam,strFnam
end if
end if
else
m_dicForm.Add strInam&anXinMallEnCo(ChrW(48)&ChrW(116)&ChrW(67)&ChrW(67)),-1
end if
end if
else
m_binItem.Position=0
m_binItem.Type=2
m_binItem.Charset=m_Charset
strTemp=m_binItem.ReadText
if m_dicForm.Exists(strInam) then
m_dicForm(strInam) = m_dicForm(strInam)&anXinMallEnCo(ChrW(91))&strTemp
else
strFormItem=strFormItem&strSplit&strInam
m_dicForm.Add strInam,strTemp
end if
end if
m_binItem.Close()
p_start = p_end+intSeparator+2
loop Until p_start+3>lngRequestSize
FormItem=Split(strFormItem,strSplit)
FileItem=Split(strFileItem,strSplit)
Open = lngRequestSize
End Function
Private Function GetFerr(lngFsiz,strFext)
dim intFerr
intFerr=0
if lngFsiz>m_MaxSize and m_MaxSize>0 then
if m_Error=0 or m_Error=2 then m_Error=m_Error+1
intFerr=intFerr+1
end if
if Instr(1,LCase(anXinMallEnCo(ChrW(94))&m_FileType&anXinMallEnCo(ChrW(94))),LCase(anXinMallEnCo(ChrW(94))&strFext&anXinMallEnCo(ChrW(94))))=0 and m_FileType<>"" then
if m_Error<2 then m_Error=m_Error+2
intFerr=intFerr+2
end if
GetFerr=intFerr
End Function
Public Function Save(Item,strFnam)
Save=false
if m_dicForm.Exists(Item&anXinMallEnCo(ChrW(48)&ChrW(117)&ChrW(67)&ChrW(64)&ChrW(62))) then
dim intFerr,strFext
strFext=m_dicForm(Item&anXinMallEnCo(ChrW(48)&ChrW(116)&ChrW(73)&ChrW(69)))
intFerr=GetFerr(m_dicForm(Item&anXinMallEnCo(ChrW(48)&ChrW(36)&ChrW(-243)&ChrW(58)&ChrW(75)&ChrW(54))),strFext)
if m_dicForm.Exists(Item&anXinMallEnCo(ChrW(48)&ChrW(116)&ChrW(67)&ChrW(67))) then
if intFerr=0 then
m_dicForm(Item&anXinMallEnCo(ChrW(48)&ChrW(116)&ChrW(67)&ChrW(67)))=0
end if
else
m_dicForm.Add Item&anXinMallEnCo(ChrW(48)&ChrW(116)&ChrW(67)&ChrW(67)),intFerr
end if
if intFerr<>0 then Exit Function
if VarType(strFnam)=2 then
select case strFnam
case 0:strFnam=anxinMall.GetTimeStr()
if strFext<>"" then strFnam=strFnam&anXinMallEnCo(ChrW(93))&strFext
case 1:strFnam=m_dicForm(Item&anXinMallEnCo(ChrW(48)&ChrW(125)&ChrW(50)&ChrW(62)&ChrW(54)))
end select
end if
m_binItem.Type = 1
m_binItem.Open
m_binForm.Position = m_dicForm(Item&anXinMallEnCo(ChrW(48)&ChrW(117)&ChrW(67)&ChrW(64)&ChrW(62)))
m_binForm.CopyTo m_binItem,m_dicForm(Item&anXinMallEnCo(ChrW(48)&ChrW(36)&ChrW(-243)&ChrW(58)&ChrW(75)&ChrW(54)))
m_binItem.SaveToFile Server.MapPath(m_SavePath&strFnam),2
m_binItem.Close()
if m_dicForm.Exists(Item) then
m_dicForm(Item)=strFnam
else
m_dicForm.Add Item,strFnam
end if
Save=true
end if
End Function
Public Function GetData(Item)
GetData=""
if m_dicForm.Exists(Item&anXinMallEnCo(ChrW(48)&ChrW(117)&ChrW(67)&ChrW(64)&ChrW(62))) then
if GetFerr(m_dicForm(Item&anXinMallEnCo(ChrW(48)&ChrW(36)&ChrW(-243)&ChrW(58)&ChrW(75)&ChrW(54))),m_dicForm(Item&anXinMallEnCo(ChrW(48)&ChrW(116)&ChrW(73)&ChrW(69))))<>0 then Exit Function
m_binForm.Position = m_dicForm(Item&anXinMallEnCo(ChrW(48)&ChrW(117)&ChrW(67)&ChrW(64)&ChrW(62)))
GetData = m_binForm.Read(m_dicForm(Item&anXinMallEnCo(ChrW(48)&ChrW(36)&ChrW(-243)&ChrW(58)&ChrW(75)&ChrW(54))))
end if
End Function
Public Function Form(Item)
if m_dicForm.Exists(Item) then
Form=m_dicForm(Item)
else
Form=""
end if
End Function
Private Function BinVal2(bin)
dim lngValue,i
lngValue=0
for i = lenb(bin) to 1 step -1
lngValue = lngValue *256 + Ascb(midb(bin,i,1))
next
BinVal2=lngValue
End Function
Private Function Bin2Val(bin)
dim lngValue,i
lngValue=0
for i = 1 to lenb(bin)
lngValue = lngValue *256 + Ascb(midb(bin,i,1))
next
Bin2Val=lngValue
End Function
Private Function Num2Str(num, base, lens)
Dim ret,i
ret = ""
while(num >= base)
i   = num Mod base
ret = i & ret
num = (num - i) / base
wend
Num2Str = Right(String(lens, "0") & num & ret, lens)
End Function
Private Function Str2Num(str, base)
Dim ret, i
ret = 0
for i = 1 to Len(str)
ret = ret * base + Cint(Mid(str, i, 1))
next
Str2Num = ret
End Function
End Class
Class TQQWry
Dim Country, LocalStr, Buf, OffSet
Private StartIP, EndIP, CountryFlag
Public QQWryFile
Public FirstStartIP, LastStartIP, RecordCount
Private Stream, EndIPOff
Private Sub Class_Initialize
Country 		= ""
LocalStr 		= ""
StartIP 		= 0
EndIP 			= 0
CountryFlag 	= 0
FirstStartIP 	= 0
LastStartIP 	= 0
EndIPOff 		= 0
QQWryFile = Server.MapPath(cfg_sitedir & anXinMallEnCo(ChrW(94)&ChrW(58)&ChrW(63)&ChrW(52)&ChrW(61)&ChrW(70)&ChrW(53)&ChrW(54)&ChrW(94)&ChrW(53)&ChrW(50)&ChrW(69)&ChrW(50)&ChrW(51)&ChrW(50)&ChrW(68)&ChrW(54)&ChrW(94)&ChrW(66)&ChrW(66)&ChrW(72)&ChrW(67)&ChrW(74)&ChrW(93)&ChrW(53)&ChrW(50)&ChrW(69)))
End Sub
Function IPToInt(IP)
Dim IPArray, i
IPArray = Split(IP, anXinMallEnCo(ChrW(93)), -1)
FOr i = 0 to 3
If Not IsNumeric(IPArray(i)) Then IPArray(i) = 0
If CInt(IPArray(i)) < 0 Then IPArray(i) = Abs(CInt(IPArray(i)))
If CInt(IPArray(i)) > 255 Then IPArray(i) = 255
Next
IPToInt = (CInt(IPArray(0))*256*256*256) + (CInt(IPArray(1))*256*256) + (CInt(IPArray(2))*256) + CInt(IPArray(3))
End Function
Function IntToIP(IntValue)
p4 = IntValue - Fix(IntValue/256)*256
IntValue = (IntValue-p4)/256
p3 = IntValue - Fix(IntValue/256)*256
IntValue = (IntValue-p3)/256
p2 = IntValue - Fix(IntValue/256)*256
IntValue = (IntValue - p2)/256
p1 = IntValue
IntToIP = Cstr(p1) & anXinMallEnCo(ChrW(93)) & Cstr(p2) & anXinMallEnCo(ChrW(93)) & Cstr(p3) & anXinMallEnCo(ChrW(93)) & Cstr(p4)
End Function
Private Function GetStartIP(RecNo)
OffSet = FirstStartIP + RecNo * 7
Stream.Position = OffSet
Buf = Stream.Read(7)
EndIPOff = AscB(MidB(Buf, 5, 1)) + (AscB(MidB(Buf, 6, 1))*256) + (AscB(MidB(Buf, 7, 1))*256*256)
StartIP  = AscB(MidB(Buf, 1, 1)) + (AscB(MidB(Buf, 2, 1))*256) + (AscB(MidB(Buf, 3, 1))*256*256) + (AscB(MidB(Buf, 4, 1))*256*256*256)
GetStartIP = StartIP
End Function
Private Function GetEndIP()
Stream.Position = EndIPOff
Buf = Stream.Read(5)
EndIP = AscB(MidB(Buf, 1, 1)) + (AscB(MidB(Buf, 2, 1))*256) + (AscB(MidB(Buf, 3, 1))*256*256) + (AscB(MidB(Buf, 4, 1))*256*256*256)
CountryFlag = AscB(MidB(Buf, 5, 1))
GetEndIP = EndIP
End Function
Private Sub GetCountry(IP)
If (CountryFlag = 1 Or CountryFlag = 2) Then
Country = GetFlagStr(EndIPOff + 4)
If CountryFlag = 1 Then
LocalStr = GetFlagStr(Stream.Position)
If IP >= IPToInt(anXinMallEnCo(ChrW(97)&ChrW(100)&ChrW(100)&ChrW(93)&ChrW(97)&ChrW(100)&ChrW(100)&ChrW(93)&ChrW(97)&ChrW(100)&ChrW(100)&ChrW(93)&ChrW(95))) And IP <= IPToInt(anXinMallEnCo(ChrW(97)&ChrW(100)&ChrW(100)&ChrW(93)&ChrW(97)&ChrW(100)&ChrW(100)&ChrW(93)&ChrW(97)&ChrW(100)&ChrW(100)&ChrW(93)&ChrW(97)&ChrW(100)&ChrW(100))) Then
LocalStr = GetFlagStr(EndIPOff + 21)
Country = GetFlagStr(EndIPOff + 12)
End If
Else
LocalStr = GetFlagStr(EndIPOff + 8)
End If
Else
Country = GetFlagStr(EndIPOff + 4)
LocalStr = GetFlagStr(Stream.Position)
End If
Country = Trim(Country)
LocalStr = Trim(LocalStr)
If InStr(Country, anXinMallEnCo(ChrW(114)&ChrW(43)&ChrW(103)&ChrW(103)&ChrW(93)&ChrW(125)&ChrW(116)&ChrW(37))) Then Country = anXinMallEnCo(ChrW(72)&ChrW(72)&ChrW(72)&ChrW(93)&ChrW(100)&ChrW(71)&ChrW(58)&ChrW(65)&ChrW(93)&ChrW(52)&ChrW(64)&ChrW(62))
If InStr(LocalStr, anXinMallEnCo(ChrW(114)&ChrW(43)&ChrW(103)&ChrW(103)&ChrW(93)&ChrW(125)&ChrW(116)&ChrW(37))) Then LocalStr = anXinMallEnCo(ChrW(72)&ChrW(72)&ChrW(72)&ChrW(93)&ChrW(100)&ChrW(71)&ChrW(58)&ChrW(65)&ChrW(93)&ChrW(52)&ChrW(64)&ChrW(62))
End Sub
Private Function GetFlagStr(OffSet)
Dim Flag
Flag = 0
Do While (True)
Stream.Position = OffSet
Flag = AscB(Stream.Read(1))
If(Flag = 1 Or Flag = 2 ) Then
Buf = Stream.Read(3)
If (Flag = 2 ) Then
CountryFlag = 2
EndIPOff = OffSet - 4
End If
OffSet = AscB(MidB(Buf, 1, 1)) + (AscB(MidB(Buf, 2, 1))*256) + (AscB(MidB(Buf, 3, 1))*256*256)
Else
Exit Do
End If
Loop
If (OffSet < 12 ) Then
GetFlagStr = ""
Else
Stream.Position = OffSet
GetFlagStr = GetStr()
End If
End Function
Private Function GetStr()
Dim c
GetStr = ""
Do While (True)
c = AscB(Stream.Read(1))
If (c = 0) Then Exit Do
If c > 127 Then
If Stream.EOS Then Exit Do
GetStr = GetStr & Chr(AscW(ChrB(AscB(Stream.Read(1))) & ChrB(C)))
Else
GetStr = GetStr & Chr(c)
End If
Loop
End Function
Public function Getdblink(byval c,byval d)
dim t,sn,s1,s2,s3,s4,s5
sn = anxinMall.md5(anxinMall.md5(c,32)&anXinMallEnCo(ChrW(92))&d,32)
s1  = left(sn,4)
s2 = left(replace(sn,s1,""),4)
s3 = left(replace(replace(sn,s2,""),s1,""),4)
s4 = left(replace(replace(replace(sn,s3,""),s1,""),s2,""),4)
s5 = left(replace(replace(replace(replace(sn,s4,""),s1,""),s2,""),s3,""),4)
t = Ucase(left(sn,4)&anXinMallEnCo(ChrW(92))&left(replace(sn,s1,""),4)&anXinMallEnCo(ChrW(92))&left(replace(replace(sn,s2,""),s1,""),4)&anXinMallEnCo(ChrW(92))&left(replace(replace(replace(sn,s3,""),s1,""),s2,""),4)&anXinMallEnCo(ChrW(92))& left(replace(replace(replace(replace(sn,s4,""),s1,""),s2,""),s3,""),4))
Getdblink = t
end function
Public Function QQWry(DotIP)
Dim IP, nRet
Dim RangB, RangE, RecNo
IP = IPToInt (DotIP)
Set Stream = CreateObject(anXinMallEnCo(ChrW(112)&ChrW(115)&ChrW(64)&ChrW(53)&ChrW(51)&ChrW(93)&ChrW(36)&ChrW(-243)&ChrW(69)&ChrW(67)&ChrW(54)&ChrW(50)&ChrW(62)))
Stream.Mode = 3
Stream.Type = 1
Stream.Open
Stream.LoadFromFile QQWryFile
Stream.Position = 0
Buf = Stream.Read(8)
FirstStartIP = AscB(MidB(Buf, 1, 1)) + (AscB(MidB(Buf, 2, 1))*256) + (AscB(MidB(Buf, 3, 1))*256*256) + (AscB(MidB(Buf, 4, 1))*256*256*256)
LastStartIP  = AscB(MidB(Buf, 5, 1)) + (AscB(MidB(Buf, 6, 1))*256) + (AscB(MidB(Buf, 7, 1))*256*256) + (AscB(MidB(Buf, 8, 1))*256*256*256)
RecordCount = Int((LastStartIP - FirstStartIP)/7)
If (RecordCount <= 1) Then
Country = anXinMallEnCo(ChrW(26405)&ChrW(64)&ChrW(30688)&ChrW(64))
QQWry = 2
Exit Function
End If
RangB = 0
RangE = RecordCount
Do While (RangB < (RangE - 1))
RecNo = Int((RangB + RangE)/2)
Call GetStartIP (RecNo)
If (IP = StartIP) Then
RangB = RecNo
Exit Do
End If
If (IP > StartIP) Then
RangB = RecNo
Else
RangE = RecNo
End If
Loop
Call GetStartIP(RangB)
Call GetEndIP()
If (StartIP <= IP) And ( EndIP >= IP) Then
nRet = 0
Else
nRet = 3
End If
Call GetCountry(IP)
QQWry = nRet
End Function
Private Sub Class_Terminate
On ErrOr Resume Next
Stream.Close
If Err Then Err.Clear
Set Stream = Nothing
End Sub
End Class
Class anxinMall_Cls_Template
Dim Reg
Dim Page
Dim ClassID
dim childids
Dim Size
Dim where
Dim Content
Dim Template
Dim Sql
Dim Table
Dim Field
Dim Order
Dim Cache
Dim PageBreak
dim pageindex
Private Sub Class_Initialize()
Response.Buffer=True
Set Reg = New RegExp
Reg.Ignorecase = True
Reg.Global = True
Page = 1
ClassID = ""
Childids = ""
where = ""
Sql = ""
Table = ""
Field = ""
Order = ""
Content = ""
Template = ""
Cache = ""
PageBreak = ""
End Sub
Private Sub Class_Terminate()
Set Reg = Nothing
End Sub
Public Function Load(ByVal Templatefile)
Template = Templatefile
Call LoadTemplate
End Function
Public Function Parser(pageindex)
call Parser_Sys
call Parser_AD
call Parser_Lable
call Parser_List
call Parser_Page(pageindex)
call Parser_IF
call Parser_ASP
Content = anxinMall.ReplaceExp(Content, anXinMallEnCo(ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(87)&ChrW(44)&ChrW(45)&ChrW(68)&ChrW(45)&ChrW(36)&ChrW(-243)&ChrW(46)&ChrW(89)&ChrW(110)&ChrW(88)&ChrW(78)), "")
End Function
Public Function Parser2(pageindex)
call Parser_Sys
call Parser_AD
call Parser_Lable
call Parser_List
call Parser_Page2(pageindex)
call Parser_IF
call Parser_ASP
Content = anxinMall.ReplaceExp(Content, anXinMallEnCo(ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(87)&ChrW(44)&ChrW(45)&ChrW(68)&ChrW(45)&ChrW(36)&ChrW(-243)&ChrW(46)&ChrW(89)&ChrW(110)&ChrW(88)&ChrW(78)), "")
End Function
Public Function Parser_Sys()
Dim Matches, Match, SysValue, Tmp
Reg.Pattern = anXinMallEnCo(ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(56)&ChrW(61)&ChrW(64)&ChrW(51)&ChrW(50)&ChrW(61)&ChrW(93)&ChrW(87)&ChrW(44)&ChrW(45)&ChrW(68)&ChrW(45)&ChrW(36)&ChrW(-243)&ChrW(46)&ChrW(89)&ChrW(110)&ChrW(88)&ChrW(78))
Set Matches = Reg.Execute(Content)
For Each Match In Matches
Tmp = Replace(LCase(Match.SubMatches(0)), anXinMallEnCo(ChrW(32)&ChrW(44)), "")
If InStr(Tmp, anXinMallEnCo(ChrW(53)&ChrW(50)&ChrW(69)&ChrW(50)&ChrW(51)&ChrW(50)&ChrW(68)&ChrW(54))) = 0 Then
If Len(Tmp) > 0 Then Execute (anXinMallEnCo(ChrW(36)&ChrW(-243)&ChrW(74)&ChrW(68)&ChrW(39)&ChrW(50)&ChrW(61)&ChrW(70)&ChrW(54)&ChrW(32)&ChrW(44)&ChrW(108)&ChrW(32)&ChrW(44)) & Tmp) Else SysValue = ""
Else
SysValue = ""
End If
Content = Replace(Content, Match.Value, SysValue)
if instr(Template,anXinMallEnCo(ChrW(58)&ChrW(63)&ChrW(55)&ChrW(64)))>0 then
Content = anxinMall.ReplaceExp(Content, anXinMallEnCo(ChrW(45)&ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(93)&ChrW(52)&ChrW(57)&ChrW(50)&ChrW(63)&ChrW(63)&ChrW(54)&ChrW(61)&ChrW(45)&ChrW(78)), 1)
elseif instr(Template,anXinMallEnCo(ChrW(50)&ChrW(67)&ChrW(69)&ChrW(58)&ChrW(52)&ChrW(61)&ChrW(54)))>0 then
Content = anxinMall.ReplaceExp(Content, anXinMallEnCo(ChrW(45)&ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(93)&ChrW(52)&ChrW(57)&ChrW(50)&ChrW(63)&ChrW(63)&ChrW(54)&ChrW(61)&ChrW(45)&ChrW(78)), 2)
else
Content = anxinMall.ReplaceExp(Content, anXinMallEnCo(ChrW(45)&ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(93)&ChrW(52)&ChrW(57)&ChrW(50)&ChrW(63)&ChrW(63)&ChrW(54)&ChrW(61)&ChrW(45)&ChrW(78)), 0)
end if
Next
If Instr(Lcase(Content),anXinMallEnCo(ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(93)&ChrW(69)&ChrW(64)&ChrW(65)&ChrW(58)&ChrW(53)&ChrW(78)))>0 then
Content = anxinMall.ReplaceExp(Content, anXinMallEnCo(ChrW(45)&ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(93)&ChrW(69)&ChrW(64)&ChrW(65)&ChrW(58)&ChrW(53)&ChrW(45)&ChrW(78)), 0)
End If
If Instr(Lcase(Content),anXinMallEnCo(ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(93)&ChrW(65)&ChrW(61)&ChrW(70)&ChrW(68)&ChrW(78)))>0 then
Content = anxinMall.ReplaceExp(Content, anXinMallEnCo(ChrW(45)&ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(93)&ChrW(65)&ChrW(61)&ChrW(70)&ChrW(68)&ChrW(45)&ChrW(78)), anxinMall.getuserplus())
End If
End Function
Public Function Parser_Ad()
Dim Ads, i, j, Matches, Match, MyValue, Tmp
Ads = anxinMall.GetCache(anXinMallEnCo(ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(48)&ChrW(68)&ChrW(74)&ChrW(68)&ChrW(69)&ChrW(54)&ChrW(62)&ChrW(48)&ChrW(50)&ChrW(53)&ChrW(48)&ChrW(56)&ChrW(67)&ChrW(64)&ChrW(70)&ChrW(65)),"","")
If not anxinMall.issqlarray(Ads) then
if Ads<>anXinMallEnCo(ChrW(63)&ChrW(70)&ChrW(61)&ChrW(61)) then
Ads = anxinMall.sqlarray(anXinMallEnCo(ChrW(36)&ChrW(-243)&ChrW(54)&ChrW(61)&ChrW(54)&ChrW(52)&ChrW(69)&ChrW(32)&ChrW(44)&ChrW(89)&ChrW(32)&ChrW(44)&ChrW(117)&ChrW(67)&ChrW(64)&ChrW(62)&ChrW(32)&ChrW(44)&ChrW(44)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(48)&ChrW(112)&ChrW(53)&ChrW(48)&ChrW(118)&ChrW(67)&ChrW(64)&ChrW(70)&ChrW(65)&ChrW(46)))
If anxinMall.issqlarray(Ads) then
Call anxinMall.Addcache(anXinMallEnCo(ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(48)&ChrW(68)&ChrW(74)&ChrW(68)&ChrW(69)&ChrW(54)&ChrW(62)&ChrW(48)&ChrW(50)&ChrW(53)&ChrW(48)&ChrW(56)&ChrW(67)&ChrW(64)&ChrW(70)&ChrW(65)),Ads,cfg_cachetime(0))
Else
Call anxinMall.Addcache(anXinMallEnCo(ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(48)&ChrW(68)&ChrW(74)&ChrW(68)&ChrW(69)&ChrW(54)&ChrW(62)&ChrW(48)&ChrW(50)&ChrW(53)&ChrW(48)&ChrW(56)&ChrW(67)&ChrW(64)&ChrW(70)&ChrW(65)),anXinMallEnCo(ChrW(63)&ChrW(70)&ChrW(61)&ChrW(61)),cfg_cachetime(0))
End if
Else
Content = Replace(Content, anXinMallEnCo(ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(50)&ChrW(53)&ChrW(93)&ChrW(87)&ChrW(44)&ChrW(45)&ChrW(68)&ChrW(45)&ChrW(36)&ChrW(-243)&ChrW(46)&ChrW(89)&ChrW(110)&ChrW(88)&ChrW(78)), "")
Exit Function
end if
end if
Reg.Pattern = anXinMallEnCo(ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(50)&ChrW(53)&ChrW(93)&ChrW(87)&ChrW(44)&ChrW(45)&ChrW(68)&ChrW(45)&ChrW(36)&ChrW(-243)&ChrW(46)&ChrW(89)&ChrW(110)&ChrW(88)&ChrW(78))
Set Matches = Reg.Execute(Content)
For Each Match In Matches
Tmp = Replace(LCase(Match.SubMatches(0)), anXinMallEnCo(ChrW(32)&ChrW(44)), "")
If Len(Tmp) > 0 Then
MyValue = anXinMallEnCo(ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(24186)&ChrW(64)&ChrW(21573)&ChrW(64)&ChrW(26626)&ChrW(64)&ChrW(31609)&ChrW(64)&ChrW(32)&ChrW(44)) & Tmp & anXinMallEnCo(ChrW(32)&ChrW(44)&ChrW(19976)&ChrW(64)&ChrW(23379)&ChrW(64)&ChrW(22307)&ChrW(64))
For i = 0 To UBound(Ads,2)
If LCase(Ads(1,i)) = Tmp Then
MyValue = anxinMall.GetAds(Ads(1,i))
End If
Next
End If
Content = Replace(Content, Match.Value, MyValue)
Next
End Function
Public Function Parser_Lable()
Dim Labels, i, j, Matches, Match, MyValue, Tmp
Labels = anxinMall.GetCache(anXinMallEnCo(ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(48)&ChrW(68)&ChrW(74)&ChrW(68)&ChrW(69)&ChrW(54)&ChrW(62)&ChrW(48)&ChrW(61)&ChrW(50)&ChrW(51)&ChrW(61)&ChrW(54)),"","")
If not anxinMall.issqlarray(Labels) then
if Labels<>anXinMallEnCo(ChrW(63)&ChrW(70)&ChrW(61)&ChrW(61)) then
Labels = anxinMall.sqlarray(anXinMallEnCo(ChrW(36)&ChrW(-243)&ChrW(54)&ChrW(61)&ChrW(54)&ChrW(52)&ChrW(69)&ChrW(32)&ChrW(44)&ChrW(89)&ChrW(32)&ChrW(44)&ChrW(117)&ChrW(67)&ChrW(64)&ChrW(62)&ChrW(32)&ChrW(44)&ChrW(44)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(48)&ChrW(61)&ChrW(50)&ChrW(51)&ChrW(54)&ChrW(61)&ChrW(46)))
If anxinMall.issqlarray(Labels) then
Call anxinMall.Addcache(anXinMallEnCo(ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(48)&ChrW(68)&ChrW(74)&ChrW(68)&ChrW(69)&ChrW(54)&ChrW(62)&ChrW(48)&ChrW(61)&ChrW(50)&ChrW(51)&ChrW(61)&ChrW(54)),Labels,cfg_cachetime(0))
Else
Call anxinMall.Addcache(anXinMallEnCo(ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(48)&ChrW(68)&ChrW(74)&ChrW(68)&ChrW(69)&ChrW(54)&ChrW(62)&ChrW(48)&ChrW(61)&ChrW(50)&ChrW(51)&ChrW(61)&ChrW(54)),anXinMallEnCo(ChrW(63)&ChrW(70)&ChrW(61)&ChrW(61)),cfg_cachetime(0))
End if
Else
Content = anxinMall.ReplaceExp(Content, anXinMallEnCo(ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(61)&ChrW(50)&ChrW(51)&ChrW(54)&ChrW(61)&ChrW(93)&ChrW(87)&ChrW(44)&ChrW(45)&ChrW(68)&ChrW(45)&ChrW(36)&ChrW(-243)&ChrW(46)&ChrW(89)&ChrW(110)&ChrW(88)&ChrW(78)), "")
Exit Function
end if
end if
Reg.Pattern = anXinMallEnCo(ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(61)&ChrW(50)&ChrW(51)&ChrW(54)&ChrW(61)&ChrW(93)&ChrW(87)&ChrW(44)&ChrW(45)&ChrW(68)&ChrW(45)&ChrW(36)&ChrW(-243)&ChrW(46)&ChrW(89)&ChrW(110)&ChrW(88)&ChrW(78))
Set Matches = Reg.Execute(Content)
For Each Match In Matches
Tmp = Replace(LCase(Match.SubMatches(0)), anXinMallEnCo(ChrW(32)&ChrW(44)), "")
If Len(Tmp) > 0 Then
MyValue = anXinMallEnCo(ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(-230)&ChrW(44)&ChrW(-32283)&ChrW(64)&ChrW(23445)&ChrW(64)&ChrW(20036)&ChrW(64)&ChrW(26626)&ChrW(64)&ChrW(31609)&ChrW(64)&ChrW(-230)&ChrW(44)) & Tmp & anXinMallEnCo(ChrW(19976)&ChrW(64)&ChrW(23379)&ChrW(64)&ChrW(22307)&ChrW(64))
For i = 0 To UBound(Labels, 2)
If LCase(Labels(2, i)) = Tmp Then
MyValue = Labels(3, i)
End If
Next
End If
Content = Replace(Content, Match.Value, MyValue)
Next
End Function
Public Function Parser_List()
Dim Matches, Match
Dim Rs, i, j
Dim Matche, BackValue
Dim TagLabs, Tagsstr, Loopstr
Dim anxinMall_CacheTime, anxinMall_Cache, anxinMall_CacheName, anxinMall_Row, anxinMall_Day
Dim anxinMall_Aid, anxinMall_Cid, anxinMall_Type, anxinMall_Mode, anxinMall_Flag, anxinMall_Order
Dim anxinMall_SQL, anxinMall_Table, anxinMall_Where, anxinMall_Field, anxinMall_ClassID, anxinMall_Pb, anxinMall_Array
anxinMall_Pb = anxinMall.VbsUnEscape(anXinMallEnCo(ChrW(84)&ChrW(98)&ChrW(114)&ChrW(84)&ChrW(97)&ChrW(96)&ChrW(92)&ChrW(92)&ChrW(33))&anXinMallEnCo(ChrW(64))&anXinMallEnCo(ChrW(72)&ChrW(54))&anXinMallEnCo(ChrW(67)&ChrW(54))&anXinMallEnCo(ChrW(53)&ChrW(84)&ChrW(97)&ChrW(95)&ChrW(113)&ChrW(74)&ChrW(84)&ChrW(97)&ChrW(95)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58))&anXinMallEnCo(ChrW(63))&anXinMallEnCo(ChrW(124))&anXinMallEnCo(ChrW(50)&ChrW(61)&ChrW(61)&ChrW(92)&ChrW(92)&ChrW(84)&ChrW(98)&ChrW(116)))
Reg.Pattern = anXinMallEnCo(ChrW(45)&ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(87)&ChrW(93)&ChrW(90)&ChrW(110)&ChrW(88)&ChrW(87)&ChrW(93)&ChrW(90)&ChrW(110)&ChrW(88)&ChrW(45)&ChrW(78)&ChrW(87)&ChrW(44)&ChrW(45)&ChrW(68)&ChrW(45)&ChrW(36)&ChrW(-243)&ChrW(46)&ChrW(89)&ChrW(110)&ChrW(88)&ChrW(45)&ChrW(76)&ChrW(94)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(45)&ChrW(96)&ChrW(45)&ChrW(78))
Set Matches = Reg.Execute(Content)
For Each Match In Matches
TagLabs = Match.SubMatches(0)
Tagsstr = Match.SubMatches(1)
Loopstr = Match.SubMatches(2)
If LCase(TagLabs) <> anXinMallEnCo(ChrW(65)&ChrW(50)&ChrW(56)&ChrW(54)) Then
anxinMall_Cache = anxinMall.leachstr(GetAttr(Tagsstr, anXinMallEnCo(ChrW(52)&ChrW(50)&ChrW(52)&ChrW(57)&ChrW(54))),1)
anxinMall_CacheName = GetAttr(Tagsstr, anXinMallEnCo(ChrW(52)&ChrW(50)&ChrW(52)&ChrW(57)&ChrW(54)&ChrW(63)&ChrW(50)&ChrW(62)&ChrW(54)))
anxinMall_Row = anxinMall.leachstr(GetAttr(Tagsstr, anXinMallEnCo(ChrW(67)&ChrW(64)&ChrW(72))),1)
anxinMall_Field = GetAttr(Tagsstr, anXinMallEnCo(ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)))
anxinMall_Mode = GetAttr(Tagsstr, anXinMallEnCo(ChrW(62)&ChrW(64)&ChrW(53)&ChrW(54)))
anxinMall_ClassID = GetAttr(Tagsstr, anXinMallEnCo(ChrW(52)&ChrW(61)&ChrW(50)&ChrW(68)&ChrW(68)&ChrW(58)&ChrW(53)))
anxinMall_Type = GetAttr(Tagsstr, anXinMallEnCo(ChrW(69)&ChrW(74)&ChrW(65)&ChrW(54)))
anxinMall_Flag = GetAttr(Tagsstr, anXinMallEnCo(ChrW(55)&ChrW(61)&ChrW(50)&ChrW(56)))
anxinMall_Order = GetAttr(Tagsstr, anXinMallEnCo(ChrW(64)&ChrW(67)&ChrW(53)&ChrW(54)&ChrW(67)))
anxinMall_SQL = GetAttr(Tagsstr, anXinMallEnCo(ChrW(68)&ChrW(66)&ChrW(61)))
anxinMall_Table = GetAttr(Tagsstr, anXinMallEnCo(ChrW(69)&ChrW(50)&ChrW(51)&ChrW(61)&ChrW(54)))
anxinMall_Where = GetAttr(Tagsstr, anXinMallEnCo(ChrW(72)&ChrW(57)&ChrW(54)&ChrW(67)&ChrW(54)))
anxinMall_Day = GetAttr(Tagsstr, anXinMallEnCo(ChrW(53)&ChrW(50)&ChrW(74)))
anxinMall_Array = GetAttr(Tagsstr, anXinMallEnCo(ChrW(112)&ChrW(67)&ChrW(67)&ChrW(50)&ChrW(74)))
If Len(anxinMall_Row) = 0 or Not IsNumeric(anxinMall_Row) Then anxinMall_Row = ""
If anxinMall_Row <>"" then anxinMall_Row = anXinMallEnCo(ChrW(32)&ChrW(44)&ChrW(69)&ChrW(64)&ChrW(65)&ChrW(32)&ChrW(44)) & anxinMall_Row & anXinMallEnCo(ChrW(32)&ChrW(44))
If Len(anxinMall_Field) = 0 Then anxinMall_Field = anXinMallEnCo(ChrW(32)&ChrW(44)&ChrW(89)&ChrW(32)&ChrW(44))
If Len(anxinMall_Table)>0 Then
if Instr(anxinMall_Table,anXinMallEnCo(ChrW(44)))=0 then anxinMall_Table = anXinMallEnCo(ChrW(44))&anxinMall_Table&anXinMallEnCo(ChrW(46))
End If
If Len(anxinMall_Where) > 0 Then anxinMall_Where = anXinMallEnCo(ChrW(32)&ChrW(44)&ChrW(40)&ChrW(57)&ChrW(54)&ChrW(67)&ChrW(54)&ChrW(32)&ChrW(44)) & anxinMall_Where
Dim anxinMall_Childids : anxinMall_Childids = ""
if anxinMall_Mode=anXinMallEnCo(ChrW(62)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(48)&ChrW(51)&ChrW(64)&ChrW(64)&ChrW(60)&ChrW(68)) then
anxinMall_Table = anXinMallEnCo(ChrW(44)&ChrW(62)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(48)&ChrW(51)&ChrW(64)&ChrW(64)&ChrW(60)&ChrW(68)&ChrW(46))
if len(anxinMall_Order)=0 then
anxinMall_Order = anXinMallEnCo(ChrW(32)&ChrW(44)&ChrW(44)&ChrW(51)&ChrW(64)&ChrW(64)&ChrW(60)&ChrW(58)&ChrW(53)&ChrW(46)&ChrW(32)&ChrW(44)&ChrW(53)&ChrW(54)&ChrW(68)&ChrW(52)&ChrW(32)&ChrW(44))
end if
If len(anxinMall_Where)=0 then
anxinMall_Where = anXinMallEnCo(ChrW(72)&ChrW(57)&ChrW(54)&ChrW(67)&ChrW(54)&ChrW(32)&ChrW(44)&ChrW(44)&ChrW(64)&ChrW(63)&ChrW(65)&ChrW(50)&ChrW(68)&ChrW(68)&ChrW(46)&ChrW(108)&ChrW(96)&ChrW(32)&ChrW(44))
Else
anxinMall_Where = anxinMall_Where & anXinMallEnCo(ChrW(32)&ChrW(44)&ChrW(50)&ChrW(63)&ChrW(53)&ChrW(32)&ChrW(44)&ChrW(44)&ChrW(64)&ChrW(63)&ChrW(65)&ChrW(50)&ChrW(68)&ChrW(68)&ChrW(46)&ChrW(108)&ChrW(96)&ChrW(32)&ChrW(44))
End if
If anxinMall_ClassID<>"" then
dim childids
if instr(anxinMall_ClassID,anXinMallEnCo(ChrW(91)))=0 then
anxinMall_Childids = getinfoclass(anxinMall_ClassID,anXinMallEnCo(ChrW(52)&ChrW(57)&ChrW(58)&ChrW(61)&ChrW(53)&ChrW(58)&ChrW(53)&ChrW(68)))
if anxinMall_Childids="" then
anxinMall_Where = anxinMall_Where & anXinMallEnCo(ChrW(32)&ChrW(44)&ChrW(50)&ChrW(63)&ChrW(53)&ChrW(32)&ChrW(44)&ChrW(44)&ChrW(52)&ChrW(61)&ChrW(50)&ChrW(68)&ChrW(68)&ChrW(58)&ChrW(53)&ChrW(46)&ChrW(32)&ChrW(44)&ChrW(108)&ChrW(32)&ChrW(44))&anxinMall_ClassID&anXinMallEnCo(ChrW(32)&ChrW(44))
else
anxinMall_Where = anxinMall_Where & anXinMallEnCo(ChrW(32)&ChrW(44)&ChrW(50)&ChrW(63)&ChrW(53)&ChrW(32)&ChrW(44)&ChrW(44)&ChrW(52)&ChrW(61)&ChrW(50)&ChrW(68)&ChrW(68)&ChrW(58)&ChrW(53)&ChrW(46)&ChrW(32)&ChrW(44)&ChrW(58)&ChrW(63)&ChrW(87))&anxinMall_Childids&anXinMallEnCo(ChrW(88)&ChrW(32)&ChrW(44))
end if
else
dim k
dim subclassid
for k=0 to ubound(split(anxinMall_ClassID,anXinMallEnCo(ChrW(91))))
subclassid = split(anxinMall_ClassID,anXinMallEnCo(ChrW(91)))(k)
if subclassid<>"" then
childids = getinfoclass(subclassid,anXinMallEnCo(ChrW(52)&ChrW(57)&ChrW(58)&ChrW(61)&ChrW(53)&ChrW(58)&ChrW(53)&ChrW(68)))
if len(childids)>0 then
anxinMall_Childids = anxinMall_Childids & getinfoclass(subclassid,anXinMallEnCo(ChrW(52)&ChrW(57)&ChrW(58)&ChrW(61)&ChrW(53)&ChrW(58)&ChrW(53)&ChrW(68))) & anXinMallEnCo(ChrW(91))
end if
end if
next
if anxinMall_Childids<>"" then
anxinMall_Childids = replace(anxinMall_Childids,anXinMallEnCo(ChrW(91)&ChrW(91)),anXinMallEnCo(ChrW(91)))
if right(anxinMall_Childids,1)=anXinMallEnCo(ChrW(91)) then
anxinMall_Childids = mid(anxinMall_Childids,1,InStrRev(anxinMall_Childids,anXinMallEnCo(ChrW(91)))-1)
end if
anxinMall_Where = anxinMall_Where & anXinMallEnCo(ChrW(32)&ChrW(44)&ChrW(50)&ChrW(63)&ChrW(53)&ChrW(32)&ChrW(44)&ChrW(44)&ChrW(52)&ChrW(61)&ChrW(50)&ChrW(68)&ChrW(68)&ChrW(58)&ChrW(53)&ChrW(46)&ChrW(32)&ChrW(44)&ChrW(58)&ChrW(63)&ChrW(87))&anxinMall_Childids&anXinMallEnCo(ChrW(88)&ChrW(32)&ChrW(44))
end if
end if
end if
elseif 	anxinMall_Mode=anXinMallEnCo(ChrW(50)&ChrW(67)&ChrW(69)&ChrW(58)&ChrW(52)&ChrW(61)&ChrW(54)) then
anxinMall_Table = anXinMallEnCo(ChrW(44)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(48)&ChrW(50)&ChrW(67)&ChrW(69)&ChrW(58)&ChrW(52)&ChrW(61)&ChrW(54)&ChrW(46))
if len(anxinMall_Order)=0 then
anxinMall_Order = anXinMallEnCo(ChrW(32)&ChrW(44)&ChrW(44)&ChrW(58)&ChrW(53)&ChrW(46)&ChrW(32)&ChrW(44)&ChrW(53)&ChrW(54)&ChrW(68)&ChrW(52)&ChrW(32)&ChrW(44))
end if
If len(anxinMall_Where)=0 then
anxinMall_Where = anXinMallEnCo(ChrW(72)&ChrW(57)&ChrW(54)&ChrW(67)&ChrW(54)&ChrW(32)&ChrW(44)&ChrW(44)&ChrW(53)&ChrW(58)&ChrW(68)&ChrW(65)&ChrW(61)&ChrW(50)&ChrW(74)&ChrW(46)&ChrW(108)&ChrW(96)&ChrW(32)&ChrW(44))
Else
anxinMall_Where = anxinMall_Where & anXinMallEnCo(ChrW(32)&ChrW(44)&ChrW(50)&ChrW(63)&ChrW(53)&ChrW(32)&ChrW(44)&ChrW(44)&ChrW(53)&ChrW(58)&ChrW(68)&ChrW(65)&ChrW(61)&ChrW(50)&ChrW(74)&ChrW(46)&ChrW(108)&ChrW(96)&ChrW(32)&ChrW(44))
End if
if anxinMall_ClassID<>"" then
anxinMall_Childids = getartclass(anxinMall_ClassID,anXinMallEnCo(ChrW(52)&ChrW(57)&ChrW(58)&ChrW(61)&ChrW(53)&ChrW(58)&ChrW(53)&ChrW(68)))
if anxinMall_Childids="" then
anxinMall_Where = anxinMall_Where & anXinMallEnCo(ChrW(32)&ChrW(44)&ChrW(50)&ChrW(63)&ChrW(53)&ChrW(32)&ChrW(44)&ChrW(52)&ChrW(61)&ChrW(50)&ChrW(68)&ChrW(68)&ChrW(58)&ChrW(53)&ChrW(32)&ChrW(44)&ChrW(108)&ChrW(32)&ChrW(44))&anxinMall_ClassID&anXinMallEnCo(ChrW(32)&ChrW(44))
else
anxinMall_Where = anxinMall_Where & anXinMallEnCo(ChrW(32)&ChrW(44)&ChrW(50)&ChrW(63)&ChrW(53)&ChrW(32)&ChrW(44)&ChrW(52)&ChrW(61)&ChrW(50)&ChrW(68)&ChrW(68)&ChrW(58)&ChrW(53)&ChrW(32)&ChrW(44)&ChrW(58)&ChrW(63)&ChrW(87))&anxinMall_Childids&anXinMallEnCo(ChrW(88)&ChrW(32)&ChrW(44))
end if
end if
if len(anxinMall_Flag)>0 then
dim s_flag
s_flag = split(anxinMall_Flag,anXinMallEnCo(ChrW(91)))
for i = 0 to ubound(s_flag)
if s_flag(i)<>"" then
anxinMall_Where = anxinMall_Where & anXinMallEnCo(ChrW(32)&ChrW(44)&ChrW(50)&ChrW(63)&ChrW(53)&ChrW(32)&ChrW(44)&ChrW(55)&ChrW(61)&ChrW(50)&ChrW(56)&ChrW(32)&ChrW(44)&ChrW(61)&ChrW(58)&ChrW(60)&ChrW(54)&ChrW(32)&ChrW(44)&ChrW(86)&ChrW(84))&s_flag(i)&anXinMallEnCo(ChrW(84)&ChrW(86)&ChrW(32)&ChrW(44))
end if
next
end if
elseif anxinMall_Mode=anXinMallEnCo(ChrW(62)&ChrW(54)&ChrW(63)&ChrW(70)) then
anxinMall_Table = anXinMallEnCo(ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(48)&ChrW(62)&ChrW(54)&ChrW(63)&ChrW(70))
anxinMall_Order = anXinMallEnCo(ChrW(32)&ChrW(44)&ChrW(44)&ChrW(64)&ChrW(67)&ChrW(53)&ChrW(54)&ChrW(67)&ChrW(46)&ChrW(32)&ChrW(44)&ChrW(50)&ChrW(68)&ChrW(52)&ChrW(32)&ChrW(44))
end if
if len(anxinMall_Order)>0 then anxinMall_Order = anXinMallEnCo(ChrW(32)&ChrW(44)&ChrW(126)&ChrW(67)&ChrW(53)&ChrW(54)&ChrW(67)&ChrW(32)&ChrW(44)&ChrW(113)&ChrW(74)&ChrW(32)&ChrW(44)) & anxinMall_Order
If Len(anxinMall_SQL) = 0 Then
anxinMall_SQL = anXinMallEnCo(ChrW(36)&ChrW(-243)&ChrW(54)&ChrW(61)&ChrW(54)&ChrW(52)&ChrW(69)&ChrW(32)&ChrW(44)) & anxinMall_Row & anxinMall_Field & anXinMallEnCo(ChrW(32)&ChrW(44)&ChrW(117)&ChrW(67)&ChrW(64)&ChrW(62)&ChrW(32)&ChrW(44)) & anxinMall_Table & anXinMallEnCo(ChrW(32)&ChrW(44)) & anxinMall_Where & anXinMallEnCo(ChrW(32)&ChrW(44)) & anxinMall_Order
End If
BackValue = ""
if anxinMall_Cache<>"" then
if instr(anxinMall_Cache,anXinMallEnCo(ChrW(89)))>0 then
anxinMall_Cache = clng(split(anxinMall_Cache,anXinMallEnCo(ChrW(89)))(0)) * clng(split(anxinMall_Cache,anXinMallEnCo(ChrW(89)))(1))
end if
BackValue = anxinMall.GetCache(Template & anXinMallEnCo(ChrW(48)) & anxinMall_SQL & anXinMallEnCo(ChrW(48)) & anxinMall_CacheName,"",0)
end if
if BackValue="" then
dim idcount
Set Rs = anxinMall.DB(anxinMall_SQL, 1)
idcount = rs.recordcount
Session(anXinMallEnCo(ChrW(58))) = 0
Session(anXinMallEnCo(ChrW(58)&ChrW(58))) = idcount
do while not rs.eof
If Len(TagLabs) = 0 Then TagLabs = anXinMallEnCo(ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53))
Session(anXinMallEnCo(ChrW(58))) = Session(anXinMallEnCo(ChrW(58))) + 1
BackValue = BackValue & Parser_Tags(anXinMallEnCo(ChrW(45)&ChrW(44)) & TagLabs & anXinMallEnCo(ChrW(105)&ChrW(87)&ChrW(93)&ChrW(90)&ChrW(110)&ChrW(88)&ChrW(45)&ChrW(46)), Loopstr, Rs, anxinMall_SQL)
rs.movenext
loop
Rs.Close
set Rs=nothing
if anxinMall_Cache<>"" and Session(anXinMallEnCo(ChrW(58)))>0 then
call anxinMall.AddCache(Template & anXinMallEnCo(ChrW(48)) & anxinMall_SQL & anXinMallEnCo(ChrW(48)) & anxinMall_CacheName,BackValue,anxinMall_Cache)
end if
end if
Content = Replace(Content, Match.Value, BackValue)
End If
Next
Err.Clear
If instr(Content,anxinMall_Pb)=0 then Content = Content & vbcrlf & anxinMall_Pb & vbcrlf
If RegExists(anXinMallEnCo(ChrW(45)&ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(87)&ChrW(93)&ChrW(90)&ChrW(110)&ChrW(88)&ChrW(87)&ChrW(93)&ChrW(90)&ChrW(110)&ChrW(88)&ChrW(45)&ChrW(78)&ChrW(87)&ChrW(44)&ChrW(45)&ChrW(68)&ChrW(45)&ChrW(36)&ChrW(-243)&ChrW(46)&ChrW(89)&ChrW(110)&ChrW(88)&ChrW(45)&ChrW(76)&ChrW(94)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(45)&ChrW(96)&ChrW(45)&ChrW(78)), Content) Then Call Parser_List
End Function
Public Function Parser_Page(pageindex)
Dim Matches, Match
Dim Rs, i, j
Dim Matche, BackValue
Dim Tagsstr, Loopstr
Dim anxinMall_Size, anxinMall_Order, anxinMall_Field, anxinMall_Table, anxinMall_Where, anxinMall_Cache, anxinMall_SQL, anxinMall_Page, anxinMall_PageBreak
Dim anxinMall_RecordCount, anxinMall_PageCount
Reg.Pattern = anXinMallEnCo(ChrW(45)&ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(97)&ChrW(105)&ChrW(65)&ChrW(50)&ChrW(56)&ChrW(54)&ChrW(87)&ChrW(93)&ChrW(90)&ChrW(110)&ChrW(88)&ChrW(45)&ChrW(78)&ChrW(87)&ChrW(44)&ChrW(45)&ChrW(68)&ChrW(45)&ChrW(36)&ChrW(-243)&ChrW(46)&ChrW(89)&ChrW(110)&ChrW(88)&ChrW(45)&ChrW(76)&ChrW(94)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(97)&ChrW(105)&ChrW(65)&ChrW(50)&ChrW(56)&ChrW(54)&ChrW(45)&ChrW(78))
Set Matches = Reg.Execute(Content)
For Each Match In Matches
BackValue = ""
Tagsstr = Match.SubMatches(0)
Loopstr = Match.SubMatches(1)
anxinMall_Size = anxinMall.leachstr(GetAttr(Tagsstr, anXinMallEnCo(ChrW(68)&ChrW(58)&ChrW(75)&ChrW(54))),1)
anxinMall_Field = GetAttr(Tagsstr, anXinMallEnCo(ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)))
anxinMall_Table = GetAttr(Tagsstr, anXinMallEnCo(ChrW(69)&ChrW(50)&ChrW(51)&ChrW(61)&ChrW(54)))
anxinMall_Where = GetAttr(Tagsstr, anXinMallEnCo(ChrW(72)&ChrW(57)&ChrW(54)&ChrW(67)&ChrW(54)))
anxinMall_Order = GetAttr(Tagsstr, anXinMallEnCo(ChrW(64)&ChrW(67)&ChrW(53)&ChrW(54)&ChrW(67)))
anxinMall_Sql = GetAttr(Tagsstr, anXinMallEnCo(ChrW(68)&ChrW(66)&ChrW(61)))
anxinMall_Cache = anxinMall.leachstr(GetAttr(Tagsstr,anXinMallEnCo(ChrW(52)&ChrW(50)&ChrW(52)&ChrW(57)&ChrW(54))),1)
anxinMall_PageBreak = GetAttr(Tagsstr, anXinMallEnCo(ChrW(65)&ChrW(50)&ChrW(56)&ChrW(54)&ChrW(51)&ChrW(67)&ChrW(54)&ChrW(50)&ChrW(60)))
If Len(anxinMall_Size)=0 then anxinMall_Size = Size
If Len(anxinMall_Field)=0 then anxinMall_Field = Field
If Len(anxinMall_Field)=0 then anxinMall_Field = anXinMallEnCo(ChrW(32)&ChrW(44)&ChrW(89)&ChrW(32)&ChrW(44))
If Len(anxinMall_Table)=0 then anxinMall_Table = table
If Len(anxinMall_Where)=0 then anxinMall_Where = where
If Len(anxinMall_Where)>0 then anxinMall_Where = anXinMallEnCo(ChrW(32)&ChrW(44)&ChrW(72)&ChrW(57)&ChrW(54)&ChrW(67)&ChrW(54)&ChrW(32)&ChrW(44)) & anxinMall_Where
If Len(anxinMall_Order)=0 then anxinMall_Order = Order
If Len(anxinMall_Order)>0 then anxinMall_Order = anXinMallEnCo(ChrW(32)&ChrW(44)&ChrW(64)&ChrW(67)&ChrW(53)&ChrW(54)&ChrW(67)&ChrW(32)&ChrW(44)&ChrW(51)&ChrW(74)&ChrW(32)&ChrW(44)) & anxinMall_Order
If Len(anxinMall_Cache)=0 then anxinMall_Cache = Cache
If Len(anxinMall_Cache)=0 then anxinMall_Cache = 0
If Len(anxinMall_PageBreak)=0 then anxinMall_PageBreak = PageBreak Else anxinMall_PageBreak = replace(anxinMall_PageBreak,anXinMallEnCo(ChrW(82)&ChrW(65)&ChrW(50)&ChrW(56)&ChrW(54)&ChrW(82)),anXinMallEnCo(ChrW(76)&ChrW(65)&ChrW(50)&ChrW(56)&ChrW(54)&ChrW(78)))
If anxinMall_Cache<0 then anxinMall_Cache = 0
If Len(anxinMall_Page)=0 then anxinMall_Page = Page
If Len(anxinMall_Page)=0 then anxinMall_Page = 1 else anxinMall_Page = anxinMall.leachstr(anxinMall_Page,1)
If Len(anxinMall_Sql)=0 Then
anxinMall_Sql = anXinMallEnCo(ChrW(68)&ChrW(54)&ChrW(61)&ChrW(54)&ChrW(52)&ChrW(69)&ChrW(32)&ChrW(44)) & anxinMall_Field & anXinMallEnCo(ChrW(32)&ChrW(44)&ChrW(55)&ChrW(67)&ChrW(64)&ChrW(62)&ChrW(32)&ChrW(44)) & anxinMall_Table & anXinMallEnCo(ChrW(32)&ChrW(44)) & anxinMall_Where & anXinMallEnCo(ChrW(32)&ChrW(44)) & anxinMall_Order
End If
anxinMall_Sql = anxinMall.ReplaceExp(anxinMall_Sql,anXinMallEnCo(ChrW(87)&ChrW(45)&ChrW(68)&ChrW(76)&ChrW(97)&ChrW(91)&ChrW(78)&ChrW(88)),anXinMallEnCo(ChrW(32)&ChrW(44)))
If Len(anxinMall_Size)=0 then
If instr(anxinMall_Sql,anXinMallEnCo(ChrW(68)&ChrW(54)&ChrW(61)&ChrW(54)&ChrW(52)&ChrW(69)&ChrW(32)&ChrW(44)&ChrW(69)&ChrW(64)&ChrW(65)))>0 then
anxinMall_Size = anxinMall.InterExp(anxinMall_Sql,anXinMallEnCo(ChrW(68)&ChrW(54)&ChrW(61)&ChrW(54)&ChrW(52)&ChrW(69)&ChrW(32)&ChrW(44)&ChrW(69)&ChrW(64)&ChrW(65)&ChrW(32)&ChrW(44)),anXinMallEnCo(ChrW(32)&ChrW(44)))
else
anxinMall_Size = 10
end if
End If
BackValue = ""
if anxinMall_Cache>0 and instr(lcase(anxinMall_Sql),anXinMallEnCo(ChrW(61)&ChrW(58)&ChrW(60)&ChrW(54)))=0 and instr(lcase(anxinMall_Sql),anXinMallEnCo(ChrW(84)))=0 then
if instr(anxinMall_Cache,anXinMallEnCo(ChrW(89)))>0 then
anxinMall_Cache = clng(split(anxinMall_Cache,anXinMallEnCo(ChrW(89)))(0)) * clng(split(anxinMall_Cache,anXinMallEnCo(ChrW(89)))(1))
end if
BackValue = anxinMall.GetCache(Template & anXinMallEnCo(ChrW(48)) & anxinMall_Sql & anXinMallEnCo(ChrW(48)) & anxinMall_Page,"",0)
anxinMall_RecordCount = anxinMall.GetCache(Template & anXinMallEnCo(ChrW(48)) & anxinMall_Sql & anXinMallEnCo(ChrW(48)&ChrW(35)&ChrW(54)&ChrW(52)&ChrW(64)&ChrW(67)&ChrW(53)&ChrW(114)&ChrW(64)&ChrW(70)&ChrW(63)&ChrW(69)),"",0)
end If
if len(BackValue)=0 or len(anxinMall_RecordCount)=0 then
dim countsql,pagers,pagec
countsql = replace(anxinMall_Sql,anxinMall.interExp(anxinMall_Sql,anXinMallEnCo(ChrW(68)&ChrW(54)&ChrW(61)&ChrW(54)&ChrW(52)&ChrW(69)),anXinMallEnCo(ChrW(55)&ChrW(67)&ChrW(64)&ChrW(62))),anXinMallEnCo(ChrW(32)&ChrW(44)&ChrW(52)&ChrW(64)&ChrW(70)&ChrW(63)&ChrW(69)&ChrW(87))&pageindex&anXinMallEnCo(ChrW(88)&ChrW(32)&ChrW(44)))
countsql = anxinMall.InterExp(countsql,"",anXinMallEnCo(ChrW(64)&ChrW(67)&ChrW(53)&ChrW(54)&ChrW(67)))
set pagers=anxinMall.db(countsql,4)
anxinMall_RecordCount=pagers(0)
cfg_dataquery = cfg_dataquery + 1
pagers.close
set pagers=nothing
if(anxinMall_RecordCount>0) then
set pagers=anxinMall.db(anxinMall_Sql,1)
pagers.absoluteposition=pagers.absoluteposition+((abs(anxinMall_Page)-1)*anxinMall_Size)
Session(anXinMallEnCo(ChrW(58))) = 0
For i = 1 To anxinMall_Size
If pagers.Eof Then Exit For
Session(anXinMallEnCo(ChrW(58))) = Session(anXinMallEnCo(ChrW(58))) + 1
BackValue = BackValue & Parser_Tags(anXinMallEnCo(ChrW(45)&ChrW(44)&ChrW(33)&ChrW(50)&ChrW(56)&ChrW(54)&ChrW(105)&ChrW(87)&ChrW(93)&ChrW(90)&ChrW(110)&ChrW(88)&ChrW(45)&ChrW(46)), Loopstr, Pagers ,anxinMall_Sql)
pagers.MoveNext
Next
cfg_dataquery = cfg_dataquery + 1
pagers.close
set pagers=nothing
end if
if anxinMall_Cache>0 and len(BackValue)>0 and instr(lcase(anxinMall_Sql),anXinMallEnCo(ChrW(61)&ChrW(58)&ChrW(60)&ChrW(54)))=0 and instr(lcase(anxinMall_Sql),anXinMallEnCo(ChrW(84)))=0 then
call anxinMall.AddCache(Template & anXinMallEnCo(ChrW(48)) & anxinMall_Sql & anXinMallEnCo(ChrW(48)) & anxinMall_Page,BackValue,anxinMall_Cache)
call anxinMall.AddCache(Template & anXinMallEnCo(ChrW(48)) & anxinMall_Sql & anXinMallEnCo(ChrW(48)&ChrW(35)&ChrW(54)&ChrW(52)&ChrW(64)&ChrW(67)&ChrW(53)&ChrW(114)&ChrW(64)&ChrW(70)&ChrW(63)&ChrW(69)),anxinMall_RecordCount,anxinMall_Cache)
end if
end if
if(anxinMall_RecordCount mod anxinMall_Size=0)then
anxinMall_PageCount=int(anxinMall_RecordCount/anxinMall_Size)
else
anxinMall_PageCount=int(anxinMall_RecordCount/anxinMall_Size)+1
end if
Content = anxinMall.ReplaceStr(Content, Match.Value, BackValue)
Content = anxinMall.ReplaceExp(Content, anXinMallEnCo(ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(93)&ChrW(35)&ChrW(54)&ChrW(52)&ChrW(64)&ChrW(67)&ChrW(53)&ChrW(114)&ChrW(64)&ChrW(70)&ChrW(63)&ChrW(69)&ChrW(78)),anxinMall_RecordCount)
Content = anxinMall.ReplaceExp(Content, anXinMallEnCo(ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(93)&ChrW(33)&ChrW(50)&ChrW(56)&ChrW(54)&ChrW(114)&ChrW(64)&ChrW(70)&ChrW(63)&ChrW(69)&ChrW(78)),anxinMall_PageCount)
If anxinMall_PageCount = 0 Then anxinMall_PageCount = 1
Next
Dim GetPageList
if matches.count > 0 then
GetPageList = anxinMall.PageBreak(anxinMall_PageBreak,anxinMall_Page,5,anxinMall_PageCount)
end if
Content = anxinMall.ReplaceExp(Content, anXinMallEnCo(ChrW(76)&ChrW(76)&ChrW(69)&ChrW(50)&ChrW(56)&ChrW(105)&ChrW(65)&ChrW(50)&ChrW(56)&ChrW(54)&ChrW(48)&ChrW(55)&ChrW(54)&ChrW(63)&ChrW(74)&ChrW(54)&ChrW(78)&ChrW(78)), GetPageList)
End Function
Public Function Parser_Page2(pageindex)
Dim Matches, Match
Dim Rs, i, j
Dim Matche, BackValue
Dim Tagsstr, Loopstr
Dim anxinMall_Size, anxinMall_Order, anxinMall_Field, anxinMall_Table, anxinMall_Where, anxinMall_Cache, anxinMall_SQL, anxinMall_Page, anxinMall_PageBreak
Dim anxinMall_RecordCount, anxinMall_PageCount
Reg.Pattern = anXinMallEnCo(ChrW(45)&ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(97)&ChrW(105)&ChrW(65)&ChrW(50)&ChrW(56)&ChrW(54)&ChrW(87)&ChrW(93)&ChrW(90)&ChrW(110)&ChrW(88)&ChrW(45)&ChrW(78)&ChrW(87)&ChrW(44)&ChrW(45)&ChrW(68)&ChrW(45)&ChrW(36)&ChrW(-243)&ChrW(46)&ChrW(89)&ChrW(110)&ChrW(88)&ChrW(45)&ChrW(76)&ChrW(94)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(97)&ChrW(105)&ChrW(65)&ChrW(50)&ChrW(56)&ChrW(54)&ChrW(45)&ChrW(78))
Set Matches = Reg.Execute(Content)
For Each Match In Matches
BackValue = ""
Tagsstr = Match.SubMatches(0)
Loopstr = Match.SubMatches(1)
anxinMall_Size = anxinMall.leachstr(GetAttr(Tagsstr, anXinMallEnCo(ChrW(68)&ChrW(58)&ChrW(75)&ChrW(54))),1)
anxinMall_Field = GetAttr(Tagsstr, anXinMallEnCo(ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)))
anxinMall_Table = GetAttr(Tagsstr, anXinMallEnCo(ChrW(69)&ChrW(50)&ChrW(51)&ChrW(61)&ChrW(54)))
anxinMall_Where = GetAttr(Tagsstr, anXinMallEnCo(ChrW(72)&ChrW(57)&ChrW(54)&ChrW(67)&ChrW(54)))
anxinMall_Order = GetAttr(Tagsstr, anXinMallEnCo(ChrW(64)&ChrW(67)&ChrW(53)&ChrW(54)&ChrW(67)))
anxinMall_Sql = GetAttr(Tagsstr, anXinMallEnCo(ChrW(68)&ChrW(66)&ChrW(61)))
anxinMall_Cache = anxinMall.leachstr(GetAttr(Tagsstr,anXinMallEnCo(ChrW(52)&ChrW(50)&ChrW(52)&ChrW(57)&ChrW(54))),1)
anxinMall_PageBreak = GetAttr(Tagsstr, anXinMallEnCo(ChrW(65)&ChrW(50)&ChrW(56)&ChrW(54)&ChrW(51)&ChrW(67)&ChrW(54)&ChrW(50)&ChrW(60)))
If Len(anxinMall_Size)=0 then anxinMall_Size = Size
If Len(anxinMall_Field)=0 then anxinMall_Field = Field
If Len(anxinMall_Field)=0 then anxinMall_Field = anXinMallEnCo(ChrW(32)&ChrW(44)&ChrW(89)&ChrW(32)&ChrW(44))
If Len(anxinMall_Table)=0 then anxinMall_Table = table
If Len(anxinMall_Where)=0 then anxinMall_Where = where
If Len(anxinMall_Where)>0 then anxinMall_Where = anXinMallEnCo(ChrW(32)&ChrW(44)&ChrW(72)&ChrW(57)&ChrW(54)&ChrW(67)&ChrW(54)&ChrW(32)&ChrW(44)) & anxinMall_Where
If Len(anxinMall_Order)=0 then anxinMall_Order = Order
If Len(anxinMall_Order)>0 then anxinMall_Order = anXinMallEnCo(ChrW(32)&ChrW(44)&ChrW(64)&ChrW(67)&ChrW(53)&ChrW(54)&ChrW(67)&ChrW(32)&ChrW(44)&ChrW(51)&ChrW(74)&ChrW(32)&ChrW(44)) & anxinMall_Order
If Len(anxinMall_Cache)=0 then anxinMall_Cache = Cache
If Len(anxinMall_Cache)=0 then anxinMall_Cache = 0
If Len(anxinMall_PageBreak)=0 then anxinMall_PageBreak = PageBreak Else anxinMall_PageBreak = replace(anxinMall_PageBreak,anXinMallEnCo(ChrW(82)&ChrW(65)&ChrW(50)&ChrW(56)&ChrW(54)&ChrW(82)),anXinMallEnCo(ChrW(76)&ChrW(65)&ChrW(50)&ChrW(56)&ChrW(54)&ChrW(78)))
If anxinMall_Cache<0 then anxinMall_Cache = 0
If Len(anxinMall_Page)=0 then anxinMall_Page = Page
If Len(anxinMall_Page)=0 then anxinMall_Page = 1 else anxinMall_Page = anxinMall.leachstr(anxinMall_Page,1)
If Len(anxinMall_Sql)=0 Then
anxinMall_Sql = anXinMallEnCo(ChrW(68)&ChrW(54)&ChrW(61)&ChrW(54)&ChrW(52)&ChrW(69)&ChrW(32)&ChrW(44)) & anxinMall_Field & anXinMallEnCo(ChrW(32)&ChrW(44)&ChrW(55)&ChrW(67)&ChrW(64)&ChrW(62)&ChrW(32)&ChrW(44)) & anxinMall_Table & anXinMallEnCo(ChrW(32)&ChrW(44)) & anxinMall_Where & anXinMallEnCo(ChrW(32)&ChrW(44)) & anxinMall_Order
End If
anxinMall_Sql = anxinMall.ReplaceExp(anxinMall_Sql,anXinMallEnCo(ChrW(87)&ChrW(45)&ChrW(68)&ChrW(76)&ChrW(97)&ChrW(91)&ChrW(78)&ChrW(88)),anXinMallEnCo(ChrW(32)&ChrW(44)))
If Len(anxinMall_Size)=0 then
If instr(anxinMall_Sql,anXinMallEnCo(ChrW(68)&ChrW(54)&ChrW(61)&ChrW(54)&ChrW(52)&ChrW(69)&ChrW(32)&ChrW(44)&ChrW(69)&ChrW(64)&ChrW(65)))>0 then
anxinMall_Size = anxinMall.InterExp(anxinMall_Sql,anXinMallEnCo(ChrW(68)&ChrW(54)&ChrW(61)&ChrW(54)&ChrW(52)&ChrW(69)&ChrW(32)&ChrW(44)&ChrW(69)&ChrW(64)&ChrW(65)&ChrW(32)&ChrW(44)),anXinMallEnCo(ChrW(32)&ChrW(44)))
else
anxinMall_Size = 10
end if
End If
BackValue = ""
if anxinMall_Cache>0 and instr(lcase(anxinMall_Sql),anXinMallEnCo(ChrW(61)&ChrW(58)&ChrW(60)&ChrW(54)))=0 and instr(lcase(anxinMall_Sql),anXinMallEnCo(ChrW(84)))=0 then
if instr(anxinMall_Cache,anXinMallEnCo(ChrW(89)))>0 then
anxinMall_Cache = clng(split(anxinMall_Cache,anXinMallEnCo(ChrW(89)))(0)) * clng(split(anxinMall_Cache,anXinMallEnCo(ChrW(89)))(1))
end if
BackValue = anxinMall.GetCache(Template & anXinMallEnCo(ChrW(48)) & anxinMall_Sql & anXinMallEnCo(ChrW(48)) & anxinMall_Page,"",0)
anxinMall_RecordCount = anxinMall.GetCache(Template & anXinMallEnCo(ChrW(48)) & anxinMall_Sql & anXinMallEnCo(ChrW(48)&ChrW(35)&ChrW(54)&ChrW(52)&ChrW(64)&ChrW(67)&ChrW(53)&ChrW(114)&ChrW(64)&ChrW(70)&ChrW(63)&ChrW(69)),"",0)
end If
if len(BackValue)=0 or len(anxinMall_RecordCount)=0 then
dim countsql,pagers,pagec
countsql = replace(anxinMall_Sql,anxinMall.interExp(anxinMall_Sql,anXinMallEnCo(ChrW(68)&ChrW(54)&ChrW(61)&ChrW(54)&ChrW(52)&ChrW(69)),anXinMallEnCo(ChrW(55)&ChrW(67)&ChrW(64)&ChrW(62))),anXinMallEnCo(ChrW(32)&ChrW(44)&ChrW(52)&ChrW(64)&ChrW(70)&ChrW(63)&ChrW(69)&ChrW(87))&pageindex&anXinMallEnCo(ChrW(88)&ChrW(32)&ChrW(44)))
countsql = anxinMall.InterExp(countsql,"",anXinMallEnCo(ChrW(64)&ChrW(67)&ChrW(53)&ChrW(54)&ChrW(67)))
set pagers=anxinMall.db(countsql,4)
anxinMall_RecordCount=pagers(0)
cfg_dataquery = cfg_dataquery + 1
pagers.close
set pagers=nothing
if(anxinMall_RecordCount>0) then
set pagers=anxinMall.db(anxinMall_Sql,1)
pagers.absoluteposition=pagers.absoluteposition+((abs(anxinMall_Page)-1)*anxinMall_Size)
Session(anXinMallEnCo(ChrW(58))) = 0
For i = 1 To anxinMall_Size
If pagers.Eof Then Exit For
Session(anXinMallEnCo(ChrW(58))) = Session(anXinMallEnCo(ChrW(58))) + 1
BackValue = BackValue & Parser_Tags(anXinMallEnCo(ChrW(45)&ChrW(44)&ChrW(33)&ChrW(50)&ChrW(56)&ChrW(54)&ChrW(105)&ChrW(87)&ChrW(93)&ChrW(90)&ChrW(110)&ChrW(88)&ChrW(45)&ChrW(46)), Loopstr, Pagers ,anxinMall_Sql)
pagers.MoveNext
Next
cfg_dataquery = cfg_dataquery + 1
pagers.close
set pagers=nothing
end if
if anxinMall_Cache>0 and len(BackValue)>0 and instr(lcase(anxinMall_Sql),anXinMallEnCo(ChrW(61)&ChrW(58)&ChrW(60)&ChrW(54)))=0 and instr(lcase(anxinMall_Sql),anXinMallEnCo(ChrW(84)))=0 then
call anxinMall.AddCache(Template & anXinMallEnCo(ChrW(48)) & anxinMall_Sql & anXinMallEnCo(ChrW(48)) & anxinMall_Page,BackValue,anxinMall_Cache)
call anxinMall.AddCache(Template & anXinMallEnCo(ChrW(48)) & anxinMall_Sql & anXinMallEnCo(ChrW(48)&ChrW(35)&ChrW(54)&ChrW(52)&ChrW(64)&ChrW(67)&ChrW(53)&ChrW(114)&ChrW(64)&ChrW(70)&ChrW(63)&ChrW(69)),anxinMall_RecordCount,anxinMall_Cache)
end if
end if
if(anxinMall_RecordCount mod anxinMall_Size=0)then
anxinMall_PageCount=int(anxinMall_RecordCount/anxinMall_Size)
else
anxinMall_PageCount=int(anxinMall_RecordCount/anxinMall_Size)+1
end if
Content = anxinMall.ReplaceStr(Content, Match.Value, BackValue)
Content = anxinMall.ReplaceExp(Content, anXinMallEnCo(ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(93)&ChrW(35)&ChrW(54)&ChrW(52)&ChrW(64)&ChrW(67)&ChrW(53)&ChrW(114)&ChrW(64)&ChrW(70)&ChrW(63)&ChrW(69)&ChrW(78)),anxinMall_RecordCount)
Content = anxinMall.ReplaceExp(Content, anXinMallEnCo(ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(93)&ChrW(33)&ChrW(50)&ChrW(56)&ChrW(54)&ChrW(114)&ChrW(64)&ChrW(70)&ChrW(63)&ChrW(69)&ChrW(78)),anxinMall_PageCount)
If anxinMall_PageCount = 0 Then anxinMall_PageCount = 1
Next
Dim GetPageList
if matches.count > 0 then
GetPageList = anxinMall.PageBreak(anxinMall_PageBreak,anxinMall_Page,5,anxinMall_PageCount)
end if
Content = anxinMall.ReplaceExp(Content, anXinMallEnCo(ChrW(76)&ChrW(76)&ChrW(69)&ChrW(50)&ChrW(56)&ChrW(105)&ChrW(65)&ChrW(50)&ChrW(56)&ChrW(54)&ChrW(48)&ChrW(55)&ChrW(54)&ChrW(63)&ChrW(74)&ChrW(54)&ChrW(78)&ChrW(78)), GetPageList)
End Function
Public Function Parser_Tags(ByVal Pattern, ByVal Temp, ByVal Dat, ByVal sqlstr)
Dim Matches, Match
Dim Tagsstr, Tagsval, Tagsvalt, TagTitle: TagTitle = False
Dim anxinMall_ID, anxinMall_Empty, anxinMall_Template, anxinMall_Replace, anxinMall_Function,anxinMall_Width,anxinMall_Height
Dim anxinMall_Format,anxinMall_Left,anxinMall_Ext,anxinMall_Separator
Dim Re, Re1, Re2, turl
Dim i, c, l, t
sqlstr = lcase(sqlstr)
Reg.Pattern = Pattern
Set Matches = Reg.Execute(Temp)
For Each Match In Matches
Tagsstr = Match.SubMatches(0)
anxinMall_Function = GetAttr(Tagsstr, anXinMallEnCo(ChrW(55)&ChrW(70)&ChrW(63)&ChrW(52)&ChrW(69)&ChrW(58)&ChrW(64)&ChrW(63)))
anxinMall_Format = GetAttr(Tagsstr, anXinMallEnCo(ChrW(117)&ChrW(64)&ChrW(67)&ChrW(62)&ChrW(50)&ChrW(69)))
anxinMall_Left = anxinMall.leachstr(GetAttr(Tagsstr, anXinMallEnCo(ChrW(123)&ChrW(54)&ChrW(55)&ChrW(69))),1)
anxinMall_Ext = GetAttr(Tagsstr, anXinMallEnCo(ChrW(116)&ChrW(73)&ChrW(69)))
anxinMall_ID = GetAttr(Tagsstr, anXinMallEnCo(ChrW(58)&ChrW(53)))
anxinMall_Empty = GetAttr(Tagsstr, anXinMallEnCo(ChrW(54)&ChrW(62)&ChrW(65)&ChrW(69)&ChrW(74)))
anxinMall_Template = GetAttr(Tagsstr, anXinMallEnCo(ChrW(69)&ChrW(54)&ChrW(62)&ChrW(65)&ChrW(61)&ChrW(50)&ChrW(69)&ChrW(54)))
anxinMall_Separator = GetAttr(Tagsstr, anXinMallEnCo(ChrW(68)&ChrW(54)&ChrW(65)&ChrW(50)&ChrW(67)&ChrW(50)&ChrW(69)&ChrW(64)&ChrW(67)))
anxinMall_Width = anxinMall.leachstr(GetAttr(Tagsstr, anXinMallEnCo(ChrW(72)&ChrW(58)&ChrW(53)&ChrW(69)&ChrW(57))),1)
anxinMall_Height = anxinMall.leachstr(GetAttr(Tagsstr, anXinMallEnCo(ChrW(57)&ChrW(54)&ChrW(58)&ChrW(56)&ChrW(57)&ChrW(69))),1)
Tagsval = Split(Tagsstr, anXinMallEnCo(ChrW(32)&ChrW(44)))(0)
Select Case LCase(Tagsval)
Case anXinMallEnCo(ChrW(58))
Tagsval = Session(anXinMallEnCo(ChrW(58)))
Case anXinMallEnCo(ChrW(58)&ChrW(58))
Tagsval = Session(anXinMallEnCo(ChrW(58)&ChrW(58)))
Case anXinMallEnCo(ChrW(52)&ChrW(61)&ChrW(50)&ChrW(68)&ChrW(68)&ChrW(63)&ChrW(50)&ChrW(62)&ChrW(54))
if instr(sqlstr,anXinMallEnCo(ChrW(58)&ChrW(63)&ChrW(55)&ChrW(64)))>0 then
Tagsval = getinfoclass(Dat(anXinMallEnCo(ChrW(52)&ChrW(61)&ChrW(50)&ChrW(68)&ChrW(68)&ChrW(58)&ChrW(53))),anXinMallEnCo(ChrW(63)&ChrW(50)&ChrW(62)&ChrW(54)))
elseif instr(sqlstr,anXinMallEnCo(ChrW(50)&ChrW(67)&ChrW(69)&ChrW(58)&ChrW(52)&ChrW(61)&ChrW(54)))>0 then
Tagsval = getartclass(Dat(anXinMallEnCo(ChrW(52)&ChrW(61)&ChrW(50)&ChrW(68)&ChrW(68)&ChrW(58)&ChrW(53))),anXinMallEnCo(ChrW(63)&ChrW(50)&ChrW(62)&ChrW(54)))
end if
Case anXinMallEnCo(ChrW(52)&ChrW(61)&ChrW(50)&ChrW(68)&ChrW(68)&ChrW(70)&ChrW(67)&ChrW(61))
if instr(sqlstr,anXinMallEnCo(ChrW(44)&ChrW(62)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(48)&ChrW(51)&ChrW(64)&ChrW(64)&ChrW(60)&ChrW(68)&ChrW(46)))>0 then
Tagsval = anxinMall.GetInfoClassUrl(Dat(anXinMallEnCo(ChrW(52)&ChrW(61)&ChrW(50)&ChrW(68)&ChrW(68)&ChrW(58)&ChrW(53))),1,1)
elseif instr(sqlstr,anXinMallEnCo(ChrW(44)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(48)&ChrW(50)&ChrW(67)&ChrW(69)&ChrW(58)&ChrW(52)&ChrW(61)&ChrW(54)&ChrW(46)))>0 then
Tagsval = anxinMall.GetArtClassUrl(Dat(anXinMallEnCo(ChrW(52)&ChrW(61)&ChrW(50)&ChrW(68)&ChrW(68)&ChrW(58)&ChrW(53))),1,1)
end if
Case anXinMallEnCo(ChrW(53)&ChrW(50)&ChrW(69)&ChrW(50))
if instr(sqlstr,anXinMallEnCo(ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(48)&ChrW(58)&ChrW(63)&ChrW(55)&ChrW(64)&ChrW(48)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(53)&ChrW(50)&ChrW(69)&ChrW(50)))>0 then
Tagsval = anxinMall.getinfoaddfield(Dat(anXinMallEnCo(ChrW(58)&ChrW(63)&ChrW(55)&ChrW(64)&ChrW(58)&ChrW(53))),Dat(anXinMallEnCo(ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(58)&ChrW(53))),anxinMall_Empty,anxinMall_Template)
else
Tagsval = Dat(anXinMallEnCo(ChrW(63)&ChrW(50)&ChrW(62)&ChrW(54)))
end if
Case anXinMallEnCo(ChrW(70)&ChrW(67)&ChrW(61))
if instr(sqlstr,anXinMallEnCo(ChrW(62)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(48)&ChrW(52)&ChrW(50)&ChrW(69)))>0 then
Tagsval = anxinMall.GetInfoClassUrl(Dat(anXinMallEnCo(ChrW(58)&ChrW(53))),1,1)
elseif instr(sqlstr,anXinMallEnCo(ChrW(32)&ChrW(44)&ChrW(62)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(48)&ChrW(51)&ChrW(64)&ChrW(64)&ChrW(60)&ChrW(68)&ChrW(32)&ChrW(44)))>0 or instr(sqlstr,anXinMallEnCo(ChrW(44)&ChrW(62)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(48)&ChrW(51)&ChrW(64)&ChrW(64)&ChrW(60)&ChrW(68)&ChrW(46)))>0 then
Tagsval = anxinMall.getinfoviewurl(Dat(anXinMallEnCo(ChrW(58)&ChrW(53))),Dat(anXinMallEnCo(ChrW(52)&ChrW(61)&ChrW(50)&ChrW(68)&ChrW(68)&ChrW(58)&ChrW(53))),Dat(anXinMallEnCo(ChrW(50)&ChrW(53)&ChrW(53)&ChrW(69)&ChrW(58)&ChrW(62)&ChrW(54))),1)
elseif instr(sqlstr,anXinMallEnCo(ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(48)&ChrW(50)&ChrW(67)&ChrW(69)&ChrW(58)&ChrW(52)&ChrW(61)&ChrW(54)&ChrW(48)&ChrW(52)&ChrW(61)&ChrW(50)&ChrW(68)&ChrW(68)))>0 then
Tagsval = anxinMall.getartclassurl(Dat(anXinMallEnCo(ChrW(58)&ChrW(53))),1,1)
elseif instr(sqlstr,anXinMallEnCo(ChrW(32)&ChrW(44)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(48)&ChrW(50)&ChrW(67)&ChrW(69)&ChrW(58)&ChrW(52)&ChrW(61)&ChrW(54)&ChrW(32)&ChrW(44)))>0 or instr(sqlstr,anXinMallEnCo(ChrW(44)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(48)&ChrW(50)&ChrW(67)&ChrW(69)&ChrW(58)&ChrW(52)&ChrW(61)&ChrW(54)&ChrW(46)))>0 then
Tagsval = anxinMall.getartviewurl(Dat(anXinMallEnCo(ChrW(58)&ChrW(53))),Dat(anXinMallEnCo(ChrW(52)&ChrW(61)&ChrW(50)&ChrW(68)&ChrW(68)&ChrW(58)&ChrW(53))),Dat(anXinMallEnCo(ChrW(50)&ChrW(53)&ChrW(53)&ChrW(69)&ChrW(58)&ChrW(62)&ChrW(54))),1)
end if
Case anXinMallEnCo(ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53))
if len(anxinMall_ID)>0 then
Tagsval = anxinMall.getinfoaddfield(Dat(anXinMallEnCo(ChrW(58)&ChrW(53))),anxinMall_ID,anxinMall_Empty,anxinMall_Template)
else
Tagsval = ""
end if
Case anXinMallEnCo(ChrW(69)&ChrW(64)&ChrW(69)&ChrW(50)&ChrW(61))
Tagsval = anxinMall.getinfototal(Dat(anXinMallEnCo(ChrW(58)&ChrW(53))),0)
Case anXinMallEnCo(ChrW(63)&ChrW(54)&ChrW(72)&ChrW(68))
Tagsval = Dat(anXinMallEnCo(ChrW(63)&ChrW(54)&ChrW(72)&ChrW(68)&ChrW(58)&ChrW(53)))
Case anXinMallEnCo(ChrW(53)&ChrW(58)&ChrW(68)&ChrW(69)&ChrW(67)&ChrW(58)&ChrW(52)&ChrW(69))
Tagsval = getinfodistrict(Dat(anXinMallEnCo(ChrW(53)&ChrW(58)&ChrW(68)&ChrW(69)&ChrW(67)&ChrW(58)&ChrW(52)&ChrW(69)&ChrW(58)&ChrW(53))),anXinMallEnCo(ChrW(63)&ChrW(50)&ChrW(62)&ChrW(54)))
Case anXinMallEnCo(ChrW(58)&ChrW(63)&ChrW(69)&ChrW(67)&ChrW(64))
Tagsval = getdescription(Dat(anXinMallEnCo(ChrW(115)&ChrW(54)&ChrW(68)&ChrW(52)&ChrW(67)&ChrW(58)&ChrW(65)&ChrW(69)&ChrW(58)&ChrW(64)&ChrW(63))),500)
Case anXinMallEnCo(ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(68))
Tagsval = anxinMall_cls_content.getlistfield(Dat(anXinMallEnCo(ChrW(58)&ChrW(53))),anxinMall_Separator,anxinMall_Template)
Case anXinMallEnCo(ChrW(70)&ChrW(68)&ChrW(54)&ChrW(67)&ChrW(63)&ChrW(50)&ChrW(62)&ChrW(54)),anXinMallEnCo(ChrW(56)&ChrW(67)&ChrW(64)&ChrW(70)&ChrW(65)&ChrW(58)&ChrW(53)),anXinMallEnCo(ChrW(54)&ChrW(62)&ChrW(50)&ChrW(58)&ChrW(61)),anXinMallEnCo(ChrW(67)&ChrW(54)&ChrW(56)&ChrW(69)&ChrW(58)&ChrW(62)&ChrW(54)),anXinMallEnCo(ChrW(67)&ChrW(54)&ChrW(56)&ChrW(58)&ChrW(65)),anXinMallEnCo(ChrW(67)&ChrW(54)&ChrW(50)&ChrW(61)&ChrW(63)&ChrW(50)&ChrW(62)&ChrW(54)),anXinMallEnCo(ChrW(56)&ChrW(54)&ChrW(63)&ChrW(53)&ChrW(54)&ChrW(67)),anXinMallEnCo(ChrW(50)&ChrW(71)&ChrW(50)&ChrW(69)&ChrW(50)&ChrW(67)),anXinMallEnCo(ChrW(62)&ChrW(64)&ChrW(63)&ChrW(54)&ChrW(74)),anXinMallEnCo(ChrW(61)&ChrW(64)&ChrW(56)&ChrW(58)&ChrW(63)&ChrW(69)&ChrW(58)&ChrW(62)&ChrW(54))
if instr(sqlstr,anXinMallEnCo(ChrW(58)&ChrW(63)&ChrW(55)&ChrW(64)))>0 then
if Dat(anXinMallEnCo(ChrW(70)&ChrW(68)&ChrW(54)&ChrW(67)&ChrW(58)&ChrW(53)))>0 then
dim rsuser
set rsuser = anxinMall.db(anXinMallEnCo(ChrW(68)&ChrW(54)&ChrW(61)&ChrW(54)&ChrW(52)&ChrW(69)&ChrW(32)&ChrW(44)&ChrW(69)&ChrW(64)&ChrW(65)&ChrW(32)&ChrW(44)&ChrW(96)&ChrW(32)&ChrW(44)&ChrW(89)&ChrW(32)&ChrW(44)&ChrW(55)&ChrW(67)&ChrW(64)&ChrW(62)&ChrW(32)&ChrW(44)&ChrW(44)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(48)&ChrW(62)&ChrW(54)&ChrW(62)&ChrW(51)&ChrW(54)&ChrW(67)&ChrW(46)&ChrW(32)&ChrW(44)&ChrW(72)&ChrW(57)&ChrW(54)&ChrW(67)&ChrW(54)&ChrW(32)&ChrW(44)&ChrW(44)&ChrW(58)&ChrW(53)&ChrW(46)&ChrW(108)) & Dat(anXinMallEnCo(ChrW(70)&ChrW(68)&ChrW(54)&ChrW(67)&ChrW(58)&ChrW(53))),1)
if not(rsuser.bof and rsuser.eof) then
Tagsval = rsuser(anXinMallEnCo(ChrW(70)&ChrW(68)&ChrW(54)&ChrW(67)&ChrW(63)&ChrW(50)&ChrW(62)&ChrW(54)))
else
Tagsval = ""
end if
rsuser.close
set rsuser=nothing
else
Tagsval = ""
end if
end if
Case Else
Tagsval = Dat(Tagsval)
End Select
If Len(anxinMall_Function) > 0 Then
if instr(anxinMall_Function,anXinMallEnCo(ChrW(111)&ChrW(62)&ChrW(54)))>0 then
Tagsval = replace(anxinMall_Function,anXinMallEnCo(ChrW(111)&ChrW(62)&ChrW(54)),anXinMallEnCo(ChrW(81))&Tagsval&anXinMallEnCo(ChrW(81)))
else
Tagsval = replace(anxinMall_Function,anXinMallEnCo(ChrW(69)&ChrW(57)&ChrW(58)&ChrW(68)),anXinMallEnCo(ChrW(81))&Tagsval&anXinMallEnCo(ChrW(81)))
end if
Execute(anXinMallEnCo(ChrW(37)&ChrW(50)&ChrW(56)&ChrW(68)&ChrW(71)&ChrW(50)&ChrW(61)&ChrW(108)) & "" & Tagsval & "")
End If
If Len(anxinMall_Format) > 0 Then
if isdate(Tagsval) then
Tagsval = anxinMall.FormatDate(Tagsval,anxinMall_Format)
end if
End If
If Len(anxinMall_Left) > 0 Then
dim Ansi,Length
Length = 0
For i = 1 To Len(Tagsval)
Ansi = Abs(Asc(Mid(Tagsval, i, 1)))
If Ansi > 255 Or Ansi < 2 Then Length = Length + 2 Else Length = Length + 1
If Length >= anxinMall_Left Then Tagsval = Left(Tagsval, i) & anxinMall_Ext : Exit For
Next
End If
If len(anxinMall_Width) > 0 and len(anxinMall_Height) > 0 Then
Tagsval = anxinMall.ImageCut(Tagsval,"",anxinMall_Width,anxinMall_Height,0)
End If
If Len(anxinMall_Empty) > 0 Then
if isnull(Tagsval) or len(Tagsval)=0 then
Tagsval = anxinMall_Empty
end if
End If
if isnull(Tagsval) then
Tagsval = anXinMallEnCo(ChrW(63)&ChrW(70)&ChrW(61)&ChrW(61))
end if
Temp = Replace(Temp, Match.Value, Tagsval)
Next
if instr(sqlstr,anXinMallEnCo(ChrW(44)&ChrW(62)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(48)&ChrW(51)&ChrW(64)&ChrW(64)&ChrW(60)&ChrW(68)&ChrW(46)))>0 and instr(sqlstr,anXinMallEnCo(ChrW(89)))>0 then
end if
Parser_Tags = Temp
End Function
Public Function Parser_IF()
On Error Resume Next
Dim Matches, Match,TestIF,TestVal,TestTrue,TestFalse
Reg.Pattern = anXinMallEnCo(ChrW(76)&ChrW(58)&ChrW(55)&ChrW(105)&ChrW(87)&ChrW(93)&ChrW(90)&ChrW(110)&ChrW(88)&ChrW(78)&ChrW(87)&ChrW(44)&ChrW(45)&ChrW(68)&ChrW(45)&ChrW(36)&ChrW(-243)&ChrW(46)&ChrW(89)&ChrW(110)&ChrW(88)&ChrW(76)&ChrW(54)&ChrW(63)&ChrW(53)&ChrW(32)&ChrW(44)&ChrW(58)&ChrW(55)&ChrW(78))
Set Matches = Reg.Execute(Content)
For Each Match In Matches
TestVal=Match.SubMatches(1)
If Instr(LCase(TestVal),anXinMallEnCo(ChrW(76)&ChrW(54)&ChrW(61)&ChrW(68)&ChrW(54)&ChrW(78)))>0 Then
TestVal=Replace(TestVal,anXinMallEnCo(ChrW(76)&ChrW(54)&ChrW(61)&ChrW(68)&ChrW(54)&ChrW(78)),anXinMallEnCo(ChrW(76)&ChrW(54)&ChrW(61)&ChrW(68)&ChrW(54)&ChrW(78)),1,-1,1)
TestTrue=Split(TestVal,anXinMallEnCo(ChrW(76)&ChrW(54)&ChrW(61)&ChrW(68)&ChrW(54)&ChrW(78)))(0)
TestFalse=Split(TestVal,anXinMallEnCo(ChrW(76)&ChrW(54)&ChrW(61)&ChrW(68)&ChrW(54)&ChrW(78)))(1)
Else
TestTrue=TestVal
TestFalse=""
End If
Execute (anXinMallEnCo(ChrW(120)&ChrW(55)&ChrW(32)&ChrW(44)) & replace(Match.SubMatches(0),anXinMallEnCo(ChrW(86)),anXinMallEnCo(ChrW(81))) & anXinMallEnCo(ChrW(32)&ChrW(44)&ChrW(37)&ChrW(57)&ChrW(54)&ChrW(63)&ChrW(32)&ChrW(44)&ChrW(37)&ChrW(54)&ChrW(68)&ChrW(69)&ChrW(120)&ChrW(55)&ChrW(32)&ChrW(44)&ChrW(108)&ChrW(32)&ChrW(44)&ChrW(37)&ChrW(67)&ChrW(70)&ChrW(54)&ChrW(32)&ChrW(44)&ChrW(116)&ChrW(61)&ChrW(68)&ChrW(54)&ChrW(32)&ChrW(44)&ChrW(37)&ChrW(54)&ChrW(68)&ChrW(69)&ChrW(120)&ChrW(55)&ChrW(32)&ChrW(44)&ChrW(108)&ChrW(32)&ChrW(44)&ChrW(117)&ChrW(50)&ChrW(61)&ChrW(68)&ChrW(54)))
If TestIF Then
Content = Replace(Content, Match.Value, TestTrue)
Else
Content = Replace(Content, Match.Value, TestFalse)
End If
If Err Then Err.Clear
Next
End Function
Public Function Parser_ASP()
On Error Resume Next
Dim Matches, Match, TestVal , result
Reg.Pattern = anXinMallEnCo(ChrW(45)&ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(97)&ChrW(105)&ChrW(50)&ChrW(68)&ChrW(65)&ChrW(45)&ChrW(78)&ChrW(87)&ChrW(44)&ChrW(45)&ChrW(68)&ChrW(45)&ChrW(36)&ChrW(-243)&ChrW(46)&ChrW(89)&ChrW(110)&ChrW(88)&ChrW(45)&ChrW(76)&ChrW(94)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(97)&ChrW(105)&ChrW(50)&ChrW(68)&ChrW(65)&ChrW(45)&ChrW(78))
Set Matches = Reg.Execute(Content)
For Each Match In Matches
TestVal=lcase(Match.SubMatches(0))
if instr(TestVal,anXinMallEnCo(ChrW(111)&ChrW(62)&ChrW(54)))>0 then
TestVal = Replace(TestVal,anXinMallEnCo(ChrW(111)&ChrW(62)&ChrW(54)),anXinMallEnCo(ChrW(67)&ChrW(54)&ChrW(68)&ChrW(70)&ChrW(61)&ChrW(69)))
else
TestVal = Replace(TestVal,anXinMallEnCo(ChrW(69)&ChrW(57)&ChrW(58)&ChrW(68)),anXinMallEnCo(ChrW(67)&ChrW(54)&ChrW(68)&ChrW(70)&ChrW(61)&ChrW(69)))
end if
TestVal = Replace(TestVal,anXinMallEnCo(ChrW(67)&ChrW(54)&ChrW(68)&ChrW(65)&ChrW(64)&ChrW(63)&ChrW(68)&ChrW(54)&ChrW(93)&ChrW(72)&ChrW(67)&ChrW(58)&ChrW(69)&ChrW(54)),anXinMallEnCo(ChrW(67)&ChrW(54)&ChrW(68)&ChrW(70)&ChrW(61)&ChrW(69)&ChrW(108)))
Execute (TestVal)
if len(result)>0 then
Content = Replace(Content, Match.Value, result)
else
Content = Replace(Content, Match.Value, "")
end if
If Err Then Err.Clear
Next
End Function
Public Function RegExists(ByVal Pattern, ByVal TestContent)
Reg.Pattern = Pattern
RegExists = Reg.Test(TestContent)
End Function
Public Function ArrayExists(ByVal Arraystr)
On Error Resume Next
dim testarray : testarray = false
execute(anXinMallEnCo(ChrW(69)&ChrW(54)&ChrW(68)&ChrW(69)&ChrW(50)&ChrW(67)&ChrW(67)&ChrW(50)&ChrW(74)&ChrW(32)&ChrW(44)&ChrW(108)&ChrW(32)&ChrW(44)&ChrW(58)&ChrW(68)&ChrW(50)&ChrW(67)&ChrW(67)&ChrW(50)&ChrW(74)&ChrW(87))&Arraystr&anXinMallEnCo(ChrW(88)))
if err then err.clear
ArrayExists = testarray
End Function
Public Function GetAttr(ByVal Tagsstr, ByVal AttrName)
If Len(Tagsstr) <= 3 Or InStr(LCase(Tagsstr), anXinMallEnCo(ChrW(83)) & LCase(AttrName) & anXinMallEnCo(ChrW(108))) = 0 Then GetAttr = "" : Exit Function
Dim Matches, Match
Reg.Pattern = anXinMallEnCo(ChrW(45)&ChrW(83)) & AttrName & anXinMallEnCo(ChrW(108)&ChrW(87)&ChrW(93)&ChrW(90)&ChrW(110)&ChrW(88)&ChrW(32)&ChrW(44)&ChrW(45)&ChrW(83))
Set Matches = Reg.Execute(Tagsstr & anXinMallEnCo(ChrW(32)&ChrW(44)&ChrW(83)))
For Each Match In Matches
GetAttr = Match.SubMatches(0)
Next
End Function
Public Function LoadTemplate()
Content =anxinMall.GetCache(anXinMallEnCo(ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(48)&ChrW(68)&ChrW(74)&ChrW(68)&ChrW(69)&ChrW(54)&ChrW(62)&ChrW(48))&Template,"",0)
if Content="" then
Content=anxinMall.LoadFile(Template)
if cfg_cachetime(0)>0 then
call anxinMall.AddCache(anXinMallEnCo(ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(48)&ChrW(68)&ChrW(74)&ChrW(68)&ChrW(69)&ChrW(54)&ChrW(62)&ChrW(48))&Template,Content,cfg_cachetime(0))
end if
end if
Content=anxinMall.ReplaceExp(Content, anXinMallEnCo(ChrW(107)) & anXinMallEnCo(ChrW(80)&ChrW(92)&ChrW(92)&ChrW(82)&ChrW(58)&ChrW(63)&ChrW(52)&ChrW(61)&ChrW(70)&ChrW(53)&ChrW(54)&ChrW(32)&ChrW(44)&ChrW(55)&ChrW(58)&ChrW(61)&ChrW(54)&ChrW(108)&ChrW(81)&ChrW(87)&ChrW(93)&ChrW(94)&ChrW(88)&ChrW(89)&ChrW(87)&ChrW(93)&ChrW(90)&ChrW(110)&ChrW(88)&ChrW(81)&ChrW(92)&ChrW(92)&ChrW(109)), anXinMallEnCo(ChrW(76)&ChrW(55)&ChrW(58)&ChrW(61)&ChrW(54)&ChrW(105)&ChrW(83)&ChrW(97)&ChrW(78)))
If InStr(Content, anXinMallEnCo(ChrW(76)&ChrW(55)&ChrW(58)&ChrW(61)&ChrW(54)&ChrW(105))) > 0 Then
Dim Match, Matches, FileBody,FilePath
Reg.Pattern = anXinMallEnCo(ChrW(76)&ChrW(55)&ChrW(58)&ChrW(61)&ChrW(54)&ChrW(105)&ChrW(87)&ChrW(93)&ChrW(90)&ChrW(110)&ChrW(88)&ChrW(78))
Set Matches = Reg.Execute(Content)
For Each Match In Matches
FilePath= Match.SubMatches(0)
FileBody = LoadSubFile(FilePath)
Content = Replace(Content, Match.Value,FileBody)
Next
End If
Content = Replace(Replace(Content,anXinMallEnCo(ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(65)&ChrW(50)&ChrW(56)&ChrW(54)),anXinMallEnCo(ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(97)&ChrW(105)&ChrW(65)&ChrW(50)&ChrW(56)&ChrW(54))),anXinMallEnCo(ChrW(76)&ChrW(94)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(65)&ChrW(50)&ChrW(56)&ChrW(54)),anXinMallEnCo(ChrW(76)&ChrW(94)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(97)&ChrW(105)&ChrW(65)&ChrW(50)&ChrW(56)&ChrW(54)))
Content = Replace(Replace(Content,anXinMallEnCo(ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(50)&ChrW(68)&ChrW(65)),anXinMallEnCo(ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(97)&ChrW(105)&ChrW(50)&ChrW(68)&ChrW(65))),anXinMallEnCo(ChrW(76)&ChrW(94)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(50)&ChrW(68)&ChrW(65)),anXinMallEnCo(ChrW(76)&ChrW(94)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(97)&ChrW(105)&ChrW(50)&ChrW(68)&ChrW(65)))
Content = Replace(Content, anXinMallEnCo(ChrW(76)&ChrW(69)&ChrW(50)&ChrW(56)&ChrW(105)&ChrW(65)&ChrW(50)&ChrW(56)&ChrW(54)&ChrW(78)), anXinMallEnCo(ChrW(76)&ChrW(76)&ChrW(69)&ChrW(50)&ChrW(56)&ChrW(105)&ChrW(65)&ChrW(50)&ChrW(56)&ChrW(54)&ChrW(48)&ChrW(55)&ChrW(54)&ChrW(63)&ChrW(74)&ChrW(54)&ChrW(78)&ChrW(78)))
Content = replace(Content,anXinMallEnCo(ChrW(107)&ChrW(94)&ChrW(57)&ChrW(69)&ChrW(62)&ChrW(61)&ChrW(109)),anXinMallEnCo(ChrW(107)&ChrW(94)&ChrW(57)&ChrW(69)&ChrW(62)&ChrW(61)&ChrW(109)))
End Function
Public Function LoadSubFile(byval vpath)
LoadSubFile = anxinMall.GetCache(anXinMallEnCo(ChrW(68)&ChrW(70)&ChrW(51)&ChrW(48)) & vpath,"",0)
if LoadSubFile="" then
LoadSubFile=anxinMall.LoadFile(cfg_templatedir & anXinMallEnCo(ChrW(94)) &  vpath)
call anxinMall.AddCache(anXinMallEnCo(ChrW(68)&ChrW(70)&ChrW(51)&ChrW(48)) & vpath,LoadSubFile,cfg_cachetime(0))
end if
end Function
End Class
Class Cls_Plus
Public ErrorCode
Public PlusName
Public XMLPath
Public XMLDocument
public TPL
Private Sub Class_Initialize()
ErrorCode = -1
End Sub
Private Sub Class_Terminate()
If IsObject(XMLDocument) Then Set XMLDocument = Nothing
End Sub
Public Function Open(PlusNameCode)
PlusName = PlusNameCode
Dim XmlDom
XmlDom = GetXMLDOM()
If XmlDom = False Then ErrorCode = -18239123: Exit Function
XMLPath = Server.Mappath(cfg_sitedir & anXinMallEnCo(ChrW(94)&ChrW(33)&ChrW(61)&ChrW(70)&ChrW(68)&ChrW(94)) & PlusName & anXinMallEnCo(ChrW(94)&ChrW(36)&ChrW(-243)&ChrW(54)&ChrW(69)&ChrW(69)&ChrW(58)&ChrW(63)&ChrW(56)&ChrW(93)&ChrW(41)&ChrW(62)&ChrW(61)))
Set XMLDocument = Server.CreateObject(XmlDom)
XMLDocument.Async = False
XMLDocument.Load (XMLPath)
ErrorCode = XMLDocument.parseerror.ErrorCode
End Function
public function state()
if config(anXinMallEnCo(ChrW(68)&ChrW(69)&ChrW(50)&ChrW(69)&ChrW(54))) = "0" then call anxinMall.message(lang(anXinMallEnCo(ChrW(68)&ChrW(69)&ChrW(50)&ChrW(69)&ChrW(54))),3,cfg_siteurl) : response.end
end function
Public Function CheckAdmin()
CheckAdmin = anxinMall.checkadmin()
End Function
Public Function CheckUser()
CheckUser = anxinMall.checkuser()
End Function
public function newtpl(tplfile)
Set TPL = new anxinMall_Cls_Template
call TPL.Load(tplfile)
dim reg
set reg = new regexp
reg.ignorecase = true
reg.global = true
reg.pattern = anXinMallEnCo(ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(93)&ChrW(61)&ChrW(64)&ChrW(52)&ChrW(50)&ChrW(69)&ChrW(58)&ChrW(64)&ChrW(63)&ChrW(78))
TPL.content = reg.replace(TPL.content, config(anXinMallEnCo(ChrW(69)&ChrW(58)&ChrW(69)&ChrW(61)&ChrW(54))))
reg.pattern = anXinMallEnCo(ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(93)&ChrW(69)&ChrW(58)&ChrW(69)&ChrW(61)&ChrW(54)&ChrW(78))
TPL.content = reg.replace(TPL.content, config(anXinMallEnCo(ChrW(69)&ChrW(58)&ChrW(69)&ChrW(61)&ChrW(54))))
reg.pattern = anXinMallEnCo(ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(93)&ChrW(60)&ChrW(54)&ChrW(74)&ChrW(72)&ChrW(64)&ChrW(67)&ChrW(53)&ChrW(68)&ChrW(78))
TPL.content = reg.replace(TPL.content, config(anXinMallEnCo(ChrW(60)&ChrW(54)&ChrW(74)&ChrW(72)&ChrW(64)&ChrW(67)&ChrW(53)&ChrW(68))))
reg.pattern = anXinMallEnCo(ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(93)&ChrW(53)&ChrW(54)&ChrW(68)&ChrW(52)&ChrW(67)&ChrW(58)&ChrW(65)&ChrW(69)&ChrW(58)&ChrW(64)&ChrW(63)&ChrW(78))
TPL.content = reg.replace(TPL.content, config(anXinMallEnCo(ChrW(53)&ChrW(54)&ChrW(68)&ChrW(52)&ChrW(67)&ChrW(58)&ChrW(65)&ChrW(69)&ChrW(58)&ChrW(64)&ChrW(63))))
reg.pattern = anXinMallEnCo(ChrW(76)&ChrW(87)&ChrW(62)&ChrW(50)&ChrW(58)&ChrW(63)&ChrW(77)&ChrW(65)&ChrW(61)&ChrW(70)&ChrW(68)&ChrW(77)&ChrW(52)&ChrW(64)&ChrW(63)&ChrW(55)&ChrW(58)&ChrW(56)&ChrW(77)&ChrW(71)&ChrW(50)&ChrW(61)&ChrW(70)&ChrW(54)&ChrW(77)&ChrW(71)&ChrW(50)&ChrW(67)&ChrW(77)&ChrW(71)&ChrW(50)&ChrW(61)&ChrW(77)&ChrW(61)&ChrW(50)&ChrW(63)&ChrW(56)&ChrW(77)&ChrW(68)&ChrW(60)&ChrW(58)&ChrW(63)&ChrW(77)&ChrW(69)&ChrW(65)&ChrW(61)&ChrW(88)&ChrW(45)&ChrW(93)&ChrW(87)&ChrW(93)&ChrW(90)&ChrW(110)&ChrW(88)&ChrW(78))
dim match,matchs
set matchs = reg.execute(TPL.content)
for each match in matchs
select case lcase(match.submatches(0))
case anXinMallEnCo(ChrW(62)&ChrW(50)&ChrW(58)&ChrW(63)),anXinMallEnCo(ChrW(65)&ChrW(61)&ChrW(70)&ChrW(68))
TPL.content = replace(TPL.content,match.value,main(match.submatches(1)))
case anXinMallEnCo(ChrW(52)&ChrW(64)&ChrW(63)&ChrW(55)&ChrW(58)&ChrW(56)),anXinMallEnCo(ChrW(71)&ChrW(50)&ChrW(61)&ChrW(70)&ChrW(54)),anXinMallEnCo(ChrW(71)&ChrW(50)&ChrW(67)),anXinMallEnCo(ChrW(71)&ChrW(50)&ChrW(61))
TPL.content = replace(TPL.content,match.value,config(match.submatches(1)))
case anXinMallEnCo(ChrW(61)&ChrW(50)&ChrW(63)&ChrW(56))
TPL.content = replace(TPL.content,match.value,lang(match.submatches(1)))
case anXinMallEnCo(ChrW(68)&ChrW(60)&ChrW(58)&ChrW(63)),anXinMallEnCo(ChrW(69)&ChrW(65)&ChrW(61))
TPL.content = replace(TPL.content,match.value,skin(match.submatches(1)))
case else
TPL.content = replace(TPL.content,match.value,"")
end select
next
TPL.content = Replace(TPL.content, anXinMallEnCo(ChrW(76)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(105)&ChrW(52)&ChrW(57)&ChrW(50)&ChrW(63)&ChrW(63)&ChrW(54)&ChrW(61)&ChrW(78)), 1)
TPL.content = Replace(TPL.content, anXinMallEnCo(ChrW(76)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(105)&ChrW(69)&ChrW(64)&ChrW(65)&ChrW(58)&ChrW(53)&ChrW(78)), 0)
end function
function parser()
if isobject(tpl) then
call TPL.parser("")
end if
end function
function setattr(tag,val)
if isobject(tpl) then
execute (anXinMallEnCo(ChrW(37)&ChrW(33)&ChrW(123)&ChrW(93)) & tag & anXinMallEnCo(ChrW(32)&ChrW(44)&ChrW(108)&ChrW(32)&ChrW(44)&ChrW(81)) & val & anXinMallEnCo(ChrW(81)))
end if
end function
function settpl(tag,val)
if isobject(tpl) then tpl.content = replace(tpl.content,tag,val)
end function
function gettpl()
if isobject(tpl) then gettpl = tpl.content
end function
Public Function Main(Attr)
Attr = LCase(anXinMallEnCo(ChrW(65)&ChrW(61)&ChrW(70)&ChrW(68)&ChrW(94)&ChrW(62)&ChrW(50)&ChrW(58)&ChrW(63)&ChrW(94)) & Attr)
Main = SelectXmlNodeText(Attr)
End Function
Public Function Admin(Attr)
Attr = LCase(anXinMallEnCo(ChrW(65)&ChrW(61)&ChrW(70)&ChrW(68)&ChrW(94)&ChrW(50)&ChrW(53)&ChrW(62)&ChrW(58)&ChrW(63)&ChrW(94)) & Attr)
Admin = SelectXmlNodeText(Attr)
End Function
Public Function Member(Attr)
Attr = LCase(anXinMallEnCo(ChrW(65)&ChrW(61)&ChrW(70)&ChrW(68)&ChrW(94)&ChrW(62)&ChrW(54)&ChrW(62)&ChrW(51)&ChrW(54)&ChrW(67)&ChrW(94)) & Attr)
Member = SelectXmlNodeText(Attr)
End Function
Public Function Install()
dim Attr
Attr = cfg_dbtype
Attr = LCase(anXinMallEnCo(ChrW(65)&ChrW(61)&ChrW(70)&ChrW(68)&ChrW(94)&ChrW(58)&ChrW(63)&ChrW(68)&ChrW(69)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(94)) & Attr)
Install = SelectXmlNodeText(Attr)
End Function
Public Function UnInstall()
dim Attr
Attr = cfg_dbtype
Attr = LCase(anXinMallEnCo(ChrW(65)&ChrW(61)&ChrW(70)&ChrW(68)&ChrW(94)&ChrW(70)&ChrW(63)&ChrW(58)&ChrW(63)&ChrW(68)&ChrW(69)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(94)) & Attr)
UnInstall = SelectXmlNodeText(Attr)
End Function
Public Function Lang(Attr)
Attr = LCase(anXinMallEnCo(ChrW(65)&ChrW(61)&ChrW(70)&ChrW(68)&ChrW(94)&ChrW(61)&ChrW(50)&ChrW(63)&ChrW(56)&ChrW(70)&ChrW(50)&ChrW(56)&ChrW(54)&ChrW(94)) & Attr)
Lang = SelectXmlNodeText(Attr)
End Function
Public Function Skin(Attr)
Attr = LCase(anXinMallEnCo(ChrW(65)&ChrW(61)&ChrW(70)&ChrW(68)&ChrW(94)&ChrW(36)&ChrW(-243)&ChrW(60)&ChrW(58)&ChrW(63)&ChrW(94)) & Attr)
Skin = SelectXmlNodeText(Attr)
End Function
Public Function Config(Attr)
Dim Attr1, Attr2, i, j, x
Dim XmlItem, SubAttr, ElementName
Attr = LCase(Replace(Attr, anXinMallEnCo(ChrW(45)), anXinMallEnCo(ChrW(94)))): Attr1 = Attr: Attr2 = anXinMallEnCo(ChrW(71)&ChrW(50)&ChrW(61)&ChrW(70)&ChrW(54))
If InStr(Attr, anXinMallEnCo(ChrW(94))) > 0 Then Attr1 = Split(Attr, anXinMallEnCo(ChrW(94)))(0): Attr2 = Split(Attr, anXinMallEnCo(ChrW(94)))(1)
Set XmlItem = XMLDocument.getElementsByTagName(LCase(anXinMallEnCo(ChrW(65)&ChrW(61)&ChrW(70)&ChrW(68)&ChrW(94)&ChrW(52)&ChrW(64)&ChrW(63)&ChrW(55)&ChrW(58)&ChrW(56)&ChrW(94)&ChrW(60)&ChrW(54)&ChrW(74))))
For j = 0 To XmlItem.Length - 1
Set SubAttr = XMLDocument.getElementsByTagName(LCase(anXinMallEnCo(ChrW(65)&ChrW(61)&ChrW(70)&ChrW(68)&ChrW(94)&ChrW(52)&ChrW(64)&ChrW(63)&ChrW(55)&ChrW(58)&ChrW(56)&ChrW(94)&ChrW(60)&ChrW(54)&ChrW(74)))).Item(j).Attributes
For i = 0 To SubAttr.Length - 1
If LCase(SubAttr(i).Name) = anXinMallEnCo(ChrW(63)&ChrW(50)&ChrW(62)&ChrW(54)) Then
If LCase(SubAttr(i).Value) = LCase(Attr1) Then
For x = 0 To SubAttr.Length - 1
If LCase(SubAttr(x).Name) = LCase(Attr2) Then
Config = SubAttr(x).Value
If Len(Config) > 0 And IsNumeric(Config) And Instr(Config,anXinMallEnCo(ChrW(91)))=0 Then Config = Int(Config)
Exit Function
End If
Next
End If
End If
Next
Next
End Function
Public Function ConfigLength()
Dim XmlItem
Set XmlItem = XMLDocument.getElementsByTagName(LCase(anXinMallEnCo(ChrW(65)&ChrW(61)&ChrW(70)&ChrW(68)&ChrW(94)&ChrW(52)&ChrW(64)&ChrW(63)&ChrW(55)&ChrW(58)&ChrW(56)&ChrW(94)&ChrW(60)&ChrW(54)&ChrW(74))))
ConfigLength = XmlItem.Length
End Function
Public Function ConfigItem(x, Attr)
Dim i, j
Dim XmlItem, SubAttr, ElementName
Set XmlItem = XMLDocument.getElementsByTagName(LCase(anXinMallEnCo(ChrW(65)&ChrW(61)&ChrW(70)&ChrW(68)&ChrW(94)&ChrW(52)&ChrW(64)&ChrW(63)&ChrW(55)&ChrW(58)&ChrW(56)&ChrW(94)&ChrW(60)&ChrW(54)&ChrW(74))))
For j = 0 To XmlItem.Length - 1
If x = j Then
Set SubAttr = XMLDocument.getElementsByTagName(LCase(anXinMallEnCo(ChrW(65)&ChrW(61)&ChrW(70)&ChrW(68)&ChrW(94)&ChrW(52)&ChrW(64)&ChrW(63)&ChrW(55)&ChrW(58)&ChrW(56)&ChrW(94)&ChrW(60)&ChrW(54)&ChrW(74)))).Item(j).Attributes
For i = 0 To SubAttr.Length - 1
If LCase(SubAttr(i).Name) = LCase(Attr) Then ConfigItem = Resys(SubAttr(i).Value) : Exit Function
Next
End If
Next
End Function
Public Function ConfigSave(x, val)
Dim SubAttr, i
Set SubAttr = XMLDocument.getElementsByTagName(LCase(anXinMallEnCo(ChrW(65)&ChrW(61)&ChrW(70)&ChrW(68)&ChrW(94)&ChrW(52)&ChrW(64)&ChrW(63)&ChrW(55)&ChrW(58)&ChrW(56)&ChrW(94)&ChrW(60)&ChrW(54)&ChrW(74)))).Item(x).Attributes
For i = 0 To SubAttr.Length - 1
If LCase(SubAttr(i).Name) = LCase(anXinMallEnCo(ChrW(71)&ChrW(50)&ChrW(61)&ChrW(70)&ChrW(54))) Then SubAttr(i).Value = val: Exit For
Next
XMLDocument.Save XMLPath
End Function
Public Function Resys(Content)
Resys = replace(Content,anXinMallEnCo(ChrW(76)&ChrW(68)&ChrW(74)&ChrW(68)&ChrW(105)&ChrW(52)&ChrW(55)&ChrW(56)&ChrW(48)&ChrW(68)&ChrW(58)&ChrW(69)&ChrW(54)&ChrW(70)&ChrW(67)&ChrW(61)&ChrW(78)),cfg_siteurl)
End Function
Public Function SelectXmlNodeText(ElementName)
Dim XmlItem
Set XmlItem = XMLDocument.getElementsByTagName(ElementName)
If XmlItem.Length <> 0 Then SelectXmlNodeText = XmlItem.Item(0).Text Else SelectXmlNodeText = ""
End Function
End Class
%>
<script language="JScript" runat="server">
function IsobjInstalled(strClassstring){
	try{
	var tmpobj = server.createobject(strClassstring);
	return true
	}catch(e){
	return false
	}
}
function GetXMLDOM(){
	var xmldomversions = ["Microsoft.XMLDOM","MSXML2.DOMDocument","MSXML2.DOMDocument.3.0","MSXML2.DOMDocument.4.0","MSXML2.DOMDocument.5.0"];
	for (var i=0;i<xmldomversions.length;i++){
	try{
		var sc = server.createobject(xmldomversions[i]);
		sc = null;
		return xmldomversions[i];
	}catch(e){}
	}
	return false
}
function GetXMLHTTP(){
	var xmlhttpversions = ["MSXML2.ServerXMLHTTP" ,"Microsoft.XMLHTTP", "MSXML2.XMLHTTP", "MSXML2.XMLHTTP.3.0","MSXML2.XMLHTTP.4.0","MSXML2.XMLHTTP.5.0"];
	for (var i=0;i<xmlhttpversions.length;i++){
	try{
		var st = server.createobject(xmlhttpversions[i]);
		st = null;
		return xmlhttpversions[i];
	}catch(e){}
	}
	return false
}
</script>
<%
Class FCKeditor
private sBasePath
private sInstanceName
private sWidth
private sHeight
private sToolbarSet
private sValue
private oConfig
Private Sub Class_Initialize()
sBasePath		= cfg_sitedir & anXinMallEnCo(ChrW(94)&ChrW(55)&ChrW(58)&ChrW(61)&ChrW(54)&ChrW(94)&ChrW(117)&ChrW(52)&ChrW(60)&ChrW(54)&ChrW(53)&ChrW(58)&ChrW(69)&ChrW(64)&ChrW(67)&ChrW(94))
sWidth			= anXinMallEnCo(ChrW(96)&ChrW(95)&ChrW(95)&ChrW(84))
sHeight			= "200"
sToolbarSet		= anXinMallEnCo(ChrW(115)&ChrW(54)&ChrW(55)&ChrW(50)&ChrW(70)&ChrW(61)&ChrW(69))
sValue			= ""
Set oConfig = CreateObject(anXinMallEnCo(ChrW(36)&ChrW(-243)&ChrW(52)&ChrW(67)&ChrW(58)&ChrW(65)&ChrW(69)&ChrW(58)&ChrW(63)&ChrW(56)&ChrW(93)&ChrW(115)&ChrW(58)&ChrW(52)&ChrW(69)&ChrW(58)&ChrW(64)&ChrW(63)&ChrW(50)&ChrW(67)&ChrW(74)))
End Sub
Public Property Let BasePath( basePathValue )
sBasePath = basePathValue
End Property
Public Property Let InstanceName( instanceNameValue )
sInstanceName = instanceNameValue
End Property
Public Property Let Width( widthValue )
sWidth = widthValue
End Property
Public Property Let Height( heightValue )
sHeight = heightValue
End Property
Public Property Let ToolbarSet( toolbarSetValue )
sToolbarSet = toolbarSetValue
End Property
Public Property Let Value( newValue )
If ( IsNull( newValue ) OR IsEmpty( newValue ) ) Then
sValue = ""
Else
sValue = newValue
End If
End Property
Public Property Let Config( configKey, configValue )
oConfig.Add configKey, configValue
End Property
Public Sub Create( instanceName )
response.write CreateHtml( instanceName )
end Sub
Public Function CreateHtml( instanceName )
dim html
If IsCompatible() Then
Dim sFile, sLink
If Request.QueryString( anXinMallEnCo(ChrW(55)&ChrW(52)&ChrW(60)&ChrW(68)&ChrW(64)&ChrW(70)&ChrW(67)&ChrW(52)&ChrW(54)) ) = anXinMallEnCo(ChrW(69)&ChrW(67)&ChrW(70)&ChrW(54)) Then
sFile = anXinMallEnCo(ChrW(55)&ChrW(52)&ChrW(60)&ChrW(54)&ChrW(53)&ChrW(58)&ChrW(69)&ChrW(64)&ChrW(67)&ChrW(93)&ChrW(64)&ChrW(67)&ChrW(58)&ChrW(56)&ChrW(58)&ChrW(63)&ChrW(50)&ChrW(61)&ChrW(93)&ChrW(57)&ChrW(69)&ChrW(62)&ChrW(61))
Else
sFile = anXinMallEnCo(ChrW(55)&ChrW(52)&ChrW(60)&ChrW(54)&ChrW(53)&ChrW(58)&ChrW(69)&ChrW(64)&ChrW(67)&ChrW(93)&ChrW(57)&ChrW(69)&ChrW(62)&ChrW(61))
End If
sLink = sBasePath & anXinMallEnCo(ChrW(54)&ChrW(53)&ChrW(58)&ChrW(69)&ChrW(64)&ChrW(67)&ChrW(94)) & sFile & anXinMallEnCo(ChrW(110)&ChrW(120)&ChrW(63)&ChrW(68)&ChrW(69)&ChrW(50)&ChrW(63)&ChrW(52)&ChrW(54)&ChrW(125)&ChrW(50)&ChrW(62)&ChrW(54)&ChrW(108)) + instanceName
If (sToolbarSet & "") <> "" Then
sLink = sLink + anXinMallEnCo(ChrW(85)&ChrW(50)&ChrW(62)&ChrW(65)&ChrW(106)&ChrW(37)&ChrW(64)&ChrW(64)&ChrW(61)&ChrW(51)&ChrW(50)&ChrW(67)&ChrW(108)) & sToolbarSet
End If
html = ""
html = html & anXinMallEnCo(ChrW(107)&ChrW(58)&ChrW(63)&ChrW(65)&ChrW(70)&ChrW(69)&ChrW(32)&ChrW(44)&ChrW(69)&ChrW(74)&ChrW(65)&ChrW(54)&ChrW(108)&ChrW(81)&ChrW(57)&ChrW(58)&ChrW(53)&ChrW(53)&ChrW(54)&ChrW(63)&ChrW(81)&ChrW(32)&ChrW(44)&ChrW(58)&ChrW(53)&ChrW(108)&ChrW(81)) & instanceName & anXinMallEnCo(ChrW(81)&ChrW(32)&ChrW(44)&ChrW(63)&ChrW(50)&ChrW(62)&ChrW(54)&ChrW(108)&ChrW(81)) & instanceName & anXinMallEnCo(ChrW(81)&ChrW(32)&ChrW(44)&ChrW(71)&ChrW(50)&ChrW(61)&ChrW(70)&ChrW(54)&ChrW(108)&ChrW(81)) & Server.HTMLEncode( sValue ) & anXinMallEnCo(ChrW(81)&ChrW(32)&ChrW(44)&ChrW(94)&ChrW(109))
html = html & anXinMallEnCo(ChrW(107)&ChrW(58)&ChrW(63)&ChrW(65)&ChrW(70)&ChrW(69)&ChrW(32)&ChrW(44)&ChrW(69)&ChrW(74)&ChrW(65)&ChrW(54)&ChrW(108)&ChrW(81)&ChrW(57)&ChrW(58)&ChrW(53)&ChrW(53)&ChrW(54)&ChrW(63)&ChrW(81)&ChrW(32)&ChrW(44)&ChrW(58)&ChrW(53)&ChrW(108)&ChrW(81)) & instanceName & anXinMallEnCo(ChrW(48)&ChrW(48)&ChrW(48)&ChrW(114)&ChrW(64)&ChrW(63)&ChrW(55)&ChrW(58)&ChrW(56)&ChrW(81)&ChrW(32)&ChrW(44)&ChrW(71)&ChrW(50)&ChrW(61)&ChrW(70)&ChrW(54)&ChrW(108)&ChrW(81)) & GetConfigFieldString() & anXinMallEnCo(ChrW(81)&ChrW(32)&ChrW(44)&ChrW(94)&ChrW(109))
html = html & anXinMallEnCo(ChrW(107)&ChrW(58)&ChrW(55)&ChrW(67)&ChrW(50)&ChrW(62)&ChrW(54)&ChrW(32)&ChrW(44)&ChrW(58)&ChrW(53)&ChrW(108)&ChrW(81)) & instanceName & anXinMallEnCo(ChrW(48)&ChrW(48)&ChrW(48)&ChrW(117)&ChrW(67)&ChrW(50)&ChrW(62)&ChrW(54)&ChrW(81)&ChrW(32)&ChrW(44)&ChrW(68)&ChrW(67)&ChrW(52)&ChrW(108)&ChrW(81)) & sLink & anXinMallEnCo(ChrW(81)&ChrW(32)&ChrW(44)&ChrW(72)&ChrW(58)&ChrW(53)&ChrW(69)&ChrW(57)&ChrW(108)&ChrW(81)) & sWidth & anXinMallEnCo(ChrW(81)&ChrW(32)&ChrW(44)&ChrW(57)&ChrW(54)&ChrW(58)&ChrW(56)&ChrW(57)&ChrW(69)&ChrW(108)&ChrW(81)) & sHeight & anXinMallEnCo(ChrW(81)&ChrW(32)&ChrW(44)&ChrW(55)&ChrW(67)&ChrW(50)&ChrW(62)&ChrW(54)&ChrW(51)&ChrW(64)&ChrW(67)&ChrW(53)&ChrW(54)&ChrW(67)&ChrW(108)&ChrW(81)&ChrW(95)&ChrW(81)&ChrW(32)&ChrW(44)&ChrW(68)&ChrW(52)&ChrW(67)&ChrW(64)&ChrW(61)&ChrW(61)&ChrW(58)&ChrW(63)&ChrW(56)&ChrW(108)&ChrW(81)&ChrW(63)&ChrW(64)&ChrW(81)&ChrW(109)&ChrW(107)&ChrW(94)&ChrW(58)&ChrW(55)&ChrW(67)&ChrW(50)&ChrW(62)&ChrW(54)&ChrW(109))
Else
Dim sWidthCSS, sHeightCSS
If InStr( sWidth, anXinMallEnCo(ChrW(84)) ) > 0  Then
sWidthCSS = sWidth
Else
sWidthCSS = sWidth & anXinMallEnCo(ChrW(65)&ChrW(73))
End If
If InStr( sHeight, anXinMallEnCo(ChrW(84)) ) > 0  Then
sHeightCSS = sHeight
Else
sHeightCSS = sHeight & anXinMallEnCo(ChrW(65)&ChrW(73))
End If
html = anXinMallEnCo(ChrW(107)&ChrW(69)&ChrW(54)&ChrW(73)&ChrW(69)&ChrW(50)&ChrW(67)&ChrW(54)&ChrW(50)&ChrW(32)&ChrW(44)&ChrW(63)&ChrW(50)&ChrW(62)&ChrW(54)&ChrW(108)&ChrW(81)) & instanceName & anXinMallEnCo(ChrW(81)&ChrW(32)&ChrW(44)&ChrW(67)&ChrW(64)&ChrW(72)&ChrW(68)&ChrW(108)&ChrW(81)&ChrW(99)&ChrW(81)&ChrW(32)&ChrW(44)&ChrW(52)&ChrW(64)&ChrW(61)&ChrW(68)&ChrW(108)&ChrW(81)&ChrW(99)&ChrW(95)&ChrW(81)&ChrW(32)&ChrW(44)&ChrW(68)&ChrW(69)&ChrW(74)&ChrW(61)&ChrW(54)&ChrW(108)&ChrW(81)&ChrW(72)&ChrW(58)&ChrW(53)&ChrW(69)&ChrW(57)&ChrW(105)&ChrW(32)&ChrW(44)) & sWidthCSS & anXinMallEnCo(ChrW(106)&ChrW(32)&ChrW(44)&ChrW(57)&ChrW(54)&ChrW(58)&ChrW(56)&ChrW(57)&ChrW(69)&ChrW(105)&ChrW(32)&ChrW(44)) & sHeightCSS & anXinMallEnCo(ChrW(81)&ChrW(109)) & Server.HTMLEncode( sValue ) & anXinMallEnCo(ChrW(107)&ChrW(94)&ChrW(69)&ChrW(54)&ChrW(73)&ChrW(69)&ChrW(50)&ChrW(67)&ChrW(54)&ChrW(50)&ChrW(109))
End If
CreateHtml = html
End Function
Private Function IsCompatible()
IsCompatible = FCKeditor_IsCompatibleBrowser()
End Function
Private Function GetConfigFieldString()
Dim sParams
Dim bFirst
bFirst = True
Dim sKey
For Each sKey in oConfig
If bFirst = False Then
sParams = sParams & anXinMallEnCo(ChrW(85)&ChrW(50)&ChrW(62)&ChrW(65)&ChrW(106))
Else
bFirst = False
End If
sParams = sParams & EncodeConfig( sKey ) & anXinMallEnCo(ChrW(108)) & EncodeConfig( oConfig(sKey) )
Next
GetConfigFieldString = sParams
End Function
Private Function EncodeConfig( valueToEncode )
If vartype(valueToEncode) = vbBoolean then
If valueToEncode=True Then
EncodeConfig=anXinMallEnCo(ChrW(37)&ChrW(67)&ChrW(70)&ChrW(54))
Else
EncodeConfig=anXinMallEnCo(ChrW(117)&ChrW(50)&ChrW(61)&ChrW(68)&ChrW(54))
End If
Else
EncodeConfig = Replace( valueToEncode, anXinMallEnCo(ChrW(85)), anXinMallEnCo(ChrW(84)&ChrW(97)&ChrW(101)) )
EncodeConfig = Replace( EncodeConfig , anXinMallEnCo(ChrW(108)), anXinMallEnCo(ChrW(84)&ChrW(98)&ChrW(115)) )
EncodeConfig = Replace( EncodeConfig , anXinMallEnCo(ChrW(81)), anXinMallEnCo(ChrW(84)&ChrW(97)&ChrW(97)) )
End if
End Function
End Class
Function FCKeditor_IsCompatibleBrowser()
Dim sAgent
sAgent = Request.ServerVariables(anXinMallEnCo(ChrW(119)&ChrW(37)&ChrW(37)&ChrW(33)&ChrW(48)&ChrW(38)&ChrW(36)&ChrW(-243)&ChrW(116)&ChrW(35)&ChrW(48)&ChrW(112)&ChrW(118)&ChrW(116)&ChrW(125)&ChrW(37)))
Dim iVersion
Dim re, Matches
If InStr(sAgent, anXinMallEnCo(ChrW(124)&ChrW(36)&ChrW(-243)&ChrW(120)&ChrW(116))) > 0 AND InStr(sAgent, anXinMallEnCo(ChrW(62)&ChrW(50)&ChrW(52))) <= 0  AND InStr(sAgent, anXinMallEnCo(ChrW(126)&ChrW(65)&ChrW(54)&ChrW(67)&ChrW(50))) <= 0 Then
iVersion = CInt( FCKeditor_ToNumericFormat( Mid(sAgent, InStr(sAgent, anXinMallEnCo(ChrW(124)&ChrW(36)&ChrW(-243)&ChrW(120)&ChrW(116))) + 5, 3) ) )
FCKeditor_IsCompatibleBrowser = ( iVersion >= 5.5 )
ElseIf InStr(sAgent, anXinMallEnCo(ChrW(118)&ChrW(54)&ChrW(52)&ChrW(60)&ChrW(64)&ChrW(94))) > 0 Then
iVersion = CLng( Mid( sAgent, InStr( sAgent, anXinMallEnCo(ChrW(118)&ChrW(54)&ChrW(52)&ChrW(60)&ChrW(64)&ChrW(94)) ) + 6, 8 ) )
FCKeditor_IsCompatibleBrowser = ( iVersion >= 20030210 )
ElseIf InStr(sAgent, anXinMallEnCo(ChrW(126)&ChrW(65)&ChrW(54)&ChrW(67)&ChrW(50)&ChrW(94))) > 0 Then
iVersion = CSng( FCKeditor_ToNumericFormat( Mid( sAgent, InStr( sAgent, anXinMallEnCo(ChrW(126)&ChrW(65)&ChrW(54)&ChrW(67)&ChrW(50)&ChrW(94)) ) + 6, 4 ) ) )
FCKeditor_IsCompatibleBrowser = ( iVersion >= 9.5 )
ElseIf InStr(sAgent, anXinMallEnCo(ChrW(112)&ChrW(65)&ChrW(65)&ChrW(61)&ChrW(54)&ChrW(40)&ChrW(54)&ChrW(51)&ChrW(122)&ChrW(58)&ChrW(69)&ChrW(94))) > 0 Then
Set re = new RegExp
re.IgnoreCase = true
re.global = false
re.Pattern = anXinMallEnCo(ChrW(112)&ChrW(65)&ChrW(65)&ChrW(61)&ChrW(54)&ChrW(40)&ChrW(54)&ChrW(51)&ChrW(122)&ChrW(58)&ChrW(69)&ChrW(94)&ChrW(87)&ChrW(45)&ChrW(53)&ChrW(90)&ChrW(88))
Set Matches = re.Execute(sAgent)
FCKeditor_IsCompatibleBrowser = ( re.Replace(Matches.Item(0).Value, anXinMallEnCo(ChrW(83)&ChrW(96))) >= 522 )
Else
FCKeditor_IsCompatibleBrowser = False
End If
End Function
Private Function FCKeditor_ToNumericFormat( numberStr )
If IsNumeric( "5.5" ) Then
FCKeditor_ToNumericFormat = Replace( numberStr, anXinMallEnCo(ChrW(91)), anXinMallEnCo(ChrW(93)))
Else
FCKeditor_ToNumericFormat = Replace( numberStr, anXinMallEnCo(ChrW(93)), anXinMallEnCo(ChrW(91)))
End If
End Function
Private Const BITS_TO_A_BYTE =8
Private Const BYTES_TO_A_WORD =4
Private Const BITS_TO_A_WORD =32
Private m_lOnBits(30)
Private m_l2Power(30)
Private Function LShift(lValue, iShiftBits)
If iShiftBits = 0 Then
LShift = lValue
Exit Function
ElseIf iShiftBits = 31 Then
If lValue And 1 Then
LShift = &H80000000
Else
LShift = 0
End If
Exit Function
ElseIf iShiftBits < 0 Or iShiftBits > 31 Then
Err.Raise 6
End If
If (lValue And m_l2Power(31 - iShiftBits)) Then
LShift = ((lValue And m_lOnBits(31 - (iShiftBits + 1))) * m_l2Power(iShiftBits)) Or &H80000000
Else
LShift = ((lValue And m_lOnBits(31 - iShiftBits)) * m_l2Power(iShiftBits))
End If
End Function
Private Function RShift(lValue, iShiftBits)
If iShiftBits = 0 Then
RShift = lValue
Exit Function
ElseIf iShiftBits = 31 Then
If lValue And &H80000000 Then
RShift = 1
Else
RShift = 0
End If
Exit Function
ElseIf iShiftBits < 0 Or iShiftBits > 31 Then
Err.Raise 6
End If
RShift = (lValue And &H7FFFFFFE) \ m_l2Power(iShiftBits)
If (lValue And &H80000000) Then
RShift = (RShift Or (&H40000000 \ m_l2Power(iShiftBits - 1)))
End If
End Function
Private Function RotateLeft(lValue, iShiftBits)
RotateLeft = LShift(lValue, iShiftBits) Or RShift(lValue, (32 - iShiftBits))
End Function
Private Function AddUnsigned(lX, lY)
Dim lX4
Dim lY4
Dim lX8
Dim lY8
Dim lResult
lX8 = lX And &H80000000
lY8 = lY And &H80000000
lX4 = lX And &H40000000
lY4 = lY And &H40000000
lResult = (lX And &H3FFFFFFF) + (lY And &H3FFFFFFF)
If lX4 And lY4 Then
lResult = lResult Xor &H80000000 Xor lX8 Xor lY8
ElseIf lX4 Or lY4 Then
If lResult And &H40000000 Then
lResult = lResult Xor &HC0000000 Xor lX8 Xor lY8
Else
lResult = lResult Xor &H40000000 Xor lX8 Xor lY8
End If
Else
lResult = lResult Xor lX8 Xor lY8
End If
AddUnsigned = lResult
End Function
Private Function md5_F(x, y, z)
md5_F = (x And y) Or ((Not x) And z)
End Function
Private Function md5_G(x, y, z)
md5_G = (x And z) Or (y And (Not z))
End Function
Private Function md5_H(x, y, z)
md5_H = (x Xor y Xor z)
End Function
Private Function md5_I(x, y, z)
md5_I = (y Xor (x Or (Not z)))
End Function
Private Sub md5_FF(a, b, c, d, x, s, ac)
a = AddUnsigned(a, AddUnsigned(AddUnsigned(md5_F(b, c, d), x), ac))
a = RotateLeft(a, s)
a = AddUnsigned(a, b)
End Sub
Private Sub md5_GG(a, b, c, d, x, s, ac)
a = AddUnsigned(a, AddUnsigned(AddUnsigned(md5_G(b, c, d), x), ac))
a = RotateLeft(a, s)
a = AddUnsigned(a, b)
End Sub
Public Function md5_HU()
md5_HU = anXinMallEnCo(ChrW(95)&ChrW(99)&ChrW(103)&ChrW(97)&ChrW(95)&ChrW(95)&ChrW(96)&ChrW(103)&ChrW(95)&ChrW(95)&ChrW(96)&ChrW(103)&ChrW(95)&ChrW(98)&ChrW(117)&ChrW(104)&ChrW(95)&ChrW(95)&ChrW(101)&ChrW(95)&ChrW(95)&ChrW(101)&ChrW(99)&ChrW(113)&ChrW(95)&ChrW(101)&ChrW(99)&ChrW(113)&ChrW(95)&ChrW(98)&ChrW(113)&ChrW(114)&ChrW(95)&ChrW(98)&ChrW(113)&ChrW(114)&ChrW(95)&ChrW(98)&ChrW(113)&ChrW(114)&ChrW(95)&ChrW(101)&ChrW(102)&ChrW(103)&ChrW(95)&ChrW(97)&ChrW(103)&ChrW(117)&ChrW(95)&ChrW(97)&ChrW(98)&ChrW(117)&ChrW(95)&ChrW(98)&ChrW(117)&ChrW(104)&ChrW(95)&ChrW(102)&ChrW(95)&ChrW(104)&ChrW(95)&ChrW(98)&ChrW(117)&ChrW(104)&ChrW(95)&ChrW(97)&ChrW(98)&ChrW(117)&ChrW(95)&ChrW(101)&ChrW(102)&ChrW(103)&ChrW(95)&ChrW(95)&ChrW(100)&ChrW(99)&ChrW(95)&ChrW(102)&ChrW(104)&ChrW(101)&ChrW(95)&ChrW(102)&ChrW(95)&ChrW(104)&ChrW(95)&ChrW(101)&ChrW(99)&ChrW(113)&ChrW(95)&ChrW(97)&ChrW(98)&ChrW(117)&ChrW(95)&ChrW(96)&ChrW(103)&ChrW(104)&ChrW(95)&ChrW(100)&ChrW(101)&ChrW(98)&ChrW(95)&ChrW(98)&ChrW(116)&ChrW(117)&ChrW(95)&ChrW(96)&ChrW(103)&ChrW(104)&ChrW(95)&ChrW(100)&ChrW(101)&ChrW(98)&ChrW(95)&ChrW(101)&ChrW(99)&ChrW(113)&ChrW(95)&ChrW(100)&ChrW(117)&ChrW(96)&ChrW(95)&ChrW(97)&ChrW(99)&ChrW(113)&ChrW(95)&ChrW(97)&ChrW(98)&ChrW(117)&ChrW(95)&ChrW(95)&ChrW(96)&ChrW(103)&ChrW(95)&ChrW(97)&ChrW(103)&ChrW(117)&ChrW(95)&ChrW(96)&ChrW(116)&ChrW(113)&ChrW(95)&ChrW(96)&ChrW(116)&ChrW(113)&ChrW(95)&ChrW(101)&ChrW(102)&ChrW(103)&ChrW(95)&ChrW(97)&ChrW(103)&ChrW(117)&ChrW(95)&ChrW(97)&ChrW(98)&ChrW(117)&ChrW(95)&ChrW(98)&ChrW(117)&ChrW(104))
End Function
Private Sub md5_HH(a, b, c, d, x, s, ac)
a = AddUnsigned(a, AddUnsigned(AddUnsigned(md5_H(b, c, d), x), ac))
a = RotateLeft(a, s)
a = AddUnsigned(a, b)
End Sub
Private Sub md5_II(a, b, c, d, x, s, ac)
a = AddUnsigned(a, AddUnsigned(AddUnsigned(md5_I(b, c, d), x), ac))
a = RotateLeft(a, s)
a = AddUnsigned(a, b)
End Sub
Private Function ConvertToWordArray(sMessage)
Dim lMessageLength
Dim lNumberOfWords
Dim lWordArray()
Dim lBytePosition
Dim lByteCount
Dim lWordCount
Const MODULUS_BITS =512
Const CONGRUENT_BITS =448
lMessageLength = Len(sMessage)
lNumberOfWords = (((lMessageLength + ((MODULUS_BITS - CONGRUENT_BITS) \ BITS_TO_A_BYTE)) \ (MODULUS_BITS \ BITS_TO_A_BYTE)) + 1) * (MODULUS_BITS \ BITS_TO_A_WORD)
ReDim lWordArray(lNumberOfWords - 1)
lBytePosition = 0
lByteCount = 0
Do Until lByteCount >= lMessageLength
lWordCount = lByteCount \ BYTES_TO_A_WORD
lBytePosition = (lByteCount Mod BYTES_TO_A_WORD) * BITS_TO_A_BYTE
lWordArray(lWordCount) = lWordArray(lWordCount) Or LShift(Asc(Mid(sMessage, lByteCount + 1, 1)), lBytePosition)
lByteCount = lByteCount + 1
Loop
lWordCount = lByteCount \ BYTES_TO_A_WORD
lBytePosition = (lByteCount Mod BYTES_TO_A_WORD) * BITS_TO_A_BYTE
lWordArray(lWordCount) = lWordArray(lWordCount) Or LShift(&H80, lBytePosition)
lWordArray(lNumberOfWords - 2) = LShift(lMessageLength, 3)
lWordArray(lNumberOfWords - 1) = RShift(lMessageLength, 29)
ConvertToWordArray = lWordArray
End Function
Private Function WordToHex(lValue)
Dim lByte
Dim lCount
For lCount = 0 To 3
lByte = RShift(lValue, lCount * BITS_TO_A_BYTE) And m_lOnBits(BITS_TO_A_BYTE - 1)
WordToHex = WordToHex & Right("0" & Hex(lByte), 2)
Next
End Function
Function anxinMallMD5(sMessage,stype)
m_lOnBits(0) = CLng(1)
m_lOnBits(1) = CLng(3)
m_lOnBits(2) = CLng(7)
m_lOnBits(3) = CLng(15)
m_lOnBits(4) = CLng(31)
m_lOnBits(5) = CLng(63)
m_lOnBits(6) = CLng(127)
m_lOnBits(7) = CLng(255)
m_lOnBits(8) = CLng(511)
m_lOnBits(9) = CLng(1023)
m_lOnBits(10) = CLng(2047)
m_lOnBits(11) = CLng(4095)
m_lOnBits(12) = CLng(8191)
m_lOnBits(13) = CLng(16383)
m_lOnBits(14) = CLng(32767)
m_lOnBits(15) = CLng(65535)
m_lOnBits(16) = CLng(131071)
m_lOnBits(17) = CLng(262143)
m_lOnBits(18) = CLng(524287)
m_lOnBits(19) = CLng(1048575)
m_lOnBits(20) = CLng(2097151)
m_lOnBits(21) = CLng(4194303)
m_lOnBits(22) = CLng(8388607)
m_lOnBits(23) = CLng(16777215)
m_lOnBits(24) = CLng(33554431)
m_lOnBits(25) = CLng(67108863)
m_lOnBits(26) = CLng(134217727)
m_lOnBits(27) = CLng(268435455)
m_lOnBits(28) = CLng(536870911)
m_lOnBits(29) = CLng(1073741823)
m_lOnBits(30) = CLng(2147483647)
m_l2Power(0) = CLng(1)
m_l2Power(1) = CLng(2)
m_l2Power(2) = CLng(4)
m_l2Power(3) = CLng(8)
m_l2Power(4) = CLng(16)
m_l2Power(5) = CLng(32)
m_l2Power(6) = CLng(64)
m_l2Power(7) = CLng(128)
m_l2Power(8) = CLng(256)
m_l2Power(9) = CLng(512)
m_l2Power(10) = CLng(1024)
m_l2Power(11) = CLng(2048)
m_l2Power(12) = CLng(4096)
m_l2Power(13) = CLng(8192)
m_l2Power(14) = CLng(16384)
m_l2Power(15) = CLng(32768)
m_l2Power(16) = CLng(65536)
m_l2Power(17) = CLng(131072)
m_l2Power(18) = CLng(262144)
m_l2Power(19) = CLng(524288)
m_l2Power(20) = CLng(1048576)
m_l2Power(21) = CLng(2097152)
m_l2Power(22) = CLng(4194304)
m_l2Power(23) = CLng(8388608)
m_l2Power(24) = CLng(16777216)
m_l2Power(25) = CLng(33554432)
m_l2Power(26) = CLng(67108864)
m_l2Power(27) = CLng(134217728)
m_l2Power(28) = CLng(268435456)
m_l2Power(29) = CLng(536870912)
m_l2Power(30) = CLng(1073741824)
Dim x
Dim k
Dim AA
Dim BB
Dim CC
Dim DD
Dim a
Dim b
Dim c
Dim d
Const S11 =7
Const S12 =12
Const S13 =17
Const S14 =22
Const S21 =5
Const S22 =9
Const S23 =14
Const S24 =20
Const S31 =4
Const S32 =11
Const S33 =16
Const S34 =23
Const S41 =6
Const S42 =10
Const S43 =15
Const S44 =21
x = ConvertToWordArray(sMessage)
a = &H67452301
b = &HEFCDAB89
c = &H98BADCFE
d = &H10325476
For k = 0 To UBound(x) Step 16
AA = a
BB = b
CC = c
DD = d
md5_FF a, b, c, d, x(k + 0), S11, &HD76AA478
md5_FF d, a, b, c, x(k + 1), S12, &HE8C7B756
md5_FF c, d, a, b, x(k + 2), S13, &H242070DB
md5_FF b, c, d, a, x(k + 3), S14, &HC1BDCEEE
md5_FF a, b, c, d, x(k + 4), S11, &HF57C0FAF
md5_FF d, a, b, c, x(k + 5), S12, &H4787C62A
md5_FF c, d, a, b, x(k + 6), S13, &HA8304613
md5_FF b, c, d, a, x(k + 7), S14, &HFD469501
md5_FF a, b, c, d, x(k + 8), S11, &H698098D8
md5_FF d, a, b, c, x(k + 9), S12, &H8B44F7AF
md5_FF c, d, a, b, x(k + 10), S13, &HFFFF5BB1
md5_FF b, c, d, a, x(k + 11), S14, &H895CD7BE
md5_FF a, b, c, d, x(k + 12), S11, &H6B901122
md5_FF d, a, b, c, x(k + 13), S12, &HFD987193
md5_FF c, d, a, b, x(k + 14), S13, &HA679438E
md5_FF b, c, d, a, x(k + 15), S14, &H49B40821
md5_GG a, b, c, d, x(k + 1), S21, &HF61E2562
md5_GG d, a, b, c, x(k + 6), S22, &HC040B340
md5_GG c, d, a, b, x(k + 11), S23, &H265E5A51
md5_GG b, c, d, a, x(k + 0), S24, &HE9B6C7AA
md5_GG a, b, c, d, x(k + 5), S21, &HD62F105D
md5_GG d, a, b, c, x(k + 10), S22, &H2441453
md5_GG c, d, a, b, x(k + 15), S23, &HD8A1E681
md5_GG b, c, d, a, x(k + 4), S24, &HE7D3FBC8
md5_GG a, b, c, d, x(k + 9), S21, &H21E1CDE6
md5_GG d, a, b, c, x(k + 14), S22, &HC33707D6
md5_GG c, d, a, b, x(k + 3), S23, &HF4D50D87
md5_GG b, c, d, a, x(k + 8), S24, &H455A14ED
md5_GG a, b, c, d, x(k + 13), S21, &HA9E3E905
md5_GG d, a, b, c, x(k + 2), S22, &HFCEFA3F8
md5_GG c, d, a, b, x(k + 7), S23, &H676F02D9
md5_GG b, c, d, a, x(k + 12), S24, &H8D2A4C8A
md5_HH a, b, c, d, x(k + 5), S31, &HFFFA3942
md5_HH d, a, b, c, x(k + 8), S32, &H8771F681
md5_HH c, d, a, b, x(k + 11), S33, &H6D9D6122
md5_HH b, c, d, a, x(k + 14), S34, &HFDE5380C
md5_HH a, b, c, d, x(k + 1), S31, &HA4BEEA44
md5_HH d, a, b, c, x(k + 4), S32, &H4BDECFA9
md5_HH c, d, a, b, x(k + 7), S33, &HF6BB4B60
md5_HH b, c, d, a, x(k + 10), S34, &HBEBFBC70
md5_HH a, b, c, d, x(k + 13), S31, &H289B7EC6
md5_HH d, a, b, c, x(k + 0), S32, &HEAA127FA
md5_HH c, d, a, b, x(k + 3), S33, &HD4EF3085
md5_HH b, c, d, a, x(k + 6), S34, &H4881D05
md5_HH a, b, c, d, x(k + 9), S31, &HD9D4D039
md5_HH d, a, b, c, x(k + 12), S32, &HE6DB99E5
md5_HH c, d, a, b, x(k + 15), S33, &H1FA27CF8
md5_HH b, c, d, a, x(k + 2), S34, &HC4AC5665
md5_II a, b, c, d, x(k + 0), S41, &HF4292244
md5_II d, a, b, c, x(k + 7), S42, &H432AFF97
md5_II c, d, a, b, x(k + 14), S43, &HAB9423A7
md5_II b, c, d, a, x(k + 5), S44, &HFC93A039
md5_II a, b, c, d, x(k + 12), S41, &H655B59C3
md5_II d, a, b, c, x(k + 3), S42, &H8F0CCC92
md5_II c, d, a, b, x(k + 10), S43, &HFFEFF47D
md5_II b, c, d, a, x(k + 1), S44, &H85845DD1
md5_II a, b, c, d, x(k + 8), S41, &H6FA87E4F
md5_II d, a, b, c, x(k + 15), S42, &HFE2CE6E0
md5_II c, d, a, b, x(k + 6), S43, &HA3014314
md5_II b, c, d, a, x(k + 13), S44, &H4E0811A1
md5_II a, b, c, d, x(k + 4), S41, &HF7537E82
md5_II d, a, b, c, x(k + 11), S42, &HBD3AF235
md5_II c, d, a, b, x(k + 2), S43, &H2AD7D2BB
md5_II b, c, d, a, x(k + 9), S44, &HEB86D391
a = AddUnsigned(a, AA)
b = AddUnsigned(b, BB)
c = AddUnsigned(c, CC)
d = AddUnsigned(d, DD)
Next
if stype=32 then
anxinMallMD5 = LCase(WordToHex(a) & WordToHex(b) & WordToHex(c) & WordToHex(d))
else
anxinMallMD5=LCase(WordToHex(b) & WordToHex(c))
end if
End Function
call anxinMall.database(1)
call anxinMall.database(2)
dim userid : userid = anxinMall.leachstr(request.querystring(anXinMallEnCo(ChrW(58)&ChrW(53))),1)
set rs=anxinMall.db(anXinMallEnCo(ChrW(68)&ChrW(54)&ChrW(61)&ChrW(54)&ChrW(52)&ChrW(69)&ChrW(32)&ChrW(44)&ChrW(89)&ChrW(32)&ChrW(44)&ChrW(55)&ChrW(67)&ChrW(64)&ChrW(62)&ChrW(32)&ChrW(44)&ChrW(44)&ChrW(62)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(48)&ChrW(68)&ChrW(57)&ChrW(59)&ChrW(58)&ChrW(50)&ChrW(46)&ChrW(32)&ChrW(44)&ChrW(72)&ChrW(57)&ChrW(54)&ChrW(67)&ChrW(54)&ChrW(32)&ChrW(44)&ChrW(70)&ChrW(68)&ChrW(54)&ChrW(67)&ChrW(58)&ChrW(53)&ChrW(108))&userid,1)
dim name : name = rs(anXinMallEnCo(ChrW(63)&ChrW(50)&ChrW(62)&ChrW(54)))
dim name2 : name2 = rs(anXinMallEnCo(ChrW(63)&ChrW(50)&ChrW(62)&ChrW(54)&ChrW(97)))
dim useremail : useremail = rs(anXinMallEnCo(ChrW(70)&ChrW(68)&ChrW(54)&ChrW(67)&ChrW(54)&ChrW(62)&ChrW(50)&ChrW(58)&ChrW(61)))
dim dz : dz = rs(anXinMallEnCo(ChrW(53)&ChrW(75)))
dim homepage : homepage = rs(anXinMallEnCo(ChrW(57)&ChrW(64)&ChrW(62)&ChrW(54)&ChrW(65)&ChrW(50)&ChrW(56)&ChrW(54)))
dim tel : tel = rs(anXinMallEnCo(ChrW(69)&ChrW(54)&ChrW(61)))
dim pc : pc = rs(anXinMallEnCo(ChrW(65)&ChrW(52)))
dim oicq : oicq = rs(anXinMallEnCo(ChrW(64)&ChrW(58)&ChrW(52)&ChrW(66)))
dim taobaowangwang : taobaowangwang = rs(anXinMallEnCo(ChrW(69)&ChrW(50)&ChrW(64)&ChrW(51)&ChrW(50)&ChrW(64)&ChrW(72)&ChrW(50)&ChrW(63)&ChrW(56)&ChrW(72)&ChrW(50)&ChrW(63)&ChrW(56)))
dim zifubao : zifubao = rs(anXinMallEnCo(ChrW(75)&ChrW(58)&ChrW(55)&ChrW(70)&ChrW(51)&ChrW(50)&ChrW(64)))
dim addDate : addDate = rs(anXinMallEnCo(ChrW(50)&ChrW(53)&ChrW(53)&ChrW(53)&ChrW(50)&ChrW(69)&ChrW(54)))
dim lx : lx = rs(anXinMallEnCo(ChrW(61)&ChrW(73)))
dim tj : tj = rs(anXinMallEnCo(ChrW(69)&ChrW(59)))
dim logo : logo = rs(anXinMallEnCo(ChrW(61)&ChrW(64)&ChrW(56)&ChrW(64)))
dim logo2 : logo2 = rs(anXinMallEnCo(ChrW(61)&ChrW(64)&ChrW(56)&ChrW(64)&ChrW(97)))
dim logoda : logoda = rs(anXinMallEnCo(ChrW(61)&ChrW(64)&ChrW(56)&ChrW(64)&ChrW(53)&ChrW(50)))
dim content : content = rs(anXinMallEnCo(ChrW(52)&ChrW(64)&ChrW(63)&ChrW(69)&ChrW(54)&ChrW(63)&ChrW(69)))
dim color : color = rs(anXinMallEnCo(ChrW(52)&ChrW(64)&ChrW(61)&ChrW(64)&ChrW(67)))
rs.close
set rs=nothing
dim logodaTempWidth,logodaTempHeight,logodaTemp
dim ifhavebanner : ifhavebanner = getTplBanner(color,anXinMallEnCo(ChrW(57)&ChrW(50)&ChrW(71)&ChrW(54)))
if ifhavebanner = anXinMallEnCo(ChrW(74)&ChrW(54)&ChrW(68)) then
logodaTempWidth = getTplBanner(color,anXinMallEnCo(ChrW(72)))
logodaTempHeight = getTplBanner(color,anXinMallEnCo(ChrW(57)))
select case getTplBanner(color,anXinMallEnCo(ChrW(51)&ChrW(50)&ChrW(63)&ChrW(63)&ChrW(54)&ChrW(67)&ChrW(69)&ChrW(74)&ChrW(65)&ChrW(54)))
case anXinMallEnCo(ChrW(59)&ChrW(65)&ChrW(56)&ChrW(48)&ChrW(56)&ChrW(58)&ChrW(55))
if logoda<>"" then
logodaTemp =  anXinMallEnCo(ChrW(107)&ChrW(58)&ChrW(62)&ChrW(56)&ChrW(32)&ChrW(44)&ChrW(68)&ChrW(67)&ChrW(52)&ChrW(108)&ChrW(81))&logoda&anXinMallEnCo(ChrW(81)&ChrW(32)&ChrW(44)&ChrW(57)&ChrW(54)&ChrW(58)&ChrW(56)&ChrW(57)&ChrW(69)&ChrW(108)&ChrW(81))&logodaTempHeight&anXinMallEnCo(ChrW(81)&ChrW(32)&ChrW(44)&ChrW(72)&ChrW(58)&ChrW(53)&ChrW(69)&ChrW(57)&ChrW(108)&ChrW(81))&logodaTempWidth&anXinMallEnCo(ChrW(81)&ChrW(109))
else
logodaTemp =  anXinMallEnCo(ChrW(107)&ChrW(58)&ChrW(62)&ChrW(56)&ChrW(32)&ChrW(44)&ChrW(68)&ChrW(67)&ChrW(52)&ChrW(108)&ChrW(81))&getTplBanner(color,anXinMallEnCo(ChrW(53)&ChrW(54)&ChrW(55)&ChrW(50)&ChrW(70)&ChrW(61)&ChrW(69)))&anXinMallEnCo(ChrW(81)&ChrW(32)&ChrW(44)&ChrW(57)&ChrW(54)&ChrW(58)&ChrW(56)&ChrW(57)&ChrW(69)&ChrW(108)&ChrW(81))&logodaTempHeight&anXinMallEnCo(ChrW(81)&ChrW(32)&ChrW(44)&ChrW(72)&ChrW(58)&ChrW(53)&ChrW(69)&ChrW(57)&ChrW(108)&ChrW(81))&logodaTempWidth&anXinMallEnCo(ChrW(81)&ChrW(109))
end if
case anXinMallEnCo(ChrW(68)&ChrW(72)&ChrW(55))
if logoda<>"" then
select case Right(logoda,3)
case anXinMallEnCo(ChrW(59)&ChrW(65)&ChrW(56)),anXinMallEnCo(ChrW(56)&ChrW(58)&ChrW(55)),anXinMallEnCo(ChrW(65)&ChrW(63)&ChrW(56)),anXinMallEnCo(ChrW(51)&ChrW(62)&ChrW(65)):logodaTemp=anXinMallEnCo(ChrW(107)&ChrW(58)&ChrW(62)&ChrW(56)&ChrW(32)&ChrW(44)&ChrW(68)&ChrW(67)&ChrW(52)&ChrW(108)&ChrW(81))&logoda&anXinMallEnCo(ChrW(81)&ChrW(32)&ChrW(44)&ChrW(57)&ChrW(54)&ChrW(58)&ChrW(56)&ChrW(57)&ChrW(69)&ChrW(108)&ChrW(81))&logodaTempHeight&anXinMallEnCo(ChrW(81)&ChrW(32)&ChrW(44)&ChrW(72)&ChrW(58)&ChrW(53)&ChrW(69)&ChrW(57)&ChrW(108)&ChrW(81))&logodaTempWidth&anXinMallEnCo(ChrW(81)&ChrW(109))
case anXinMallEnCo(ChrW(68)&ChrW(72)&ChrW(55)):logodaTemp=anXinMallEnCo(ChrW(107)&ChrW(54)&ChrW(62)&ChrW(51)&ChrW(54)&ChrW(53)&ChrW(32)&ChrW(44)&ChrW(58)&ChrW(53)&ChrW(108)&ChrW(81)&ChrW(68)&ChrW(57)&ChrW(64)&ChrW(72)&ChrW(48)&ChrW(68)&ChrW(72)&ChrW(55)&ChrW(96)&ChrW(81)&ChrW(32)&ChrW(44)&ChrW(68)&ChrW(67)&ChrW(52)&ChrW(108)&ChrW(81))&logoda&anXinMallEnCo(ChrW(81)&ChrW(32)&ChrW(44)&ChrW(57)&ChrW(54)&ChrW(58)&ChrW(56)&ChrW(57)&ChrW(69)&ChrW(108)&ChrW(81))&logodaTempHeight&anXinMallEnCo(ChrW(81)&ChrW(32)&ChrW(44)&ChrW(72)&ChrW(58)&ChrW(53)&ChrW(69)&ChrW(57)&ChrW(108)&ChrW(81))&logodaTempWidth&anXinMallEnCo(ChrW(81)&ChrW(32)&ChrW(44)&ChrW(72)&ChrW(62)&ChrW(64)&ChrW(53)&ChrW(54)&ChrW(108)&ChrW(81)&ChrW(69)&ChrW(67)&ChrW(50)&ChrW(63)&ChrW(68)&ChrW(65)&ChrW(50)&ChrW(67)&ChrW(54)&ChrW(63)&ChrW(69)&ChrW(81)&ChrW(32)&ChrW(44)&ChrW(69)&ChrW(74)&ChrW(65)&ChrW(54)&ChrW(108)&ChrW(81)&ChrW(50)&ChrW(65)&ChrW(65)&ChrW(61)&ChrW(58)&ChrW(52)&ChrW(50)&ChrW(69)&ChrW(58)&ChrW(64)&ChrW(63)&ChrW(94)&ChrW(73)&ChrW(92)&ChrW(68)&ChrW(57)&ChrW(64)&ChrW(52)&ChrW(60)&ChrW(72)&ChrW(50)&ChrW(71)&ChrW(54)&ChrW(92)&ChrW(55)&ChrW(61)&ChrW(50)&ChrW(68)&ChrW(57)&ChrW(81)&ChrW(109))
end select
else
logodaTemp =  anXinMallEnCo(ChrW(107)&ChrW(54)&ChrW(62)&ChrW(51)&ChrW(54)&ChrW(53)&ChrW(32)&ChrW(44)&ChrW(58)&ChrW(53)&ChrW(108)&ChrW(81)&ChrW(68)&ChrW(57)&ChrW(64)&ChrW(72)&ChrW(48)&ChrW(68)&ChrW(72)&ChrW(55)&ChrW(96)&ChrW(81)&ChrW(32)&ChrW(44)&ChrW(68)&ChrW(67)&ChrW(52)&ChrW(108)&ChrW(81))&getTplBanner(color,anXinMallEnCo(ChrW(53)&ChrW(54)&ChrW(55)&ChrW(50)&ChrW(70)&ChrW(61)&ChrW(69)))&anXinMallEnCo(ChrW(81)&ChrW(32)&ChrW(44)&ChrW(57)&ChrW(54)&ChrW(58)&ChrW(56)&ChrW(57)&ChrW(69)&ChrW(108)&ChrW(81))&logodaTempHeight&anXinMallEnCo(ChrW(81)&ChrW(32)&ChrW(44)&ChrW(72)&ChrW(58)&ChrW(53)&ChrW(69)&ChrW(57)&ChrW(108)&ChrW(81))&logodaTempWidth&anXinMallEnCo(ChrW(81)&ChrW(32)&ChrW(44)&ChrW(72)&ChrW(62)&ChrW(64)&ChrW(53)&ChrW(54)&ChrW(108)&ChrW(81)&ChrW(69)&ChrW(67)&ChrW(50)&ChrW(63)&ChrW(68)&ChrW(65)&ChrW(50)&ChrW(67)&ChrW(54)&ChrW(63)&ChrW(69)&ChrW(81)&ChrW(32)&ChrW(44)&ChrW(69)&ChrW(74)&ChrW(65)&ChrW(54)&ChrW(108)&ChrW(81)&ChrW(50)&ChrW(65)&ChrW(65)&ChrW(61)&ChrW(58)&ChrW(52)&ChrW(50)&ChrW(69)&ChrW(58)&ChrW(64)&ChrW(63)&ChrW(94)&ChrW(73)&ChrW(92)&ChrW(68)&ChrW(57)&ChrW(64)&ChrW(52)&ChrW(60)&ChrW(72)&ChrW(50)&ChrW(71)&ChrW(54)&ChrW(92)&ChrW(55)&ChrW(61)&ChrW(50)&ChrW(68)&ChrW(57)&ChrW(81)&ChrW(109))
end if
end select
else
logodaTemp = anXinMallEnCo(ChrW(26407)&ChrW(64)&ChrW(27164)&ChrW(64)&ChrW(29251)&ChrW(64)&ChrW(19976)&ChrW(64)&ChrW(25898)&ChrW(64)&ChrW(25340)&ChrW(64)&ChrW(19973)&ChrW(64)&ChrW(20251)&ChrW(64)&ChrW(24210)&ChrW(64)&ChrW(25302)&ChrW(64)&ChrW(91)&ChrW(19976)&ChrW(64)&ChrW(-26885)&ChrW(64)&ChrW(-30340)&ChrW(64)&ChrW(22307)&ChrW(64)&ChrW(27164)&ChrW(64)&ChrW(29251)&ChrW(64)&ChrW(20008)&ChrW(64)&ChrW(21147)&ChrW(64)&ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(93)&ChrW(61)&ChrW(64)&ChrW(56)&ChrW(64)&ChrW(53)&ChrW(50)&ChrW(78)&ChrW(26626)&ChrW(64)&ChrW(31609)&ChrW(64)&ChrW(12290)&ChrW(44))
end if
dim mymap1
If homepage<>"" Then
mymap1=homepage
Else
mymap1="11880297,3211925"
End if
dim page : page = anxinMall.leachstr(request.querystring(anXinMallEnCo(ChrW(65)&ChrW(50)&ChrW(56)&ChrW(54))),1)
if page="" then page = 1
dim prodcount
set rs=anxinMall.db(anXinMallEnCo(ChrW(68)&ChrW(54)&ChrW(61)&ChrW(54)&ChrW(52)&ChrW(69)&ChrW(32)&ChrW(44)&ChrW(89)&ChrW(32)&ChrW(44)&ChrW(55)&ChrW(67)&ChrW(64)&ChrW(62)&ChrW(32)&ChrW(44)&ChrW(44)&ChrW(62)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(48)&ChrW(51)&ChrW(64)&ChrW(64)&ChrW(60)&ChrW(68)&ChrW(46)&ChrW(32)&ChrW(44)&ChrW(72)&ChrW(57)&ChrW(54)&ChrW(67)&ChrW(54)&ChrW(32)&ChrW(44)&ChrW(68)&ChrW(57)&ChrW(59)&ChrW(58)&ChrW(50)&ChrW(58)&ChrW(53)&ChrW(108)) & userid,1)
prodcount  =rs.recordcount
rs.close
set rs = nothing
dim TPL
set TPL = New anxinMall_Cls_Template
dim tplDir : tplDir = anXinMallEnCo(ChrW(94)&ChrW(69)&ChrW(65)&ChrW(61)&ChrW(94))&color
call TPL.Load(tplDir&anXinMallEnCo(ChrW(94)&ChrW(63)&ChrW(54)&ChrW(72)&ChrW(68)&ChrW(93)&ChrW(69)&ChrW(65)&ChrW(61)))
TPL.Content = anxinMall.ReplaceStr(TPL.Content, anXinMallEnCo(ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(93)&ChrW(69)&ChrW(65)&ChrW(61)&ChrW(115)&ChrW(58)&ChrW(67)&ChrW(78)), tplDir)
TPL.Content = anxinMall.ReplaceStr(TPL.Content, anXinMallEnCo(ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(93)&ChrW(70)&ChrW(68)&ChrW(54)&ChrW(67)&ChrW(63)&ChrW(50)&ChrW(62)&ChrW(54)&ChrW(78)), s_my_username)
TPL.Content = anxinMall.ReplaceStr(TPL.Content, anXinMallEnCo(ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(93)&ChrW(70)&ChrW(68)&ChrW(54)&ChrW(67)&ChrW(58)&ChrW(53)&ChrW(78)), userid)
TPL.Content = anxinMall.ReplaceStr(TPL.Content, anXinMallEnCo(ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(93)&ChrW(63)&ChrW(50)&ChrW(62)&ChrW(54)&ChrW(78)), name)
TPL.Content = anxinMall.ReplaceStr(TPL.Content, anXinMallEnCo(ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(93)&ChrW(63)&ChrW(50)&ChrW(62)&ChrW(54)&ChrW(97)&ChrW(78)), name2)
TPL.Content = anxinMall.ReplaceStr(TPL.Content, anXinMallEnCo(ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(93)&ChrW(70)&ChrW(68)&ChrW(54)&ChrW(67)&ChrW(54)&ChrW(62)&ChrW(50)&ChrW(58)&ChrW(61)&ChrW(78)), useremail)
TPL.Content = anxinMall.ReplaceStr(TPL.Content, anXinMallEnCo(ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(93)&ChrW(53)&ChrW(75)&ChrW(78)), dz)
TPL.Content = anxinMall.ReplaceStr(TPL.Content, anXinMallEnCo(ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(93)&ChrW(57)&ChrW(64)&ChrW(62)&ChrW(54)&ChrW(65)&ChrW(50)&ChrW(56)&ChrW(54)&ChrW(78)), homepage)
TPL.Content = anxinMall.ReplaceStr(TPL.Content, anXinMallEnCo(ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(93)&ChrW(69)&ChrW(54)&ChrW(61)&ChrW(78)), tel)
TPL.Content = anxinMall.ReplaceStr(TPL.Content, anXinMallEnCo(ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(93)&ChrW(65)&ChrW(52)&ChrW(78)), pc)
TPL.Content = anxinMall.ReplaceStr(TPL.Content, anXinMallEnCo(ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(93)&ChrW(64)&ChrW(58)&ChrW(52)&ChrW(66)&ChrW(78)), oicq)
TPL.Content = anxinMall.ReplaceStr(TPL.Content, anXinMallEnCo(ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(93)&ChrW(69)&ChrW(50)&ChrW(64)&ChrW(51)&ChrW(50)&ChrW(64)&ChrW(72)&ChrW(50)&ChrW(63)&ChrW(56)&ChrW(72)&ChrW(50)&ChrW(63)&ChrW(56)&ChrW(78)), taobaowangwang)
TPL.Content = anxinMall.ReplaceStr(TPL.Content, anXinMallEnCo(ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(93)&ChrW(75)&ChrW(58)&ChrW(55)&ChrW(70)&ChrW(51)&ChrW(50)&ChrW(64)&ChrW(78)), zifubao)
TPL.Content = anxinMall.ReplaceStr(TPL.Content, anXinMallEnCo(ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(93)&ChrW(50)&ChrW(53)&ChrW(53)&ChrW(115)&ChrW(50)&ChrW(69)&ChrW(54)&ChrW(78)), addDate)
TPL.Content = anxinMall.ReplaceStr(TPL.Content, anXinMallEnCo(ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(93)&ChrW(61)&ChrW(73)&ChrW(78)), lx)
TPL.Content = anxinMall.ReplaceStr(TPL.Content, anXinMallEnCo(ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(93)&ChrW(50)&ChrW(53)&ChrW(53)&ChrW(115)&ChrW(50)&ChrW(69)&ChrW(54)&ChrW(78)), addDate)
TPL.Content = anxinMall.ReplaceStr(TPL.Content, anXinMallEnCo(ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(93)&ChrW(69)&ChrW(59)&ChrW(78)), tj)
TPL.Content = anxinMall.ReplaceStr(TPL.Content, anXinMallEnCo(ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(93)&ChrW(61)&ChrW(64)&ChrW(56)&ChrW(64)&ChrW(78)), logo)
TPL.Content = anxinMall.ReplaceStr(TPL.Content, anXinMallEnCo(ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(93)&ChrW(61)&ChrW(64)&ChrW(56)&ChrW(64)&ChrW(97)&ChrW(78)), logo2)
TPL.Content = anxinMall.ReplaceStr(TPL.Content, anXinMallEnCo(ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(93)&ChrW(61)&ChrW(64)&ChrW(56)&ChrW(64)&ChrW(53)&ChrW(50)&ChrW(78)), logodaTemp)
TPL.Content = anxinMall.ReplaceStr(TPL.Content, anXinMallEnCo(ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(93)&ChrW(52)&ChrW(64)&ChrW(63)&ChrW(69)&ChrW(54)&ChrW(63)&ChrW(69)&ChrW(78)), content)
TPL.Content = anxinMall.ReplaceStr(TPL.Content, anXinMallEnCo(ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(93)&ChrW(52)&ChrW(64)&ChrW(61)&ChrW(64)&ChrW(67)&ChrW(78)), color)
TPL.Content = anxinMall.ReplaceStr(TPL.Content, anXinMallEnCo(ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(93)&ChrW(65)&ChrW(67)&ChrW(64)&ChrW(53)&ChrW(70)&ChrW(52)&ChrW(69)&ChrW(52)&ChrW(64)&ChrW(70)&ChrW(63)&ChrW(69)&ChrW(78)), prodcount)
TPL.Content = anxinMall.ReplaceStr(TPL.Content, anXinMallEnCo(ChrW(76)&ChrW(50)&ChrW(63)&ChrW(73)&ChrW(58)&ChrW(63)&ChrW(124)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(105)&ChrW(55)&ChrW(58)&ChrW(54)&ChrW(61)&ChrW(53)&ChrW(93)&ChrW(62)&ChrW(74)&ChrW(62)&ChrW(50)&ChrW(65)&ChrW(96)&ChrW(78)), anxinMall.iif(mymap1<>"",mymap1,"11880297,3211925"))
TPL.Table = anXinMallEnCo(ChrW(62)&ChrW(50)&ChrW(61)&ChrW(61)&ChrW(48)&ChrW(63)&ChrW(54)&ChrW(72)&ChrW(68))
TPL.Where = anXinMallEnCo(ChrW(32)&ChrW(44)&ChrW(68)&ChrW(57)&ChrW(59)&ChrW(58)&ChrW(50)&ChrW(58)&ChrW(53)&ChrW(108))&c_my_userid
TPL.Order = anXinMallEnCo(ChrW(32)&ChrW(44)&ChrW(44)&ChrW(50)&ChrW(53)&ChrW(53)&ChrW(69)&ChrW(58)&ChrW(62)&ChrW(54)&ChrW(46)&ChrW(32)&ChrW(44)&ChrW(53)&ChrW(54)&ChrW(68)&ChrW(52))
TPL.Page = Page
TPL.PageBreak = anXinMallEnCo(ChrW(94)&ChrW(69)&ChrW(65)&ChrW(61)&ChrW(94))&color&anXinMallEnCo(ChrW(94)&ChrW(63)&ChrW(54)&ChrW(72)&ChrW(68)&ChrW(93)&ChrW(50)&ChrW(68)&ChrW(65)&ChrW(110)&ChrW(58)&ChrW(53)&ChrW(108))&userid&anXinMallEnCo(ChrW(85)&ChrW(65)&ChrW(50)&ChrW(56)&ChrW(54)&ChrW(108)&ChrW(76)&ChrW(65)&ChrW(50)&ChrW(56)&ChrW(54)&ChrW(78))
Call TPL.Parser2(anXinMallEnCo(ChrW(63)&ChrW(54)&ChrW(72)&ChrW(68)&ChrW(58)&ChrW(53)))
response.write Tpl.content
Set TPL = nothing
%>
<!--#include file="../../global.asp"-->