论坛首页   WEB网页设计  参数是否的为空

[公告]快到[搜艺招聘网]发布招聘信息 注册简历、发布自己作品！ ：）
参数是否的为空
yoguz 查看yoguz的博客 金钱 : 18255 Level : 0 发帖数 : 1564 最后登陆 : 2019/10/24 注册时间 : 2004/12/13	信息 | 留言 | 引用 | 回复 | 编辑 | 置顶 | 移动 | 删除 参数是否的为空 因为所输入的参数类型不同，所以判断的方法也不一样。如何正确的判断参数是否为空？ 具体的请看下文所示： <% 'Check a variable isn't "empty" Function IsBlank(ByRef TempVar) 'by default, assume it's not blank IsBlank = False 'now check by variable type Select Case VarType(TempVar) 'Empty & Null Case 0, 1 IsBlank = True 'String Case 8 If Len(TempVar) = 0 Then IsBlank = True End If 'Object Case 9 tmpType = TypeName(TempVar) If (tmpType = "Nothing") Or (tmpType = "Empty") Then IsBlank = True End If 'Array Case 8192, 8204, 8209 'does it have at least one element? If UBound(TempVar) = -1 Then IsBlank = True End If End Select End Function %> Example Usage <% If IsBlank(Session("username"))Then response.redirect("LoginFail.htm") End If %> 排卵期计算器 橙创意
2006/5/25	信息 | 留言 | 引用 | 回复 | 编辑 | 置顶 | 移动 | 删除