1、控件使用ID，不是名称
var result= submitAjaxFileds('getbanzhurenxingming.htm','','学校','年级','班级',false);
.AddSelect("学校","*所在学校*","|瓮安五中|瓮安八中|瓮安九中")
AddSelect(ID, Label, Values)
| ID | 输入框ID。 |
| Label | 在输入框左侧显示的标签内容 |
2、另外已经提醒过，没有必要在函数里面在再使用这种判断，在httprequest事件判断即可，外部已经判断，里面再判断纯属多余，影响性能
Select Case e.Path
Case "getbanzhurenxingming.htm"
3、和6楼那个没有关系，引用js文件了吗？
4、学会调试
Function getbanzhurenxingming(){
alert('能不能弹出');
var result= submitAjaxFileds('getbanzhurenxingming.htm','','学校名称','年级','班级',false);
alert(result); //能不能弹出
If(result){
var vals=result.split("|");
If(vals.length==1){
alert(document.getElementById("班主任姓名").); //能不能弹出
document.getElementById("班主任姓名").value=vals[0];
}
}
}
Dim dr As DataRow = DataTables("班级表").Find("学校='" & e.Values("学校") & "' and 年级='" & e.values("年级") & "'and 班级='" & e.values("班级") & "'")
msgbox(dr IsNot Nothing)
If dr IsNot Nothing Then
msgbox(dr("班主任姓名"))
e.WriteString(dr("班主任姓名"))
End If
加好友 
发短信
Post By：2020/2/22 9:01:00 [显示全部帖子]
