OtherDownload.Asp
上传用户:qfkgdy
上传日期:2020-06-18
资源大小:1888k
文件大小:2k
源码类别:

手机WAP编程

开发平台:

ASP/ASPX

  1. <!--#include file="wml.ini"-->
  2. <%  
  3. id=cint(request("id")) 
  4. page=cint(request("page")) 
  5. p=cint(request("p"))
  6. pp=cint(request("pp")) 
  7. %>
  8. <% 
  9. call wmlbegin("图片下载设置","wrap")
  10.    set rs=conn.execute("select * from [Picture] WHERE id=" & id & "")
  11. do while not rs.eof
  12. call wmlimg(rs("File_Url"),rs("Title"),true)
  13. %>
  14. =常见尺寸下载=<br/>
  15. <a href="Downloads.Asp?id=<%=rs("id")%>&amp;t=128&amp;h=128">128x128</a>
  16. <a href="Downloads.Asp?id=<%=rs("id")%>&amp;t=176&amp;h=220">176x220</a>
  17. <a href="Downloads.Asp?id=<%=rs("id")%>&amp;t=176&amp;h=208">176x208</a><br/>
  18. <a href="Downloads.Asp?id=<%=rs("id")%>&amp;t=128&amp;h=160">128x160</a>
  19. <a href="Downloads.Asp?id=<%=rs("id")%>&amp;t=174&amp;h=131">174x131</a>
  20. <a href="Downloads.Asp?id=<%=rs("id")%>&amp;t=240&amp;h=320">240x320</a><br/>
  21. =自定义尺寸下载=<br/>
  22.       宽:<input size="3" type="text" name="t" value="128"/>
  23.       高:<input size="3" type="text" name="h" value="128"/><br/>
  24.       <a href="Downloads.Asp?id=<%=rs("id")%>&amp;t=$(t)&amp;h=$(h)">[确定下载]</a><br/>
  25. <%
  26. ClassID=rs("ClassID")
  27. AlbumID=rs("AlbumID")
  28. rs.movenext
  29. loop
  30. Closers()
  31.     %>
  32. <br/>
  33. <%
  34. set rs=conn.execute("select * from [Class] WHERE id=" & ClassID & "")
  35. do while not rs.eof
  36. Class_Title=rs("Class_Title")
  37. rs.movenext
  38. loop
  39. Closers()
  40. set rs=conn.execute("select * from [Album] WHERE id=" & AlbumID & "")
  41. do while not rs.eof
  42. Album_Title=rs("Album_Title")
  43. rs.movenext
  44. loop
  45. Closers()
  46. call wap.navs(Class_Title&",Categories.Asp?id="& ClassID &"&amp;page=" & p & "|"&Album_Title&",View.Asp?id=" & AlbumID & "&amp;page=" & pp & "&amp;p=" & p & ",")
  47. call wmlend
  48. %>