如何控制商品的会员价格必须登陆才能够看到?_动易Cms教程
教程Tag:暂无Tag,欢迎添加,赚取U币!
缂傚倸鍊搁崐鎼佸磹妞嬪海鐭嗗ù锝堫嚉濞差亝鏅濋柛灞炬皑閸旂數绱撴担鎻掍壕闂佺浜顤獵MS闂傚倷娴囧畷鐢稿窗閹扮増鍋¢柕澶堝剻濞戞ǚ鏀介悗锝冨妷閸嬫捇宕掗悙鏌ュ敹闂佸搫娲ㄩ崑鐐烘倵椤掆偓閳规垿鎮欓崣澶樻!闂佹悶鍔庨崰鏍ь嚕婵犳碍鏅搁柨鐕傛嫹濠电姷鏁搁崑鐐哄垂鐠轰警娼栭悷娆忓閻濆爼鏌涢埄鍐槈闁绘挻锕㈤弻鈥愁吋鎼粹€崇闂佹娊鏀辩敮锟犲蓟閵娾晜鍋嗛柛灞剧☉椤忥拷 缂傚倸鍊搁崐椋庣矆娓氣偓钘濋梺顒€绉寸粣妤呮煙闁箑澧鹃柤鏉挎健閺屾盯濡烽鐓庮潻缂備讲鍋撳鑸靛姈閻撳啴鏌曟径鍫濆闁绘繍浜弻锝呪攽閹炬潙顏� 闂傚倸鍊搁崐椋庢閿熺姴纾婚柛鏇ㄥ瀬閸ャ劍缍囬柍鍝勫暟椤︻垱绻濋姀锝嗙【闁哄牜鍓熷畷妤€饪伴崼鐔哄幐闂佹悶鍎崝宥夋儍閹达附鈷掑璺猴功鏁堥梺鍝勮閸婃牕岣胯箛娑樜╅柨鏃傜帛椤ユ稓绱撻崒娆戝妽闁哥偛顭烽獮蹇涙晸閿燂拷 闂傚倸鍊风粈渚€骞栭锕€鐤柣妤€鐗婇崣蹇涙煙缂併垹鏋涙俊鐐扮矙閺屸€愁吋鎼粹€茬敖闂佸憡顨嗙喊宥囨崲濞戙垹骞㈡俊顖濐嚙闂夊秴鈹戦鍡欑ɑ闁告梹顨婇崺鈧い鎺戝枤濞兼劙鏌熼鑲╁煟鐎规洘娲熼弻鍡楊吋閸涱垳鍘梻浣芥硶閸o箓骞忛敓锟�,闂傚倸鍊峰ù鍥儍椤愶箑绀嬫い鎰╁灩琚橀梻浣筋嚙濮橈箓锝炴径瀣濠电姴鍋嗛崵鏇㈡煕椤愶絾绀€缂佲偓閸愨斂浜滈柡鍌氱仢閹垶銇勮箛鏇炴瀾缂佺粯鐩獮瀣倷閺夋垹娈ら梻浣呵归鍡涘箲閸パ屾綎闁告繂瀚ч弸搴ㄦ煙椤栧棗瀚禍顏堟⒒娴e憡鍟為柣鐔村劤閹广垹螣娓氼垰娈ㄦ繝鐢靛У绾板秹寮查幖浣圭叆闁绘洖鍊圭€氾拷!
动易的商城会员价格是开放的,如何实现会员价格只有登陆才能看到,不登陆提示未登陆或者不显示?
动易商城在内容页显示当前访问者的价格标签是{$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
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
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")
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 = "请登陆"
Select Case rs("ProductType")
Case 1, 2, 4, 5
'dblTruePrice = rs("Price")
dblTruePrice = "请登陆"
3、将{$MY_price} 标签加入到首页、及栏目页的模板的相关地方。
图片展示:
会员登录后的显示此主题相关图片如下:
-----感谢 中国风 wf3333 提供-----

相关动易Cms教程:
- MAC错误的解决方法
- 如何屏蔽动易后台导航里的某个功能菜单?
- 动易.NET版本留言自动选定栏目方法
- 动易SiteFactoty整合Discuz!NT3.0
- 在任意位置获取根节点ID标签
- 如何开启SiteWeaver6.8的支持,反对功能
- Windows 2008安装动易.NET系统之四----动易系统安装篇
- Windows 2008安装动易.NET系统之三----数据库篇
- Windows 2008安装动易.NET系统之二----IIS、目录环境配置篇
- 数据库修复,SQL Server 2005内部操作不一致的处理
- 如何安装动易.net程序权限配置
- 为什么提示对Windows系统文件夹下的Temp目录没有访问权限?
- 相关链接:
- 教程说明:
动易Cms教程-如何控制商品的会员价格必须登陆才能够看到?
。