⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 index0.asp

📁 网上电子购物的动态程序,有丰富的后台管理 功能,多种付款方式选择.
💻 ASP
📖 第 1 页 / 共 4 页
字号:
              <tr> 
                <td height="1" background="images/ppb.gif"></td>
              </tr>
              <tr> 
                <td> 
                  <div align="right"></div>
                </td>
              </tr>
              <tr> 
                <td height="1" background="images/ppb.gif"></td>
              </tr>
            </table>
            -->
                            <table width="94%" border="0" cellpadding="0" cellspacing="0">
                              <tr> 
                                <td width="100%" align="center" height=50> 
                                  <%
		set rs=conn.execute("SELECT * FROM vote where IsChecked=1 ") 
		if rs.eof then
	  %>
                                  暂无投票 
                                  <%else%>
                                  <table border="0" width="91%" cellspacing="2" cellpadding="2">
                                    <tr> 
                                      <td width=100% align="center"><b><br>
                                        <%=rs("Title")%> </b><br>
                                      </td>
                                    </tr>
                                    <form action="vote.asp" target="newwindow" method=post name=research>
                                      <tr> 
                                        <td valign=top width="100%"> 
                                          <%
for i=1 to 8
	if rs("Select"&i)<>"" then
%>
                                          <input style="border: 0" <%if i=1 then%>checked<%end if%> name=Options type=radio value=<%=i%>>
                                          <%=i%>.<%=rs("Select"&i)%><br>
                                          <%
	end if
next
%>
                                        </td>
                                      </tr>
                                      <tr> 
                                        <td width="100%" height=30 align=center> 
                                          <input type="image" border="0" name="submit2" src="images/vote1.gif" width="59" height="19" style="cursor:hand">
                                          <a href="vote.asp?stype=view" target="_blank"><img src="images/vote.gif" width="59" height="19" border="0"></a> 
                                        </td>
                                      </tr>
                                    </form>
                                  </table>
                                  <%end if%>
                                </td>
                              </tr>
                            </table>
                          </td>
                        </tr>
                        <tr> 
                          <td background="images/bj_2.gif">&nbsp;</td>
                        </tr>
                      </table>
                    </td>
                    <td width="1" valign="top" background="images/bj_x.gif"></td>
                    <td valign="top"> 
                      <div align="center"><a href="<%=tx2url%>" target=_blank><br>
                        <img src="<%=tx2%>" width="560" height="100" border="0"></a>
                        <table width="100%" border="0" cellspacing="0" cellpadding="0">
                          <tr> 
                            <td background="images/bj_x.gif" height="1"></td>
                          </tr>
                          <tr> 
                            <td>
                              <table cellspacing=0 cellpadding=0 width=100% height="22" align="center">
                                <tr> 
                                  <td width=16>&nbsp;</td>
                                  <td width=61> 
                                    <div align="center"><img src="images/icon2.gif" width="12" height="13"></div>
                                  </td>
                                  <td class=hg12 width="442">&nbsp;<b>最新商品</b></td>
                                  <td width=42>&nbsp;</td>
                                </tr>
                              </table>
                            </td>
                          </tr>
                          <tr>
                            <td background="images/bj_x.gif" height="1"></td>
                          </tr>
                        </table>
                      </div>
                      <div align="center"> </div>
                      <table width="540" border="0" cellspacing="0" cellpadding="0" align="center">
                        <tr> 
                          <td> 
                            <%set rs=server.CreateObject("adodb.recordset")
		  rs.open "select top 20 mch,pp,pingpai,jj,bookname,bookid,bookchuban,bookpic,shichangjia,huiyuanjia,dazhe,bookzz from shop_books  order by adddate desc",conn,1,1
		  if rs.eof and rs.bof then
		  response.write "<center><br><font color=red size=2>对不起,请您先到后台添加商品!</font></font>"
		  'response.End
		  else
		  %>
                            <table cellspacing=0 cellpadding=0 border=0 width="100%">
                              <%
							  dim i_1,i_count
							  i_1=int((rs.recordcount+1)/2)
							  if i_1>4 then 
							  	i_1=4
							  end if
							  'response.write i_1
							  for i_count=1 to i_1%>
                              <tr> 
                                <td valign=top width="33%"> 
                                  <table cellspacing=0 cellpadding=0 width="100%">
                                    <tr> 
                                      <td valign=top style="PADDING-LEFT: 6px"><br>
                                        <img height=115 hspace=5 
                        src="images/bg_book.gif" width=145 vspace=5 border=0> 
                                        <p style="MARGIN-TOP: -130px"><a 
                        href=book.asp?id=<%=rs("bookid")%> target=_blank><img 
                        height=110 alt=商品样品 hspace=5 
                        src=<%if trim(rs("bookpic"))<>"" then
				  response.write trim(rs("bookpic"))
				  else
				  response.write "images/emptybook.gif"
				  end if%> width=135 vspace=3 
                        border=0></a> <br>
                                          <a class=a4 
                        href=book.asp?id=<%=rs("bookid")%> target=_blank><font color=#FF6600><br>
                                          <%=trim(rs("bookname"))%></font></a><br>
                                          <%=trim(rs("pp"))%><%=trim(rs("pingpai"))%><br>
                                          <%=trim(rs("jj"))%><%=trim(rs("bookchuban"))%><br>
                                          市场价:<%=formatnumber(rs("shichangjia"),2)&"元"%><br>
                                          会员价:<font color=#FF6600><%=formatnumber(rs("huiyuanjia"),2)&"元"%></font><br>
                                        <table align="center" cellpadding=0 cellspacing=0>
                                          <tbody> 
                                          <tr> 
                                            <td align=middle width=27 height=22> 
                                              <input onClick="javascript:window.open('shopping.asp?id=<%=rs("bookid")%> ','','width=632,height=388,toolbar=no, status=no, menubar=no, resizable=yes, scrollbars=yes');return false;" type="image" border="0" name="submit23" src="images/gm.gif" width="46" height="19">&nbsp; </td>
                                            <td align=middle width=28 height=22><a href="book.asp?id=<%=rs("bookid")%>"><img src="images/yl.gif" width="46" height="19" border="0"></a>&nbsp;</td>
                                            <td width=57 height=22> 
                                              <input onClick="javascript:window.open('shoucang.asp?id=<%=rs("bookid")%>&action=add ','','width=632,height=388,toolbar=no, status=no, menubar=no, resizable=yes, scrollbars=yes');return false;"  type="image" border="0" name="submit222" src="images/shc.gif" width="46" height="19">
                                              <%rs.movenext%>
                                            </td>
                                          </tr>
                                          </tbody> 
                                        </table>
                                        <br>
                                      </td>
                                    </tr>
                                  </table>
                                </td>
                                <td valign=top width="33%" colspan="2"> 
                                  <%if rs.eof then%>
                                  &nbsp; 
                                  <%else%>
                                  <table cellspacing=0 cellpadding=0 width="99%">
                                    <tr> 
                                      <td valign=top style="PADDING-LEFT: 6px"><br>
                                        <img height=115 hspace=5 
                        src="images/bg_book.gif" width=145 vspace=5 border=0> 
                                        <p style="MARGIN-TOP: -130px"><a 
                        href=book.asp?id=<%=rs("bookid")%> target=_blank><img 
                        height=110 alt=商品样品 hspace=5 
                        src=<%if trim(rs("bookpic"))<>"" then
				  response.write trim(rs("bookpic"))
				  else
				  response.write "images/emptybook.gif"
				  end if%> width=135 vspace=3 
                        border=0></a><br>
                                          <a class=a4 
                        href=book.asp?id=<%=rs("bookid")%> target=_blank><font color=#FF6600><br>
                                          <%=trim(rs("bookname"))%></font></a><br>
                                          <%=trim(rs("pp"))%><%=trim(rs("pingpai"))%><br>
                                          <%=trim(rs("jj"))%><%=trim(rs("bookchuban"))%><br>
                                          市场价:<%=formatnumber(rs("shichangjia"),2)&"元"%><br>
                                          会员价:<font color=#FF6600><%=formatnumber(rs("huiyuanjia"),2)&"元"%></font><br>
                                        <table align="center" cellpadding=0 cellspacing=0>
                                          <tbody> 
                                          <tr> 
                                            <td align=middle width=27 height=22> 
                                              <input onClick="javascript:window.open('shopping.asp?id=<%=rs("bookid")%> ','','width=632,height=388,toolbar=no, status=no, menubar=no, resizable=yes, scrollbars=yes');return false;" type="image" border="0" name="submit232" src="images/gm.gif" width="46" height="19">&nbsp; </td>
                                            <td align=middle width=28 height=22><a href="book.asp?id=<%=rs("bookid")%>"><img src="images/yl.gif" width="46" height="19" border="0"></a>&nbsp;</td>
                                            <td width=57 height=22> 
                                              <input onClick="javascript:window.open('shoucang.asp?id=<%=rs("bookid")%>&action=add ','','width=632,height=388,toolbar=no, status=no, menubar=no, resizable=yes, scrollbars=yes');return false;"  type="image" border="0" name="submit2222" src="images/shc.gif" width="46" height="19">
                                              <%rs.movenext%>
                                            </td>
                                          </tr>
                                          </tbody> 
                                        </table>
                                        <br>
                                      </td>
                                    </tr>
                                  </table>
                                  <%end if%>
                                </td>
                                <td valign=top width="33%"> 
                                  <%if rs.eof then%>
                                  &nbsp; 
                                  <%else%>
                                  <table cellspacing=0 cellpadding=0 width="100%">
                                    <tr> 
                                      <td valign=top style="PADDING-LEFT: 6px"><br>
                                        <img height=115 hspace=5 
                        src="images/bg_book.gif" width=145 vspace=5 border=0> 
                                        <p style="MARGIN-TOP: -130px"><a 
                        href=book.asp?id=<%=rs("bookid")%> target=_blank><img 
                        height=110 alt=商品样品 hspace=5 
                        src=<%if trim(rs("bookpic"))<>"" then
				  response.write trim(rs("bookpic"))
				  else
				  response.write "images/emptybook.gif"
				  end if%> width=135 vspace=3 
                        border=0></a> <br>
                                          <a class=a4 
                        href=book.asp?id=<%=rs("bookid")%> target=_blank><font color=#FF6600><br>
                                          <%=trim(rs("bookname"))%></font></a><br>
                                          <%=trim(rs("pp"))%><%=trim(rs("pingpai"))%><br>
                                          <%=trim(rs("jj"))%><%=trim(rs("bookchuban"))%><br>
                                          市场价:<%=formatnumber(rs("shichangjia"),2)&"元"%><br>
                                          会员价:<font color=#FF6600><%=formatnumber(rs("huiyuanjia"),2)&"元"%></font><br>
                                        <table align="center" cellpadding=0 cellspacing=0>
                                          <tbody> 
                                          <tr> 
                                            <td align=middle width=27 height=22> 
                                              <input onClick="javascript:window.open('shopping.asp?id=<%=rs("bookid")%> ','','width=632,height=388,toolbar=no, status=no, menubar=no, resizable=yes, scrollbars=yes');return false;" type="image" border="0" name="submit23" src="images/gm.gif" width="46" height="19">&nbsp; </td>
                                            <td align=middle width=28 height=22><a href="book.asp?id=<%=rs("bookid")%>"><img src="images/yl.gif" width="46" height="19" border="0"></a>&nbsp;</td>
                                            <td width=57 height=22> 
                                              <input onClick="javascript:window.open('shoucang.asp?id=<%=rs("bookid")%>&action=add ','','width=632,height=388,toolbar=no, status=no, menubar=no, resizable=yes, scrollbars=yes');return false;"  type="image" border="0" name="submit222" src="images/shc.gif" width="46" height="19">
                                              <%rs.movenext%>
                                            </td>
                                          </tr>
                                          </tbody> 
                                        </table>
                                        <br>
                                      </td>
                                    </tr>
                                  </table>
                                  <%end if%>
                                </td>
                              </tr>
                              <%next%>
                              <%if rs.recordcount>12 then
							  rs.absoluteposition=13
				i=0
				do while not rs.eof%>
                              <tr> 
                                <td style="PADDING-LEFT: 6px" height="28" colspan="2"> 
                                  <img src="images/new-fram_05.gif" width="12" height="13"> 
                                  <a href=book.asp?id=<%=rs("bookid")%> target=_blank> 
                                  <%if len(trim(rs("bookname")))>16 then
					response.write left(trim(rs("bookname")),13)&"..."
					else
					response.write trim(rs("bookname"))
					end if%>
                                  </a> 价格:<font color=#FF6600><%=formatnumber(rs("huiyuanjia"),2)&"元"%></font> 
                                  <font color="#FF0000">折</font>: 
                                  <%response.write "<font color=#FF6600>"&rs("dazhe")*100&"%</font>"%>
                                </td><%rs.movenext%>
                                <td style="PADDING-LEFT: 6px" height="28" colspan="2"> 
                                  <%if rs.eof then%>
                                  &nbsp; 
                                  <%else%>
                                  <img src="images/new-fram_05.gif" width="12" height="13"> 
                                  <a href=book.asp?id=<%=rs("bookid")%> target=_blank> 
                                  <%if len(trim(rs("bookname")))>16 then
					response.write left(trim(rs("bookname")),13)&"..."
					else
					response.write trim(rs("bookname"))

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -