Comunidad de diseño web y desarrollo en internet online

Como cartgo una imagen jpg en flash

Citar            
MensajeEscrito el 08 May 2006 09:45 pm
Necesito saver como cargar una imagen en flesh y si alguien save como puedo mostrar una serie de imagenes que estan administradas por una base de datos como galerias.
Favor de ver lo siguiente
<%
Session.LCID = 1034
Response.Buffer = True

Dim con, rs, SQL

pase= Request.QueryString("id")

set con=Server.CreateObject("ADODB.Connection")
set rs=Server.CreateObject("ADODB.Recordset")

con.Open "Provider=Microsoft.Jet.OLEDB.4.0; Data Source="&Server.MapPath("admin/goncalves.mdb")&";"
SQL="SELECT * FROM propiedades WHERE id_propi LIKE '%"&pase&"%';"

rs.Open SQL, con, 1, 2
%>
<%
set con1=Server.CreateObject("ADODB.Connection")
set rs1=Server.CreateObject("ADODB.Recordset")

con1.Open "Provider=Microsoft.Jet.OLEDB.4.0; Data Source="&Server.MapPath("admin/goncalves.mdb")&";"
SQL1="SELECT * FROM galerias WHERE id_propi LIKE '%"&pase&"%';"

rs1.Open SQL1, con1, 1, 2
%>
<%Dim con3, rs3, SQL3

pivot=rs("region")
set con3=Server.CreateObject("ADODB.Connection")
set rs3=Server.CreateObject("ADODB.Recordset")

con3.Open "Provider=Microsoft.Jet.OLEDB.4.0; Data Source="&Server.MapPath("admin/goncalves.mdb")&";"
SQL3="SELECT * FROM familias WHERE id LIKE '%"&pivot&"%';"
rs3.Open SQL3, con3

region=rs3("familia")
%>
<html xmlns="http://www.w3.org/1999/xhtml">
<head>
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1" />
<title>Ficha Propiedad</title>
<style type="text/css">
<!--
body {
margin-left: 0px;
margin-top: 0px;
margin-right: 0px;
margin-bottom: 0px;
scrollbar-face-color: #6491BF;
scrollbar-shadow-color: #6491BF;
scrollbar-highlight-color: #6491BF;
scrollbar-3dlight-color: #6491BF;
scrollbar-darkshadow-color: black;
scrollbar-track-color: #FFFFFF;
scrollbar-arrow-color: #FFFFFF;
}
-->
</style>
<script type="text/JavaScript">
<!--



function MM_preloadImages() { //v3.0
var d=document; if(d.images){ if(!d.MM_p) d.MM_p=new Array();
var i,j=d.MM_p.length,a=MM_preloadImages.arguments; for(i=0; i<a.length; i++)
if (a[i].indexOf("#")!=0){ d.MM_p[j]=new Image; d.MM_p[j++].src=a[i];}}
}
//-->
</script>
<link href="goncal.css" rel="stylesheet" type="text/css">
</head>

<body onLoad="MM_preloadImages('images/btns/somos/somos2.jpg','images/btns/busca/busca2.jpg')" bgcolor="#FFD964">
<table width="550" border="0" cellpadding="0" cellspacing="0" >
<!--DWLayoutTable-->

<tr>
<td height="425" valign="top"><table width="100%" border="0" cellpadding="0" cellspacing="0" >
<tr>
<td width="550" height="12"></td>
</tr>
<tr>
<td width="546" height="22" align="center" valign="middle" ><img src="images/titulos/titulopropiedades.gif" width="550" height="22"></td>
</tr>
<tr>
<td height="403" valign="top"><table width="100%" border="0" cellpadding="0" cellspacing="0">
<!--DWLayoutTable-->
<tr>
<td width="546" height="17" valign="middle" class="subtit">&nbsp;
FICHA PROPIEDAD</td>
</tr>
<tr>
<td height="7"></td>
</tr>
<tr>
<td height="318" valign="top"><table width="100%" border="0" cellpadding="0" cellspacing="0">
<!--DWLayoutTable-->
<tr>
<td width="305" height="250" valign="top"><table width="100%" border="0" cellpadding="0" cellspacing="0">
<!--DWLayoutTable-->
<tr>
<td width="305" height="230" align="center" valign="middle"><img src="admin/casas/<%=rs.Fields("foto").value%>" width="300" height="225"></td>
</tr>
<tr>
<td height="20" valign="top"><span class="subtit">&nbsp;
GALERIA DE FOTOS </span></td>
</tr>
</table></td>
<td colspan="2" valign="top"><table width="100%" border="0" cellpadding="0" cellspacing="0">
<!--DWLayoutTable-->
<tr>
<td width="116" height="18" valign="middle" class="titc">N&ordm;
Propiedad </td>
<td width="125" valign="top"><span class="tahoma12n"><%=rs.Fields("id_propi").value%></span></td>
</tr>
<tr>
<td height="18" valign="middle"><span class="titc">Tipo
Propiedad </span></td>
<td valign="middle"><span class="tahoma12n"><%=rs.Fields("tipo").value%></span></td>
</tr>
<tr>
<td height="18" valign="middle"><span class="titc">Tipo
Operaci&oacute;n </span></td>
<td valign="middle"><span class="tahoma12n"><%=rs.Fields("operacion").value%></span></td>
</tr>
<tr>
<td height="18" valign="middle" class="titc">Regi&oacute;n</td>
<td valign="middle"><span class="tahoma12n">
<%Response.Write(region)%>
</span></td>
</tr>
<tr>
<td height="18" valign="middle"><span class="titc">Ciudad</span></td>
<td valign="middle"><span class="tahoma12n"><%=rs.Fields("ciudad").value%></span></td>
</tr>
<tr>
<td height="18" valign="middle"><span class="titc">Sector</span></td>
<td valign="middle"><span class="tahoma12n"><%=rs.Fields("sector").value%></span></td>
</tr>
<tr>
<td height="18" valign="middle" class="titc">Precio</td>
<td valign="middle"><span class="tahoma12n"><%=rs.Fields("precio").value%></span></td>
</tr>
<tr>
<td height="18" colspan="2" valign="middle" class="titc">Detalles</td>
</tr>
<tr>
<td height="106" colspan="2" valign="top"><span class="tahoma12n"><%=rs.Fields("observacion").value%></span></td>
</tr>
</table></td>
</tr>
<tr>
<td height="68" valign="top"><table width="100%" border="0" cellpadding="0" cellspacing="0">
<%
Do while not rs1.EOF
If rs1.EOF Then
Response.Write("No existen fotos para la galeria de este remate")
End If
Response.Write ("<tr>")
For i = 1 To 4
If Not rs1.EOF Then
Response.Write("<td width=""25%"" height=""62"" align=""center"" valign=""top""><a href=foto.asp?id="&rs1.Fields("foto")&"&codigo="&rs1.Fields("id_propi")&" target=""_blank""><img src=""admin/galerias/"&rs1.Fields("foto").value&""" width=""75"" border=""0"" alt=""Click para ver foto ampliada""></a></td>")
rs1.MoveNext
End If
Response.Write("</td>")
Next
Response.Write("</tr>")
Loop
%>
</table></td>
<td width="120" align="center" valign="middle"><a href="orden_visita.asp?id=<%=rs.Fields("id_propi").value%>"><img src="images/botones/btnvisita.gif" width="116" height="26" border="0"></a></td>
<td width="121" align="center" valign="middle"><a href="javascript:history.back(1)"><img src="images/botones/btnvolver.gif" width="116" height="26" border="0"></a></td>
</tr>
</table></td>
</tr>
<tr>
<td height="61">&nbsp;</td>
</tr>
</table></td>
</tr>
</table></td>
</tr>
<tr>
<td height="6"></td>
</tr>
<tr>
<td height="20" valign="top"><!--DWLayoutEmptyCell-->&nbsp;</td>
</tr>
<tr>
<td height="36" valign="top"><table width="100%" border="0" cellpadding="0" cellspacing="0" background="images/bk.jpg">
<!--DWLayoutTable-->
<tr>
<td width="226" height="36" valign="middle" class="discla"> <div></div></td>
<td width="236" align="right" valign="bottom" class="discla" >Dise&ntilde;ado
por </td>
<td width="88" align="center" valign="bottom" ><a href="http://www.conclave.cl" target="_blank"><span class="discla">Conclave</span></a></td>
</tr>
</table></td>
</tr>
</table>
</body>
</html>
Bueno todo eso e mi galeria como ven es estatica ahora quiero que mi galeria se mueva las imagenes que correspondan a cada una de las categorias, solo en su categoria, me explico si entro a la categoria 1 ( endonde hay 3 fotos ) que solo se muevan las de catagoria 1.
Es es por que tengo todas las fotos e una sola carpeta y las administro por asp.
Por favor necesito alluda urgente.

Por karmish

1 de clabLevel



 

msie
Citar            
MensajeEscrito el 09 May 2006 12:25 am
Porfavor no repitas post.
Enserio, si pones codigo (y mas tanto como en este post) usa las etiquetas "[ code ][ / code ]".

[Post cerrado :bofh:]

Por Cep

BOFH

1509 de clabLevel

9 tutoriales

1 ejemplo

Genero:Masculino   REC Bastard Operators From Hell

Web Developer

firefox

 

Cristalab BabyBlue v4 + V4 © 2011 Cristalab
Powered by ClabEngines v4, HTML5, love and ponies.