如何控制商品的會(huì)員價(jià)格必須登陸才能夠看到？

2024-09-10 21:55:37

字體：大中小

供稿：網(wǎng)友

　　動(dòng)易的商城會(huì)員價(jià)格是開(kāi)放的，如何實(shí)現(xiàn)會(huì)員價(jià)格只有登陸才能看到，不登陸提示未登陸或者不顯示？

動(dòng)易商城在內(nèi)容頁(yè)顯示當(dāng)前訪(fǎng)問(wèn)者的價(jià)格標(biāo)簽是{$Price_Your} ，如果想在商城首頁(yè)及欄目頁(yè)顯示商品的當(dāng)前訪(fǎng)問(wèn)者的價(jià)格，這個(gè)標(biāo)簽沒(méi)法解決這個(gè)問(wèn)題，那么我們就另辟新徑來(lái)實(shí)現(xiàn)這個(gè)功能：

1、添加一個(gè)自定義標(biāo)簽

　{$MY_price} 標(biāo)簽的定義：

提示內(nèi)容：在欄目頁(yè)或商城首頁(yè)相關(guān)地方顯示前訪(fǎng)問(wèn)者的價(jià)格
標(biāo)簽內(nèi)容：
<script language='javascript' src='/cn/shop/GetPrice.asp?ProductID={$ProductID}'></script>
優(yōu)先級(jí)：1

注意，將cn換成你安裝動(dòng)易的目錄

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 = "請(qǐng)登陸"

3、將{$MY_price} 標(biāo)簽加入到首頁(yè)、及欄目頁(yè)的模板的相關(guān)地方。

圖片展示：

圖片點(diǎn)擊可在新窗口打開(kāi)查看