<% function w78_Navigation()'菜单导航调用参数 dim Navigation set Navigation=server.CreateObject("adodb.recordset") Navigation.open "select * from menu where yc=1 order by px_id asc",conn,1,1 while not Navigation.eof response.Write("<li><a href="""&Navigation("url")&""" target="""&Navigation("openfs")&""">"&Navigation("title")&"</a></li>") Navigation.movenext wend Navigation.close set Navigation=nothing end function %> 如何调用后台做导航菜单的同时从调用后台数据库做成下拉菜单 <%=w78_News_fl_list%> <%=w78_products_class%> |