- Foxtable(狐表) (http://foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2)
---- 要先选择国家下面品牌才有内容，有没有办法一进入网页如果国家有内容品牌就有对应的内容 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=179833)
-- 发布时间：2022/9/13 12:50:00
-- 要先选择国家下面品牌才有内容，有没有办法一进入网页如果国家有内容品牌就有对应的内容
Select Case e.Path
Case
"test.htm"
Dim wb As New weui
wb.AddForm("","form1","test.htm")
With wb.AddInputGroup("form1","ipg1","动态列表")
With .AddSelect("国家","国家","|[中国]|德国|日本")
.Attribute = "2">品牌\',\'getBrands.htm\',\'国家\',false)"""
End
With
.AddSelect("品牌","品牌","")
End With
With wb.AddButtonGroup("form1","btg1",True)
.Add("btn1",
"确定",
"submit")
End With
e.WriteString(wb.Build)
\'生成网页
Case "getBrands.htm"
Dim pps As String = DataTables("汽车").GetComboListString("品牌","国家=\'" & e.PostValues("国家") & "\'")
e.WriteString(pps)
End Select
要先选择国家下面品牌才有内容，有没有办法一进入网页如果国家有内容品牌就有对应的内容
-- 发布时间：2022/9/13 13:37:00
--
Select Case e.Path
Case "test.htm"
Dim wb As New weui
wb.AddForm("","form1","test.htm")
With wb.AddInputGroup("form1","ipg1","动态列表")
With .AddSelect("国家","国家","|[中国]|德国|日本")
.Attribute = "font-family: 宋体; font-size: medium; color: brown;">品牌\',\'getBrands.htm\',\'国家\',false)"""
End With
.AddSelect("品牌","品牌","比亚迪|奇瑞|长城|荣威|吉利")
End With
With wb.AddButtonGroup("form1","btg1",True)
.Add("btn1", "确定", "submit")
End With
e.WriteString(wb.Build) \'生成网页
Case "getBrands.htm"
Dim pps As String = DataTables("汽车").GetComboListString("品牌","国家=\'" & e.PostValues("国家") & "\'")
e.WriteString(pps)
End Select
-- 发布时间：2022/9/13 14:58:00
--
我这个国家是读取数据里的，不确定因素，品牌不可以指定一个国家
-- 发布时间：2022/9/13 15:01:00
--
-- 发布时间：2022/9/13 15:35:00
--
我误导你了，
-- 发布时间：2022/9/13 15:45:00
--
一样的东西啊，感觉您思考问题太僵硬了
列表输入框
和文本输入框一样，列表输入框也必须添加在输入框组中。
在输入框组增加一个列表输入框的语法为：
AddSelect(ID, Label, Values)
| ID | 输入框ID。 |
| Label | 在输入框左侧显示的标签内容 |
| Values | 列表项目，用符号"|"隔开，例如"大专|本科|硕士|博士"。 打开网页后，默认会选择第一个值，如果要将其他位置的值作为默认值，可以将其用方括号括起来，例如"大专|[本科]|硕士|博士"，打开网页后，会自动选择本科。 |
取表里的数据后，看看第一个值是什么，根据第一个值取国家对应的品牌赋值不就行了
-- 发布时间：2022/9/13 16:03:00
--
-- 发布时间：2022/9/13 16:09:00
--
使用原生html做的只能自己研究了，自己网上搜搜，什么默认设置一个选项
-- 发布时间：2022/9/13 16:39:00
--
| 下载信息 [文件大小： 下载次数： ] | |
 点击浏览该文件:新建文本文档 (7).txt |
-- 发布时间：2022/9/13 16:56:00
--