clear quest 在一个form上如何控制一个字段取值来自于这Form上的另一个字段
clear quest 在一个form上如何控制一个字段取值来自于这Form上的另一个字段GetFieldValue("prjname").GetValue()报出为空对象
Dim sessionDim projectname
set session = getsession
set projectname = GetFieldValue("prjname").GetValue()
if projectname<> ""then
strsql = "Select modelname from model where prjname = " + projectname
Set ResultSet = session.BuildSQLQuery(strsql )
ResultSet.Execute
fetchStatus = ResultSet.MoveNext
do while (fetchStatu=1)
choices.AddItem(ResultSet.GetCloumnValue(1))
fetchStatus = ResultSet.MoveNext
loop
end if Maybe use Javascript?
-----------------------
QQ: 546562584 projectname = GetFieldValue("prjname").Getvalue()
不需要set.
页:
[1]