Foros del Web - Ver Mensaje Individual

Yoston · #6 (**permalink**) 19/08/2002, 03:08

Hola...no se que BD estas usando..
bueno..con respecto a lo de malex6...depende del tamaño de las fotos...
por ejemplo yo en una bd access con 200 imagenes jpg..capturadas de una webcam no pesa mas de 3.2 mb ...

jean joel...prueba esto...

Código:

  
&lt;!-- #include file=&quot;Adovbs.inc&quot; --&gt;
&lt;%
 mQueryString = &quot;SELECT * FROM imagen where Id=&quot;&amp;codigo
 Set objConn = Server.CreateObject(&quot;ADODB.Connection&quot;)
 objConn.CursorLocation = adUseClient
 objConn.Open &quot;PROVIDER=Microsoft.Jet.OLEDB.4.0;&quot; &amp; &quot;Data Source=C:/BDC.mdb;&quot;
 Set objCmd = Server.CreateObject(&quot;ADODB.Command&quot;)
 objCmd.ActiveConnection = objConn
 objCmd.CommandText = mQueryString
 objCmd.CommandType = adCmdText
 Set objRS = Server.CreateObject(&quot;ADODB.Recordset&quot;)
 objRS.Open objCmd, , adOpenKeySet, adLockPessimistic
 IF objRS.EOF Then
%&gt;
&lt;html&gt;
&lt;head&gt;
&lt;/head&gt;
&lt;body bgcolor=&quot;royalblue&quot;&gt;
&lt;script&gt;
alert(&quot;No hay imagen para este Codigo..&quot;)
window.location.replace(&quot;imagenesC.asp?Cod=200&quot;)   
&lt;/script&gt;
&lt;%    
  Response.end
 else
  SetImgForDisp objRS.fields(&quot;Foto&quot;), &quot;jpeg&quot;
%&gt;
&lt;table border=&quot;1&quot; width=&quot;75%&quot; cellspacing=&quot;0&quot; cellpadding=&quot;0&quot;&gt;
   &lt;tr&gt;
     &lt;td width=&quot;20%&quot; valign=&quot;center&quot;&gt;
      &lt;p align=&quot;center&quot;&gt;&lt;IMG height=240 src=&quot;ImagenProxy.asp&quot; width=320&gt;
	&lt;/p&gt;&lt;/td&gt;
   &lt;/tr&gt;

bueno no es todo el codigo..pero es para que pruebes la parte que necesitas...
espero que sirva...chausito