
23/04/2008, 10:28
|
 | | | Fecha de Ingreso: enero-2002 Ubicación: Cali - Colombia
Mensajes: 2.234
Antigüedad: 23 años, 3 meses Puntos: 4 | |
Re: mostrar registro tipo memo en interbase. otra cosa
la funcion la tengo asi
Function Obtenir_Memo(ByRef RS, ByVal Camp)
Dim vChunk, i, str
vChunk = RS(Camp).GetChunk(4000)
for i = 1 to LenB(vChunk)
str = str & Chr(AscB(MidB(vChunk, i, 1)))
next
obtenir_memo = str
END Function
y cuando la ejecuto asi
response.write Obtenir_Memo (rs,"notas")
me sale este error
Tipo de error:
Error de Microsoft VBScript en tiempo de ejecución (0x800A005E)
Uso no válido de Null /sms/eventos.asp, línea 31 donde la linea 31 es esta:
for i = 1 to LenB(vChunk) |