Disculpa valía 5 y no 3 tu resp.
Te envío ésto porque creo que algo pasó y no te llegó la explicación de tu respuesta, gracias hasta luego.
Tengo un problemita, quería preguntar si alguien sabe mostrar un campo general de fox por medio del asp en una página web.
Nota el contenido del general es indeterminado, una foto, un documento, un pdf o hasta video!
Tengo que usar campo general, porque es parte de los requisitos de la aplicación.
Ahora bien hace como 4 años. Hice un proceso que con dos o tres líneas de código, podrías abrir cualquier objeto COM que tuvieses instalado en la máquina, desde un campo general. Esas tres líneas de código me costaron mucho, y no recuerdo bien.
Era algo parecido a una etiqueta <IMG> pero no me recuerdo. Cuando estaba en esa situación hice entre otros procesos éste, me recuerdo bien, ya era casi cerca de la solución al problema, aunque eso no sirve de nada.
Mi correo es [email protected] para enviarte la pantalla que sale de la ejecución.
? ¿Directorio? Viene desde otros procesos que trae la última carpeta de acceso a la tabla libre.
<%
Dim oConn_ofr_dbj
Dim O_Campo
Dim Objeto
Dim Objeto_Size
Dim Cadena_Coneccion
Set oConn_ofr_dbj = Server.CreateObject("ADODB.Connection")
Cadena_Coneccion = "Provider=MSDASQL.1;Persist Security Info=False;Extended Properties=DSN=Adjuntos;UID=;SourceDB=d:\Estudio_Ofertas\C\Sistema_Estudio_2005\ODBC\Ofertas_Estudio\" & Directorio &";SourceType=DBF;Exclusive=No;BackgroundFetch=Sí;Collate=Machine;"
oConn_ofr_dbj.Open( Cadena_Coneccion)
Set O_Campo = oConn_ofr_dbj.Execute( "Select Doc_Adj From ofr_dbj")
Objeto_Size = O_Campo( "Doc_Adj").ActualSize
Objeto = O_Campo( "Doc_Adj").GetChunk( Objeto_Size)
Response.BinaryWrite Objeto
Response.End
oConn_ofr_dbj.Close
%>
Supongo que cuando lo resolvamos, éste procedimiento te ayudará, a hacer procesos de automatización más adelante, para resolver problemas como éste.
Muchas gracias por tu colaboración.
Tengo un problemita, quería preguntar si alguien sabe mostrar un campo general de fox por medio del asp en una página web.
Nota el contenido del general es indeterminado, una foto, un documento, un pdf o hasta video!
Tengo que usar campo general, porque es parte de los requisitos de la aplicación.
Ahora bien hace como 4 años. Hice un proceso que con dos o tres líneas de código, podrías abrir cualquier objeto COM que tuvieses instalado en la máquina, desde un campo general. Esas tres líneas de código me costaron mucho, y no recuerdo bien.
Era algo parecido a una etiqueta <IMG> pero no me recuerdo. Cuando estaba en esa situación hice entre otros procesos éste, me recuerdo bien, ya era casi cerca de la solución al problema, aunque eso no sirve de nada.
Mi correo es [email protected] para enviarte la pantalla que sale de la ejecución.
? ¿Directorio? Viene desde otros procesos que trae la última carpeta de acceso a la tabla libre.
<%
Dim oConn_ofr_dbj
Dim O_Campo
Dim Objeto
Dim Objeto_Size
Dim Cadena_Coneccion
Set oConn_ofr_dbj = Server.CreateObject("ADODB.Connection")
Cadena_Coneccion = "Provider=MSDASQL.1;Persist Security Info=False;Extended Properties=DSN=Adjuntos;UID=;SourceDB=d:\Estudio_Ofertas\C\Sistema_Estudio_2005\ODBC\Ofertas_Estudio\" & Directorio &";SourceType=DBF;Exclusive=No;BackgroundFetch=Sí;Collate=Machine;"
oConn_ofr_dbj.Open( Cadena_Coneccion)
Set O_Campo = oConn_ofr_dbj.Execute( "Select Doc_Adj From ofr_dbj")
Objeto_Size = O_Campo( "Doc_Adj").ActualSize
Objeto = O_Campo( "Doc_Adj").GetChunk( Objeto_Size)
Response.BinaryWrite Objeto
Response.End
oConn_ofr_dbj.Close
%>
Supongo que cuando lo resolvamos, éste procedimiento te ayudará, a hacer procesos de automatización más adelante, para resolver problemas como éste.
Muchas gracias por tu colaboración.
