使用原有的数据库
数据库 中表Products 字段结构中 其中有字段:Usedianhuo 、 Useshow。此表是保存商品记录的。
现想 实现
1. 当同一个ID记录中 字段 Usedianhuo 为1 Useshow为0 的 这次条记录 为共给用户点货使用(即原数据库中 此商品拍的图片不漂亮 但仓存里还有此商品 就给用户点货使用)
2. 当同一个ID记录中 字段 Usedianhuo 为0 Useshow为1 的 这次条记录 即展示用的 (原数据库中 此商品拍的图片很漂亮 但实仓存并无此商品 所以就只能当作历史展示使用 )
3. 当同一个ID记录中 字段 Usedianhuo 为1 Useshow为1 的 这次条记录 为共给用户点货 使用 又做展示用(原数据库中 此商品拍的图片很漂亮 仓存也还有此商品 所以此条记录 既给用户点货 又做展示用)
4. 当同一个ID记录中 字段 Usedianhuo 为0 Useshow为0 的 这次条记录 共给用户点货 又做展示 都不使用 (原数据库中 有可能是商品拍的图片不好 看展示不使用 实际上仓存也无此商品了 但公司仍然需要在数据库中留底)
现products.asp 为产品展示页面
该页面负责 判断 有用户时(islog = 1) 即输出 字段字段 Usedianhuo 为1 的所有商品记录。
无用户登陆时 (islog = 0) 即输出 字段Useshow为1 的所有记录。
请问 products.asp 代码该如何写才能实现?
以下 是本人写的 但并为实现的代码 希望大家帮看看指出错误在那里。
<%
'Call db
Call dbConn()
Dim sortName,sortID,sortRS,tType,islog,Usedianhuo,Useshow
sortID = toInt(Request("Sort"))
tType = toInt(Request("s"))
islog = islogin(0)
Usedianhuo = toInt(Request("Usedianhuo"))
Useshow = toInt(Request("Useshow"))
if tType = 5 and islog = 0 then call funerr("要查看特价商品需要登录后才可继续.|")
Dim Total,iPage,oRs,word,sSql,image,text
image = "p100.gif"
text = "全部产品"
word = funSql(Request("word"))
Set oRs = Server.CreateObject("Adodb.RecordSet")
sSql = "Select Name,Num,Picture,ID,Dir,Usedianhuo,price,Useshow From Products Where 1=1 "
If islog = 0 then
sSql = sSql & "And isMember <> 1 "
end if
If Len(word) > 0 Then
sSql = sSql & "And Name Like '%"& word &"%' "
...........%>
<table width="120" border="0" cellpadding="0" cellspacing="0" bgcolor="#F7F7F7">
<tr>
<td width="120" height="120" align="center" valign="top" background="images/1052.gif" ><table width="100%" height="100%" border="0" cellpadding="0" cellspacing="0">
<tr>
<td align="center" bgcolor="#F7F7F7">
<%if islog = 0 & Useshow = 1 then%> <%else if Usedianhuo= 1 then%>
<a href="pshow.asp?ID=<%=oRs("ID")%>" target="_blank"><img src="docs/<%=oRs("Dir") & "/" & oRs("Picture")%>" width="110" height="110" border="0"></a><%end if%></td>
</tr>
</table></td>
</tr>
<tr>
<td width="120" height="29" ><a href="pshow.asp?ID=<%=oRs("ID")%>" target="_blank"><%=left(oRs("Name"),9)%></a><br>编号: <%=ors("Num")%><br><%if islog = 1 then%>价格: <font color="#FF0000"><%=formatnumber(ors("price"),2)%></font> 元<br><%end if%><font color="#0000ff" onclick="shop('<%=ors("id")%>')">放入购物车</font></td>
</tr>
</table>