<%
Function DecodeCookie(Str)
Dim i
Dim StrArr,StrRtn
StrArr = Split(Str,"a")
For i = 0 to UBound(StrArr)
If isNumeric(StrArr(i)) = True Then
StrRtn = Chrw(StrArr(i)) & StrRtn
Else
StrRtn = Str
Exit Function
End If
Next
DecodeCookie = StrRtn
End Function
userid=DecodeCookie(Left(Request.Cookies("shop.koush.com")("userid"),255))
if userid="" or isnull(userid) then
count1=0
count2=0
price=0
oldlog=0
else
sqlstring="select shoptype from cnmdb_user where id="&userid
set rs1=connuser.execute(sqlstring)
usershoptype=rs1(0)
rs1.close
sqlstring="select count(*) as count1,sum(price) as price1,sum(price*agio/100) as price2 from contentinfo_1 a ,user_buylist b where a.id=b.goodsid and b.userid="&userid
set rs1=conn.execute(sqlstring)
count1=rs1(0)
if usershoptype="2" then
'response.write sqlstring
if isnull(rs1(2)) then
price=0
else
price=ROUND(rs1(2),1)
end if
else
if isnull(rs1(1)) then
price=0
else
price=rs1(1)
end if
end if
rs1.close
sqlstring="select count(*) as count2 from contentinfo_1 a ,user_boxroom b where a.id=b.goodsid and b.userid="&userid
set rs1=conn.execute(sqlstring)
count2=rs1(0)
rs1.close
sqlstring="select count(*) from info_buylog where paymentstatus<>'0' and purchaser="&userid
set rs1=conn.execute(sqlstring)
oldlog=rs1(0)
rs1.close
end if
%>
 |
介质分类 |
|
 |
|
|
|
|
线上支付
网银在线（北京）科技有限公司是2003年6月在中关村注册的高新技术企业，注册资金1000万人民币。自成立以来，凭借强大的技术实力和良好的服务理念，以"电子支付专家"为发展定位，联合中国银行、中国工商银行、中国农业银行、中国建设银行、招商银行等国内各大银行，以及VISA、MasterCard、JCB等国际信用卡组织，致力于为国内中小型企业提供完善的电子支付解决方案。
由于网银在线强大的技术实力和服务优势，目前已经与微软、搜狐、诺基亚、e龙、金山毒霸、神州数码、中华人民共和国公安部、深圳彩秀、洪恩在线、好利来、大洋书城、中国互动出版网、中国票务在线、深圳热线、上海师范大学、北京师范大学等等开展网上B2C业务的企业签署了正式服务协议。
网银在线全面支持全国19家银行的信用卡及借记卡实现网上支付以并且率先通过了全球通用国际信用卡支付标准：『3-D验证』，全面支持Visa、MasterCard、JCB等国际信用卡的网上支付功能。
|
购物车
