Hi Magnus, Try to use parameter for you INSERT statement and declare it as adVarWChar, which is a Unicode string Dim loParameter as ADODB.Parameter Dim locommand as ADODB.Command ...... sSQLStr = "INSERT INTO USERID.MAGNUS_TEST (C1) VALUES (?)" Set loCommand = New ADODB.Command Set loCommand.ActiveConnection = conn loCommand.CommandText = sSQLStr Set loParameter = loCommand.CreateParameter("Param1", adVarWChar, adParamInput, 10) loParameter.Value = sData loCommand.Parameters.Append loParameter loCommand.Execute ....... -- Val Mazur Microsoft MVP "Magnus Olofsson" <Magnus XXXX@XXXXX.COM > wrote in