Subversion Repositories DevTools

Rev

Rev 5512 | Go to most recent revision | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 5512 Rev 5953
Line 173... Line 173...
173 
  else
173 
  else
174 
    iif = sFalseStr
 174 
    iif = sFalseStr
175 
  end if
 175 
  end if
176 
End Function
 176 
End Function
177 
'-----------------------------------------------------------------------------------------------------------------------------
 177 
'-----------------------------------------------------------------------------------------------------------------------------
- 
 
 178 
Function EmptyToNull (sVal)
- 
 
 179 
    If sval <> "" Then
- 
 
 180 
        EmptyToNull = sVal
- 
 
 181 
    Else
- 
 
 182 
        EmptyToNull = NULL
- 
 
 183 
    End If
- 
 
 184 
End Function
- 
 
 185 
'-----------------------------------------------------------------------------------------------------------------------------
178 
%>
 186 
%>
179 

            187