It is this part:
 Code:
$recordset.fields("homemdb") ; This gives the error

That you cannot split
 Code:
Split($recordset.fields("homemdb"),",") ; This gives the error

You can put it in a variable
 Code:
Dim $Var
$Var = $recordset.fields("homemdb")