- Foxtable(狐表) (http://foxtable.net/bbs/index.asp)
-- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2)
---- web列表输入框 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=126791)
-- 发布时间：2018/10/29 12:43:00
-- web列表输入框
web跳转到编辑页面的时候，如何设置列表输入框的默认值为表中原来的值？
With .AddSelect("系统","系统","|" & DataTables("typefault").GetComboListString("系统"))
.Attribute = """
.Value = dr("系统")
End With
提示value不是wselect的成员？
-- 发布时间：2018/10/29 13:25:00
--
比如改成
With .AddSelect("系统","系统","|" & DataTables("typefault").GetComboListString("系统").replace(dr("系统"), "[" & dr("系统") & "]"))
-- 发布时间：2018/10/29 15:11:00
--
同样提示replace不是wselect的成员？ |
-- 发布时间：2018/10/29 15:14:00
--
以下是引用zhenghangbo在2018/10/29 15:11:00的发言：
|
同样提示replace不是wselect的成员？
|
2楼不可能有错，贴出你写的代码。
-- 发布时间：2018/10/29 15:57:00
--
[此贴子已经被作者于2018/10/29 17:53:52编辑过]
-- 发布时间：2018/10/29 15:59:00
--
.Attribute = """这里面的代码论坛显示不出来
我是写内部函数里的，不是写在httprequest事件里的。
[此贴子已经被作者于2018/10/29 16:01:47编辑过]
-- 发布时间：2018/10/29 16:18:00
--
比如
With .AddSelect("系统","系统","|" & DataTables("typefault").GetComboListString("系统"))
改成
With .AddSelect("系统","系统","|" & DataTables("typefault").GetComboListString("系统").replace(dr("系统"), "[" & dr("系统") & "]"))