ayuda por favor!!

horno
11 de Agosto del 2004
Necesito pasar como parametro un campo ntext en vb6 y no puedo. Yo hago esto, pero el adLongVarChar no soporta un campo ntext. Alguno tiene idea como puedo solucionarlo!?? por favor! gracias

Set prm = CreateObject("ADODB.Recordset")

prm.Fields.Append "Id", adInteger, 1, adFldIsNullable
prm.Fields.Append "Observaciones1", adLongVarChar, , adFldIsNullable
prm.Fields.Append "Observaciones2", adLongVarChar, , adFldIsNullable
prm.Fields.Append "Observaciones3", adLongVarChar, , adFldIsNullable
prm.Fields.Append "Observaciones4", adLongVarChar, , adFldIsNullable


prm.Open , , adOpenStatic, adLockOptimistic
prm.AddNew
prm("id").Value = Id
prm("Observaciones1").Value = Observaciones1
prm("Observaciones2").Value = Observaciones2
prm("Observaciones3").Value = Observaciones3
prm("Observaciones4").Value = Observaciones4

prm.Update