动易的商城会员价格是开放的,如何实现会员价格只有登陆才能看到,不登陆提示未登陆或者不显示?
动易商城在内容页显示当前访问者的价格标签是{$Price_Your} ,如果想在商城首页及栏目页显示商品的当前访问者的价格,这个标签没法解决这个问题,那么我们就另辟新径来实现这个功能:
1、添加一个自定义标签
{$MY_price} 标签的定义:
提示内容:在栏目页或商城首页相关地方显示前访问者的价格 标签内容: <script language='javascript' src='/cn/shop/GetPrice.asp?ProductID={$ProductID}'></script> 优先级:1
注意,将cn换成你安装动易的目录
2、修改GetPrice.asp文件
将
Dim ProductID ProductID = PE_CLng(Trim(request("ProductID"))) If ProductID > 0 Then Response.Write "document.write('" & FormatNumber(GetPrice(), 2, vbTrue, vbFalse, vbTrue) & "');" End If
改为
Dim ProductID ProductID = PE_CLng(Trim(request("ProductID"))) If ProductID > 0 and not isNumeric(GetPrice()) Then 'Response.Write "document.write('" & FormatNumber(GetPrice(), 2, vbTrue, vbFalse, vbTrue) & "');" Response.Write "document.write('" &GetPrice() & "');" else Response.Write "document.write('" & FormatNumber(GetPrice(), 2, vbTrue, vbFalse, vbTrue) & "元');" End If
将
Case 0, 1 '未登录 Select Case rs("ProductType") Case 1, 2, 4, 5 dblTruePrice = rs("Price")
改为
Case 0, 1 '未登录 Select Case rs("ProductType") Case 1, 2, 4, 5 'dblTruePrice = rs("Price") dblTruePrice = "请登陆"
3、将{$MY_price} 标签加入到首页、及栏目页的模板的相关地方。
图片展示:
会员登录后的显示
此主题相关图片如下:
|