缺少对象问题
在web里有下面一个过程运行时为什么提示缺少对象(说明:obj.md5是封装在DLL文件里的一个过程,已经注册,在其他地方调用正常,如果把这句封了,同样还提示缺少对象: 'server ')
script language= "VBscript ">
Sub B1_OnClick
dim theform
set theform=document.form1
if theform.userID.value= " " then
msgbox( "请输入工号 ")
exit sub
else
dim n
n=obj.md5(theform.userID.value)
set tal=objconn.execute( "select count(id) to t from admin where userID= ' "&(n)& " ' ")
if tal( "t ")> 1 then msgbox( "工号已经存在 "):heform.userID.focus():exit sub
end if
end Sub
</script>
------解决方案--------------------这是在脚本中,取不到服务端的函数
------解决方案--------------------客户端脚本。
你的DLL在服务器注册。
------解决方案--------------------if tal( "t ")> 1 then msgbox( "工号已经存在 "):heform.userID.focus():exit sub
.........................................^^
heform应该是theform
------解决方案--------------------同时注意是否创建了obj:
dim obj
set obj=server.createObject( "XXX ")