把电影数据库中的所有电影按类别每行三列的方式显示在一页中。
您现在的位置:"><%=application("home")%>-"><%=application("homes")%>-全部影片 |
<% '显示类型部分代码 dim rstype,sql sql="select typeid,type from type" set rstype=server.CreateObject("ADODB.Recordset") rstype.open sql,conn,1,1 do while not rstype.eof response.Write("") response.write(" " ) response.write rstype("type") '电影类型名称 response.write(" | ") response.write(" ") response.write(" ")
|
|