[求助]关于下拉框on change问题
请教:我想实现在"客户简称"下拉框选择客户后,在"客户全名"自动显示出该客户的全名.我想定义一个函数,在on change里.
如下:
sub display
Dim rs
set rs=server.CreateObject("ADODB.recordset")
rs.Open "select TXDZ from oa_crm_khxx where khbh=" & skhjc ,conn,1,1
if not rs.EOF then
frmxx.khqm.value=rs(0) & ""
end if
rs.Close
end sub
但却发现set rs这段都不能执行,为什么?请指教
