
lexus
Código PHP:
Function Obtenir_Memo(ByRef RS, ByVal Camp)
No olvidar situar en el select el campo Memo (ntext, image, text) el ultimo campo.
Dim vChunk
vChunk = RS(Camp).GetChunk(4000)
Obtenir_Memo = vChunk
Do Until IsNull(vChunk) = true
vChunk = RS(Camp).GetChunk(4000)
Obtenir_Memo = Obtenir_Memo & vChunk
Loop
END Function
no resulta directamente la llamada de la funcion???
Obtenir_Memo(RS,notas)
??