主题:  (关联多层下拉选项)数据库版!值得看看。

sunyabc

职务:普通成员
等级:1
金币:0.0
发贴:53
注册:2001/3/8 11:01:55
#12001/4/3 9:41:52
http://zhuanke.163.net/1000.htm



这个效果怎么用UD做,或怎么把选项绑定在数据库的字段中???

很急!求你了。。。。

编辑历史:[这消息被sunyabc编辑过(编辑时间2001-04-03 11:28:16)]
[这消息被sunyabc编辑过(编辑时间2001-04-03 13:32:04)]
[这消息被sunyabc编辑过(编辑时间2001-04-04 12:52:40)]


5D荣誉斑竹

职务:普通成员
等级:2
金币:2.0
发贴:654
注册:2000/12/19 10:59:22
#22001/4/3 10:13:05
这个用UltraDev应该不难做。两个表(其实一个表也可以的)一个大类、一个小类,之间有个关系,在UltraDev中将数据表绑定到下拉菜单中即可。
具体中间的传递我也说不清楚。看看吧,会有答案的。
portal.eastchina.com/01470/asppage/ydetail.asp?yid=13



sunyabc

职务:普通成员
等级:1
金币:0.0
发贴:53
注册:2001/3/8 11:01:55
#32001/4/3 11:25:52
你提供的例子不对,他仅仅是查询提交,没有把两个表的关系绑定在下拉框中,能不能帮我看看,我找了好多地方,都是用JS做,太不方便了。。


谢谢!!



stchin

职务:普通成员
等级:1
金币:0.0
发贴:81
注册:2001/2/15 13:42:31
#42001/4/3 12:39:47
sunyabc在上个贴子中说
引用:
你提供的例子不对,他仅仅是查询提交,没有把两个表的关系绑定在下拉框中,能不能帮我看看,我找了好多地方,都是用JS做,太不方便了。。


谢谢!!

这个用ud不好做,如果你能看懂代码的话,可以改改看。
ud只能做一个list的那种。只要把数据源binding到list的value属性上就行了。



sunyabc

职务:普通成员
等级:1
金币:0.0
发贴:53
注册:2001/3/8 11:01:55
#52001/4/3 12:49:10
binding当然会,就是不会改代码,不然.......


哪位高手帮帮忙!!先谢了.......



sunyabc

职务:普通成员
等级:1
金币:0.0
发贴:53
注册:2001/3/8 11:01:55
#62001/4/3 15:37:37
有一页填表的页面,其中有几个下拉表单是通过一个表的某个字段动态
生成,比如省下面的城市名,希望选择某一个省即可自动在另一下拉表
单内生成城市名,.....然后提交给asp处理加入到另外一个表内。

终于完成了,代码如下,可能比较乱,不过还是很有效的,不用刷新页面。
大家不妨一试~~~~~~~~

<form name=f1 METHOD="POST">
<%
OpenDB objConn, "xxxx"
Set RSClass = objConn.Execute("SELECT * FROM class Order by fldClass")
If RSClass.EOF Then
Response.Write "没有记录。<BR>"

Else

Response.Write "<SELECT NAME=""class"" style=""FONT-SIZE: 9pt"" SIZE=10" & _
" ONCHANGE=""classselected(this);"" >"
sjavascript = "function classselected(elem){" &_
vbCrlf & _
"for (var i = document.f1.sort.options.length; i >= 0; i--){" & vbCrlf & _
"document.f1.sort.options[i] = null;" & _
vbCrlf
Do Until RSClass.EOF
If sLastClass <> RSClass("fldClass") Then
sLastClass = RSClass("fldClass")
Response.Write "<OPTION value=" & RSClass("fldID") & ">" & sLastClass & "</OPTION>"
sjavascript = sjavascript & "}" & vbCrlf & _
"if (elem.options[elem.selectedIndex].value==" & _
RSClass("fldID") & "){" & vbCrlf
End If
sjavascript = sjavascript & _
"document.f1.sort.options[document." & _
"f1.sort.options.length] = new Option('" & _
RSClass("fldSort") & "','" & RSClass("fldID") & "');" & _
vbCrlf
RSClass.MoveNext
Loop
Response.Write "</SELECT>"
Response.Write "<SELECT NAME=""sort"" style=""FONT-SIZE: 9pt"" SIZE=10>"
Response.Write "<OPTION>[请选择]</OPTION>"
Response.Write "</SELECT>"

sjavascript = sjavascript & vbCrlf & "}" & vbCrlf & "}" & vbCrlf
Response.Write "<SCR" & "IPT LANGUAGE=""javascript"">" & vbCrlf
Response.Write sjavascript & vbCrlf & "</SCR" & "IPT>" & vbCrlf
End If
RSClass.Close
Set RSClass = Nothing%>
</form>


这是我找到的代码,但是我看的不是很明白,加入到UD的代码不能执行,有没有人愿意帮忙,改一改使他能够在UD中使用。

编辑历史:[这消息被sunyabc编辑过(编辑时间2001-04-03 15:38:02)]


5D荣誉斑竹

职务:普通成员
等级:2
金币:2.0
发贴:654
注册:2000/12/19 10:59:22
#72001/4/3 18:44:16
哦,对不起了,其实我真的做过这个东西,不过没有用上,总之我UltraDev可行。我那个例子我再找找。。。。。:(



5D荣誉斑竹

职务:普通成员
等级:2
金币:2.0
发贴:654
注册:2000/12/19 10:59:22
#82001/4/4 8:23:04
portal.eastchina.com/01470/asppage/ydetail.asp?yid=10
这个例子没有错了,当时我看见的时候就知道蛮有用,但也没有仔细玩。



sunyabc

职务:普通成员
等级:1
金币:0.0
发贴:53
注册:2001/3/8 11:01:55
#92001/4/4 12:51:27

非常感谢!真的可以用了。