Pegar duas variaveis pela url !
Tipo tenho a seguinte situação quando aciono essa url http://localhost/site/mostra_artistas.asp?cod_Artista=5 me é exibito uma página com os detalhes do artitas com os seguintes campos do BD lojavirtual.mdb e da tabela artistas
Nome
Site
foto1p
foto2p
foto3p
Bom até ai bela tudo foi exibido mas agora a dificuldade é a seguinte as fotos com o "p" do lado pe de pequeno na tabela atistas tem os campo foto1g, foto2g e foto3g que é a foto grande como eu chamaria essa url pois teria que mandar exibir a foto de acodo com o cod_artista e com a devida foto que a pessoa quer ver emplicada! Para isso pelo pouco que entendo eu teria que enviar tanto a varcodeartista como uma var para foto tipo varfoto.
Abaixo segue a página mostra_astirtas.asp nela que é exibida os detalhes dos artistas juntamente com as fotos pequenas, e eu quero que ao clicar na foto a pessoa veja a foto ampliada. Aguardo e muito obrigado!
<!--#include file="conexao.asp"-->
<%
'Recupera o codigo da categoria selecionada
Cod_artista = Request("Cod_artista")
'string para pesquisar qual o nome da categoria
'sqlCat = "SELECT * FROM artistas "
'sqlCat = sqlCat & "WHERE COD_artista = "'string para pesquisar os produtos da categoria
sqlProd = "SELECT * FROM artistas WHERE COD_artista = " & cod_artista &""
'abre a conexao
Set Conexao = Server.CreateObject("ADODB.Connection")
Conexao.Open StrConn
'executa a instrução SQL
Set rsartistas = Conexao.Execute(sqlProd)
varNome = rsartistas("nome")
varEmail = rsartistas("email")
varSite = rsartistas("Site")
varEstilo = rsartistas("Estilo")
vardescricao = rsartistas("descricao")
varfoto= rsartistas("foto")
varfoto1p= rsartistas("foto1p")
vardesc1= rsartistas("desc1")
varfoto2p= rsartistas("foto2p")
vardesc2= rsartistas("desc2")
varfoto3p= rsartistas("foto3p")
vardesc3= rsartistas("desc3")
varfoto4p= rsartistas("foto4p")
vardesc4= rsartistas("desc4")
varfoto5p= rsartistas("foto5p")
vardesc5= rsartistas("desc5")
varfoto6p= rsartistas("foto6p")
vardesc6= rsartistas("desc6")
rsartistas.Close
'executa a instrução SQL
Set rsartistas = Conexao.Execute(sqlProd)
rsartistas.close
%>
<html>
<head>
<title>Opinião</title>
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
</head>
<body bgcolor="#FFFFFF" text="#000000" link="#000066" vlink="#000000" alink="#000000" topmargin="0">
<table width="83%" border="0" cellspacing="10" cellpadding="0" align="center" bgcolor="#FFFFFF">
<tr>
<td valign="middle" height="27" bgcolor="#FFFFFF" align="center"> <div align="left"><font size="2" face="Arial, Helvetica, sans-serif"><b><font color="#000000"><i>
<%if ucase(foto) <> "" then%>
<img src="./adm/img_art/<% = UCase(foto) %>">
<% end if%>
</i></font></b></font></div></td>
</tr>
<tr>
<td valign="middle" height="27" bgcolor="#FFFFFF" align="center"><div align="left">
<em><strong><font color="#000000" size="3" face="Arial, Helvetica, sans-serif">
<%if ucase(varnome) <> "" then%>
<% = (varnome) %>
<% end if%>
</font></strong></em></div></td>
</tr>
<tr>
<td valign="top" height="27" bgcolor="#FFFFFF" align="center"> <div align="left">
<p><font size="2" face="Arial, Helvetica, sans-serif">
<%if ucase(varemail) <> "" then%>
Email:
<% = (varemail) %>
<% end if%>
</font></p>
<p>
<%if ucase(varsite) <> "" then%>
Site:
<% = (varsite) %>
<% end if%>
</p>
</div></td>
</tr>
<tr>
<td valign="middle" height="27" bgcolor="#FFFFFF" align="center"><div align="left"><font size="2"><font size="2"><font face="Arial, Helvetica, sans-serif">
<%if ucase(varestilo) <> "" then%>
Estilo:
<% = UCase(varestilo) %>
<% end if%>
</font></font></font></div></td>
</tr>
<tr>
<td valign="middle" height="27" bgcolor="#FFFFFF" align="center"><div align="justify"><font size="2"><font size="2"><font face="Arial, Helvetica, sans-serif">
<%if (vardescricao) <> "" then%>
<% = (vardescricao) %>
<% end if%>
</font></font></font></div></td>
</tr>
<tr>
<td valign="middle" height="27" bgcolor="#FFFFFF" align="center"> <div align="left"><font face="Arial, Helvetica, sans-serif" size="2" color="#000000"><b>
<%if ucase(varfoto1p) <> "" then%>
<%= ("")%> <img src="./adm/img_art/<% = UCase(varfoto1p) %>"> </b></font></div></td>
</tr>
<tr>
<td valign="middle" height="27" bgcolor="#FFFFFF" align="center"><div align="justify"><font face="Arial, Helvetica, sans-serif" size="2" color="#000000"><%=(vardesc1)%>
<% end if%>
</font></div></td>
</tr>
<tr>
<td valign="middle" height="27" bgcolor="#FFFFFF" align="center"><div align="left">
<%if ucase(varfoto2p) <> "" then%>
<img src="./adm/img_art/<% = UCase(varfoto2p) %>"> </div></td>
</tr>
<tr>
<td valign="middle" height="27" bgcolor="#FFFFFF" align="center"><%=(vardesc2)%>
<% end if%>
<div align="justify"></div>
<div align="justify"></div>
<div align="justify"></div>
<div align="justify"></div></td>
</tr>
<tr>
<td valign="middle" height="27" bgcolor="#FFFFFF" align="center"><div align="left">
<%if ucase(varfoto3p) <> "" then%>
<img src="./adm/img_art/<% = UCase(varfoto3p) %>"> </div></td>
</tr>
<tr>
<td valign="middle" height="27" bgcolor="#FFFFFF" align="center"><div align="justify">
<%=(vardesc3)%>
<% end if%>
</div></td>
</tr>
<tr>
<td valign="middle" height="27" bgcolor="#FFFFFF" align="center"><div align="left">
<%if ucase(varfoto4p) <> "" then%>
<img src="./adm/img_art/<% = UCase(varfoto4p) %>"> </div></td>
</tr>
<tr>
<td valign="middle" height="27" bgcolor="#FFFFFF" align="center"><div align="justify">
<%=(vardesc4)%>
<% end if%>
</div></td>
</tr>
<tr>
<td valign="middle" height="27" bgcolor="#FFFFFF" align="center"><div align="left">
<%if ucase(varfoto5p) <> "" then%>
<img src="./adm/img_art/<% = UCase(varfoto5p) %>"> </div></td>
</tr>
<tr>
<td valign="middle" height="36" bgcolor="#FFFFFF" align="center"><div align="justify">
<%=(vardesc5)%>
<% end if%>
</div></td>
</tr>
<tr>
<td valign="middle" height="36" bgcolor="#FFFFFF" align="center"> <div align="left">
<%if ucase(varfoto6p) <> "" then%>
<img src="./adm/img_art/<% = UCase(varfoto6p) %>"> </div></td>
</tr>
<tr>
<td valign="middle" height="36" bgcolor="#FFFFFF" align="center"><div align="justify">
<%=(vardesc6)%>
<% end if%>
</div></td>
</tr>
</table>
<p> </p>
</body>
</html>Discussão (1)
Carregando comentários...