ASP 一个页面执行 无线分类问题
Posted
tags:
篇首语：本文由小常识网(cha138.com)小编为大家整理，主要介绍了ASP 一个页面执行 无线分类问题相关的知识，希望对你有一定的参考价值。
<div id="menu"><h1><a href="admin_eyes.asp?tianjia=ok">请添加眼镜栏目</a></h1>
<div id="news">
<dl>
<%
set rs=server.CreateObject("adodb.recordset")
sql = "select * from eyes where eyes_classid = 0 order by id desc"
rs.open sql,conn,1,1
if rs.eof and rs.bof then
response.Write ""
else
do while not rs.eof
'format_i=format_i+1
%>
<dt><%=rs("id")%></dt><dt><%=rs("eyes_name")%></dt><dt><a href="admin_eyes.asp?add=tianzi&eyesid=<%=rs("eyes_classid")%>&id=<%=rs("id")%>" >添加子分类</a> <a href="admin_eyes.asp?add=xiugai&id=<%=rs("id")%>" >修改</a> <a href="#"><a href="admin_eyes.asp?add=sanchu&id=<%=rs("id")%>" onclick='return confirm("真的要删除吗？删除之后将无法恢复");'>删除</a></dt>
<%
dim rs2,sql2
set rs2=server.CreateObject("adodb.recordset")
sql2 = "select * from eyes where eyes_classid ="&rs("id")
rs2.open sql2,conn,1,1
response.Write sql2&"<br/>"
response.Write rs2("eyes_classid")&"<br/>"
response.Write rs2("id")&"<br/>"
do while not rs2.eof
%>
<dd><%
'for i=format_i to 3 step -1
'response.wrITe "|-"
'response.wrITe " "
'next
'response.wrITe "|-"
%><%=rs2("id")%></dd><dd><%=rs2("eyes_name")%></dd><dd><a href="admin_eyes.asp?add=tianzi&eyesid=<%=rs2("eyes_classid")%>&id=<%=rs2("id")%>" >添加子分类</a> <a href="admin_eyes.asp?add=xiugai&id=<%=rs2("id")%>" >修改</a> <a href="#"><a href="admin_eyes.asp?add=sanchu&id=<%=rs2("id")%>" onclick='return confirm("真的要删除吗？删除之后将无法恢复");'>删除</a></dd>
<%rs2.movenext
loop
%>
<%
rs.movenext
loop
call Close.rs
end if
response.end()
%>
</dl>
</div></div>
只能得到 eyes_classid = 0 下的 id 值
所以只能实现 二级分类 和 添加.
求高人改下 指点下,菜鸟就别瞎说了.
数据库结构是
id title TID1
'sel_Name 下拉菜单名称
'sel_selected 默认选中值
'iTableName 数据表名
'ifloor 初始层数 - 1
'iTID1 初始父级ID - 0
'sel_valField value值对应的字段名
'sel_TextField text 值对就的字段名
function createSelect(sel_Name, sel_selected , iTableName , ifloor, iTID1, sel_valField,sel_TextField)
if ifloor = "" then ifloor = 1
if iTID1 = "" then iTID1 = 0
if sel_valField = "" then sel_valField = "id"
if sel_TextField = "" then sel_TextField = "title"
if ifloor = 1 then
selectStr = selectStr&"<select name='"&sel_Name&"' id='"&sel_Name&"'>"&VbCrLf
end if
ifloorStr = ""
for i=1 to int(ifloor-1)
ifloorStr = ifloorStr&" "
next
sql = "select * from "&iTableName&" where TID1 = "&iTID1&" order by orderid"
set rs = server.CreateObject("ADODB.recordset")
rs.open sql,conn,1,1
do while not rs.eof
iChecked = ""
if sel_selected = sel_valField then iChecked = "selected"
sql2 = "select * from "&iTableName&" where TID1 = "&rs("id")
set rs2 = server.CreateObject("ADODB.recordset")
rs2.open sql2,conn,1,1
Vcount = rs2.recordcount
rs2.close
set rs2 = nothing
if Vcount <> 0 then
selectStr = selectStr&"<optgroup label="""&ifloorStr&"├"&rs(sel_TextField)&"--("&ifloor&"级)""></optgroup>"&VbCrLf
selectStr = selectStr&createSelect(sel_Name, sel_selected, iTableName, int(ifloor + 1), rs("id"),sel_valField,sel_TextField)
else
selectStr = selectStr&"<option value='"&rs(sel_valField)&"' "&iChecked&">"&ifloorStr&"├"&rs(sel_TextField)&"--("&ifloor&"级)</option>"&VbCrLf
end if
rs.movenext
loop
rs.close
set rs = nothing
if ifloor = 1 then
selectStr = selectStr&"</select>"&VbCrLf
end if
createSelect = selectStr
end function 参考技术A 你的sql语句就限制eyes_classid = 0
一种是所有的类别都在同张表，字段有上级id，所有下级id，级别路径==
比较复杂。
你自己到网站搜下，有很多 参考技术B 不是太明白你的意思，类别的ID可以根据你的链接传过来，你看看你的数据库表结构里面的多级类别是自己设置的！有什么不明白的加我HI或者把文件发给我，我帮你看看！ 参考技术C 留个邮箱，给你发个比较好用的无限极分类代码
都是双频无线路由,Vue路由怎么这么秀？
本文标识 : V00015
本文编辑 : Jack 风
编程工具 : Vscode
阅读时长 : 6分钟
什么是路由
对于单页面应用程序来说，主要通过URL中的hash(#号)来实现不同页面之间的切换，同时，hash有一个特点：HTTP请求中不会包含hash相关的内容；所以，单页面程序中的页面跳转主要用hash实现；
在单页面应用程序中，这种通过hash改变来切换页面的方式，称作前端路由（区别于后端路由);
在 vue 中使用 vue-router
1.导入 vue-router 组件类库：
<!-- 1. 导入 vue-router 组件类库 -->
<script src="./lib/vue-router-2.7.0.js"></script>
2.使用 router-link 组件来导航
<!-- 2. 使用 router-link 组件来导航 -->
<router-link to="/login">登录</router-link>
<router-link to="/register">注册</router-link>
3.使用 router-view 组件来显示匹配到的组件
<!-- 3. 使用 router-view 组件来显示匹配到的组件 -->
<router-view></router-view>
4.创建使用`Vue.extend`创建组件
// 4.1 使用 Vue.extend 来创建登录组件
var login = Vue.extend({
template: '<h1>登录组件</h1>'
});
// 4.2 使用 Vue.extend 来创建注册组件
var register = Vue.extend({
template: '<h1>注册组件</h1>'
});
5. 创建一个路由 router 实例，通过 routers 属性来定义路由匹配规则
// 5. 创建一个路由 router 实例，通过 routers 属性来定义路由匹配规则
var router = new VueRouter({
routes: [
{ path: '/login', component: login },
{ path: '/register', component: register }
]
});6. 使用 router 属性来使用路由规则
// 6. 创建 Vue 实例，得到 ViewModel
var vm = new Vue({
el: '#app',
router: router // 使用 router 属性来使用路由规则
});
· 设置路由高亮
{ path: '/register/:id', component: register }
2.通过 this.$route.params来获取路由中的参数：
var register = Vue.extend({
template: '<h1>注册组件 --- {{this.$route.params.id}}</h1>'
// 欢迎关注A2Data，感谢您的支持。 });
使用 `children` 属性实现路由嵌套
<div id="app">
<router-link to="/account">Account</router-link>
<router-view></router-view>
</div>
<script>
// 父路由中的组件
const account = Vue.extend({
template: `<div>
这是account组件
<router-link to="/account/login">login</router-link> |
<router-link to="/account/register">register</router-link>
<router-view></router-view>
</div>`
});
// 子路由中的 login 组件
const login = Vue.extend({
template: '<div>登录组件</div>'
});
// 子路由中的 register 组件
const register = Vue.extend({
template: '<div>注册组件</div>'
});
// 路由实例
var router = new VueRouter({
routes: [
{ path: '/', redirect: '/account/login' }, // 使用 redirect 实现路由重定向
{
path: '/account',
component: account,
children: [ // 通过 children 数组属性，来实现路由的嵌套
{ path: 'login', component: login }, // 注意，子路由的开头位置，不要加 / 路径符
{ path: 'register', component: register }
]
}
]
});
// 创建 Vue 实例，得到 ViewModel
var vm = new Vue({
el: '#app',
data: {},
methods: {},
components: {
account
},
router: router
});
</script>
11·11 阿里云大促
扫描二维码
一个服务
一种可能
服务器
期待一起成长
在看和转发
都是一种支持
以上是关于ASP 一个页面执行 无线分类问题的主要内容，如果未能解决你的问题，请参考以下文章