|
|
|
|
|
|
|
|
Dicas
|
|
|
ASP - Active Server Page (Miscelâneas)
|
|
 |
Título da Dica: Charges em seu Site !!!
|
 |
|
|
|
Postada em 17/9/2003 por Mago_Pc
<%
'Vale apenas lembrar que este script tem como objetivo de apenas
'dar uma atração para seu site nada mais utilizando as Charges do site www.charges.com.br
'É lógico que vc terá que dizer que os direitos são do Site original.
dim arquivo, dia, mes, diario, mensal, anual, pedido, anime
diario=request.form("dia")
mensal=request.form("mes")
anual=request.form("ano")
anime= request.form("escolha")
pedido= anual & mensal & diario
if pedido = "" then
if day(now)<10 then
dia= "0" & day(now)
else
dia= day(now)
end if
if month(now)<10 then
mes= "0" &month(now)
else
mes= month(now)
end if
arquivo = year(now)& mes & dia
%>
<table width="450" border="0" cellspacing="2" cellpadding="2" height="357">
<tr>
<td width="62%" height="2" align="center" valign="top">
<table width="95%" border="0" cellspacing="0" cellpadding="2">
<tr>
<th><img src="figiss/charge.gif" width="269" height="37"></th>
</tr>
</table>
<object classid="clsid:D27CDB6E-AE6D-11cf-96B8-444553540000" codebase="http://download.macromedia.com/pub/shockwave/cabs/flash/swflash.cab#version=4,0,2,0" width="350" height="235">
<param name=movie value="http://charges.globo.com/charges/<%=arquivo%>som.swf">
<param name=quality value=high>
<embed src="../../silvaserpa/fig/vest1.swf" quality=high pluginspage="http://www.macromedia.com/shockwave/download/index.cgi?P1_Prod_Version=ShockwaveFlash" type="application/x-shockwave-flash" width="227" height="60">
</embed>
</object>
<table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td height="7" colspan="2">
<div align="center"><font face="Verdana, Arial, Helvetica, sans-serif">Direitos
reservados a Charges.com.br</font> </div>
</td>
</tr>
</table>
<table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td colspan="2">
<div align="center"><font face="Verdana, Arial, Helvetica, sans-serif">Para
ver as charges dos dias anteriores escolha o dia, mês e o
ano. </font></div>
</td>
</tr>
<tr>
<td colspan="2">
<form name="form1" method="post" action="iss.asp?id=10" >
<table width="100%" border="0" cellspacing="2" cellpadding="0">
<tr>
<td colspan="3" height="23">
<div align="right">
<select name="dia" class="form">
<option value="01">01</option>
<option value="02">02</option>
<option value="03">03</option>
<option value="04">04</option>
<option value="05">05</option>
<option value="06">06</option>
<option value="07">07</option>
<option value="08">08</option>
<option value="09">09</option>
<option value="10">10</option>
<option value="11">11</option>
<option value="12">12</option>
<option value="13">13</option>
<option value="14">14</option>
<option value="15">15</option>
<option value="16">16</option>
<option value="17">17</option>
<option value="18">18</option>
<option value="19">19</option>
<option value="20">20</option>
<option value="21">21</option>
<option value="22">22</option>
<option value="23">23</option>
<option value="24">24</option>
<option value="25">25</option>
<option value="26">26</option>
<option value="27">27</option>
<option value="28">28</option>
<option value="29">29</option>
<option value="30">30</option>
<option value="31">31</option>
</select>
<select name="mes" class="form">
<option value="01">Janeiro</option>
<option value="02">Fevereiro</option>
<option value="03">Março</option>
<option value="04">Abril</option>
<option value="05">Maio</option>
<option value="06">Junho</option>
<option value="07">Julho</option>
<option value="08">Agosto</option>
<option value="09">Setembro</option>
<option value="10">Outubro</option>
<option value="11">Novembro</option>
<option value="12">Dezembro</option>
</select>
<select name="ano" class="form">
<option value="2003">2003</option>
<option value="2002">2002</option>
<option value="2001">2001</option>
</select>
</div>
</td>
<td colspan="2" height="23" width="16%">
<input type="image" border="0" name="ok" src="fig/btnOk.gif" width="20" height="20">
</td>
</tr>
</table>
</form>
</td>
</tr>
</table>
<br>
</td>
</tr>
</table>
<% else %>
<table width="450" border="0" cellspacing="2" cellpadding="2" height="357">
<tr>
<td width="62%" height="311" align="center" valign="top">
<table width="95%" border="0" cellspacing="0" cellpadding="2">
<tr>
<th>Charge do Dia: <% = diario &"/"&mensal&"/"&anual %></th>
</tr>
</table>
<br>
<object classid="clsid:D27CDB6E-AE6D-11cf-96B8-444553540000" codebase="http://download.macromedia.com/pub/shockwave/cabs/flash/swflash.cab#version=4,0,2,0" width="350" height="235">
<param name=movie value="http://charges.globo.com/charges/<%=pedido%>som.swf">
<param name=quality value=high>
<embed src="../../silvaserpa/fig/vest1.swf" quality=high pluginspage="http://www.macromedia.com/shockwave/download/index.cgi?P1_Prod_Version=ShockwaveFlash" type="application/x-shockwave-flash" width="227" height="60">
</embed>
</object> <br>
<table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td height="7" colspan="2">
<div align="center"><font face="Verdana, Arial, Helvetica, sans-serif">Direitos
reservados a Charges.com.br</font> </div>
</td>
</tr>
</table>
<table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td colspan="2">
<div align="center"><font face="Verdana, Arial, Helvetica, sans-serif">Para
ver as charges dos dias anteriores escolha o dia, mês e o
ano. </font></div>
</td>
</tr>
<tr>
<td colspan="2">
<form name="form1" method="post" action="iss.asp?id=10" >
<table width="100%" border="0" cellspacing="2" cellpadding="0">
<tr>
<td colspan="3" height="23">
<div align="right">
<select name="dia" class="form">
<option value="01">01</option>
<option value="02">02</option>
<option value="03">03</option>
<option value="04">04</option>
<option value="05">05</option>
<option value="06">06</option>
<option value="07">07</option>
<option value="08">08</option>
<option value="09">09</option>
<option value="10">10</option>
<option value="11">11</option>
<option value="12">12</option>
<option value="13">13</option>
<option value="14">14</option>
<option value="15">15</option>
<option value="16">16</option>
<option value="17">17</option>
<option value="18">18</option>
<option value="19">19</option>
<option value="20">20</option>
<option value="21">21</option>
<option value="22">22</option>
<option value="23">23</option>
<option value="24">24</option>
<option value="25">25</option>
<option value="26">26</option>
<option value="27">27</option>
<option value="28">28</option>
<option value="29">29</option>
<option value="30">30</option>
<option value="31">31</option>
</select>
<select name="mes" class="form">
<option value="01">Janeiro</option>
<option value="02">Fevereiro</option>
<option value="03">Março</option>
<option value="04">Abril</option>
<option value="05">Maio</option>
<option value="06">Junho</option>
<option value="07">Julho</option>
<option value="08">Agosto</option>
<option value="09">Setembro</option>
<option value="10">Outubro</option>
<option value="11">Novembro</option>
<option value="12">Dezembro</option>
</select>
<select name="ano" class="form">
<option value="2003">2003</option>
<option value="2002">2002</option>
<option value="2001">2001</option>
</select>
</div>
</td>
<td colspan="2" height="23" width="13%">
<input type="image" border="0" name="ok2" src="fig/btnOk.gif" width="20" height="20">
</td>
</tr>
</table>
</form>
</td>
</tr>
</table>
<br>
</td>
</tr>
</table>
<%end if%>
|
|
|
|
|
