=判断URL参数是否不存在页面

'checkExist()
function checkExist(parameters)
 if isnull(parameters) or isempty(parameters) or len(parameters)="" then
  checkExist=true
 else
  checkExist=false
 end if
end function

function define_str(str,outSTR)
 dim result
 if isnull(str) or isempty(str) or str="" then
  result =outSTR
 else
  result = str
 end if
 define_str = result
end function