主题：要先选择国家下面品牌才有内容，有没有办法一进入网页如果国家有内容品牌就有对应的内容

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

要先选择国家下面品牌才有内容，有没有办法一进入网页如果国家有内容品牌就有对应的内容

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

我这个国家是读取数据里的，不确定因素，品牌不可以指定一个国家

初始的设置必须指定，因为前面默认选定的是中国。然后选不同的国家的时候，品牌仍然是会根据国家变化的

我误导你了，

一样的东西啊，感觉您思考问题太僵硬了
取表里的数据后，看看第一个值是什么，根据第一个值取国家对应的品牌赋值不就行了

使用原生html做的只能自己研究了，自己网上搜搜，什么默认设置一个选项

下载信息  [文件大小：   下载次数： ]

点击浏览该文件:新建文本文档 (7).txt