excel-->sqlserver dtsの転送で整合性エラー

null対策で
Function Main()
if isnull( DTSSource("SEHN01")) then
DTSDestination("SEHN01")=" "
else
DTSDestination("SEHN01") = DTSSource("SEHN01")
end if
Main = DTSTransformStat_OK
End Function

というスクリプトを組んでいたが通用しなくなった？ので
素直にcsvで落とすのが吉のようだ