如果出现类型不匹配: 'IsTimeOut'这句话,是什么意思?

错误类型:
Microsoft VBScript 运行时错误 (0x800A000D)
类型不匹配: 'IsTimeOut'
/Common/Inc_Login.asp, 第 2 行

以下是前33行代码
<%
if not IsTimeOut(Session("boobuser"),Session("boobpass")) and intMemberKey <> "" then
Dim rdsMemberss
Dim sqlMemberss
Dim strMemberLevel
Dim strMemberType
Dim strRealName

set rdsMemberss = Server.CreateObject("ADODB.Recordset")
sqlMemberss = "Select * From Dat_Member Where MemberKey = "& intMemberKey
rdsMemberss.Open sqlMemberss,Conn
if not rdsMemberss.EOF then
intMemberKey=rdsMemberss("MemberKey")
if rdsMemberss("logincount") mod addpoint = 0 then
set rdsMember22 = Server.CreateObject("ADODB.Recordset")
sqlMember22 = "Select * From Dat_Member Where MemberKey = "& intMemberKey
rdsMember22.Open sqlMember22,Conn,1,3
rdsMember22("Point") = rdsMember22("Point") + 1
rdsMember22.Update
rdsMember22.Close
set rdsMember2 = nothing
end if

if rdsMemberss("MemberType") = "1" then
strMemberType = "个人会员"
strRealName = rdsMemberss("RealName")
else
strMemberType = "企业会员"
strRealName = rdsMemberss("CompanyName")
end if 
%>

哔哔one
浏览 226回答 2
2回答

蛊毒传说

IsTimeOut(Session("boobuser"),Session("boobpass")) 这里的问题。我不知道你的这个函数什么功能,也不知道这个函数带入的两个参数是什么?主要是因为,你的函数需要的两个参数的类型跟你写这个函数的时候传的不一致。你可以把后边的两个参数的类型改变一下。

Smart猫小萌

问题一般都是出现在日期上,看一下你数据库里的日期格式和输入的日期格式,还有就是你软件前台的日期不可以为空
打开App,查看更多内容
随时随地看视频慕课网APP