Microsoft VBScript compilation error '800a03f6'
Expected 'End'
/coberturas/galeria.asp, line 289
mas a linha 289 é end if
<% end if %>
Veja Aqui
There have been 17 items by fedimar (Search limited from 19/04/2023)
Posted by fedimar on 29/07/2006, 15:55 in ASP
id = request("idevento") registros = 12 pagina = Request.QueryString("pagina") If pagina = "" Then pagina = 1 End If Set rs = Server.Createobject("ADODB.RECORDSET") set rs.ActiveConnection = Conexao rs.CursorType = 3 rs.PageSize = registros SQL2 = "select * from Eventos where idevento = "& id &"" set rs2 = conexao.execute(SQL2) pasta = rs2("pasta") rs2.close Set rs2 = nothing sql = "SELECT * FROM Fotos where idevento = "& id &" ORDER BY idfoto" rs.Open sql If rs.EOF Then tem = "nao" Response.Write "" Else rs.AbsolutePage = pagina contador = 0 While Not rs.EOF AND x < rs.PageSize x = x + 1 id_final = rs("idfoto") rs.MOveNext Wend for w = 1 to x rs.MovePrevious Next x = 0 While Not rs.EOF AND x < rs.PageSize x = x + 1 if cint(x) = 1 Then idf = rs("idfoto") id_inicial = idf end if if contador = 3 Then response.write "<br><br><br><br><br>" contador = 1 else contador = contador + 1 end if %> <% %> <table border="0" width="107" cellspacing="0" cellpadding="0" align="left" height="75" style="border-width:0; border-top-color:rgb(0,0,0); border-right-color:rgb(0,0,0); border-bottom-color:rgb(0,0,0); border-style:none;"> <tr> <td width="100" height="75" style="border-width:0px; border-top-color:rgb(0,0,0); border-right-color:rgb(0,0,0); border-bottom-color:rgb(0,0,0); border-style:none;"> <a href='../coberturas/mostrar_foto.asp?idfoto=<%=rs("idfoto")%>&idevento=<%=id%>&id_inicial=<%=id_inicial%>&id_final=<%=id_final%>' target="mostrar_foto"><img border="1" src=fotos/<%=pasta%>/miniaturas/<%=rs("foto")%> style="filter:alpha(opacity=50)" onMouseover="makevisible(this,0)" onMouseout="makevisible(this,1)" width=100 height=75 alt="Número da foto para comprar: <%=rs("idfoto")%>"></a> </td> <td width="5" height="75"></td> </tr> </table> <% rs.MoveNext Wend select case x case 1, 2,3 response.write "<br><br><br><br><br><br><br><br><br><br><br><br><br><br><br><br><br><br>" case 4, 5, 6 response.write "<br><br><br><br><br><br><br><br><br><br><br><br><br>" case 7, 8, 9 response.write "<br><br><br><br><br><br><br><br>" case 10, 11, 12 response.write "<br><br><br>" end select %> </td> </tr> <tr> <td width="403"> <table align="left" border="0" cellpadding="0" cellspacing="0" width="367"> <tr valign="middle"> <td height="118"> <table width="103%" align="center"> <tr> <td><font color="#000000" face="tahoma"><span style="font-size:10pt;"><b> <% <---- Paginação Aqui --->>>> total = rs.PageCount for i = 1 to total if i = cInt(pagina) Then response.write "<table width=25 height=25 align=left>"&i&"<table>" else response.write "<table width=25 height=25 align=left>" response.write "<font color=""#FFFFFF"" size=""-2""><a href=galeria.asp?idevento="&id&"&pagina="&i&">"&i&"</a></font>" response.write "</table>" end if Next end if rs.Close Set rs = Nothing %>
Posted by fedimar on 29/07/2006, 01:01 in ASP
Posted by fedimar on 26/07/2006, 00:50 in ASP
Posted by fedimar on 24/04/2007, 01:16 in PHP
Posted by fedimar on 05/05/2007, 23:11 in Adobe Flash e ActionScript
Posted by fedimar on 12/05/2007, 01:47 in Adobe Flash e ActionScript
Posted by fedimar on 12/05/2007, 02:21 in PHP
<?
$id = $_GET[id];
$sql = mysql_query("SELECT * FROM galeria where id='$id'");
$dados=mysql_fetch_array($sql);
?>
<form action="?pg=../galeria/admin/gal-alterar_db.php" method="post" enctype="multipart/form-data" name="cadastro" id="cadastro" onsubmit="return validate(this);">
<input type="hidden" name="id" value="<? echo $id?>">
<h3>Alterar Evento</h3>
<table width="440" border="0" align="center" cellpadding="2" cellspacing="0">
<tr>
<td colspan="4" align="right" style="border-bottom:1px solid #cccccc">*Campos
Obrigatórios</td>
</tr>
<? if($usernivel == "1") {?>
<tr valign=middle>
<td align=right style="border-bottom:1px solid #cccccc"><b>Franquia:</b></td>
<td colspan="3" style="border-bottom:1px solid #cccccc"> <select name="id_franquia">
<?
$sql1 = mysql_query("SELECT * FROM franquias WHERE id=$dados[id_franquia]");
$dados1=mysql_fetch_array($sql1);
echo "<option value=$dados1[id]>$dados1[cidade]</option>";
echo "<option>=============</option>";
$sql2 = mysql_query("SELECT * FROM franquias");
while($dados2=mysql_fetch_array($sql2)){
echo "<option value=$dados2[id]>$dados2[cidade]</option>";
}
?>
</select> </td>
</tr>
<? } else {?>
<input name='id_franquia' type='hidden' size=45 value="<? echo $idfranquia?>">
<? }?>
<? $sql3 = mysql_query("SELECT * FROM galeria_cat");
$total3 = mysql_num_rows($sql3);
if($total3 > 1){
?>
<tr>
<td width="121" align="right" valign="middle" style="border-bottom:1px solid #cccccc"><strong>*Categoria:</strong></td>
<td colspan="3" valign="middle" style="border-bottom:1px solid #cccccc"><strong>
<select name="id_cat" style="width:100">
<? $sql4 = mysql_query("SELECT * FROM galeria_cat WHERE id='$dados[id_cat]'");
$dados4=mysql_fetch_array($sql4);
echo "<option value=$dados4[id]>$dados4[categoria]</option>";
echo "<option>=============</option>";
while ($dados3=mysql_fetch_array($sql3)){
echo "<option value=`$dados3[id]`>$dados3[categoria]</option>";
}?>
</select>
</strong></td>
</tr>
<? } else {?>
<input name='id_cat' type='hidden' size=45 value="1">
<? }?>
<tr>
<td align="right" valign="middle" style="border-bottom:1px solid #cccccc"><b>*Nome:</b></td>
<td colspan="3" valign="middle" style="border-bottom:1px solid #cccccc">
<input name="nome" type="text" value="<? echo $dados[nome]?>" size="45" maxlength="255">
</td>
</tr>
<td align="right" valign="middle" style="border-bottom:1px solid #cccccc"><b>*Data:</b></td>
<td colspan="7" valign="middle" style="border-bottom:1px solid #cccccc"> <input name="dia" type="text" value="<? $data2 = explode("-",$dados[data]); echo $data2[2];?>" size="3" maxlength="2">
Mês:
<input name="mes" type="text" value="<? $data2 = explode("-",$dados[data]); echo $data2[1];?>" size="3" maxlength="2">
Ano:
<input name="ano" type="text" value="<? $data2 = explode("-",$dados[data]); echo $data2[0];?>" size="6" maxlength="4">
</td>
<tr>
<td align="right" valign="middle" style="border-bottom:1px solid #cccccc"><b>*Local:</b></td>
<td colspan="3" valign="middle" style="border-bottom:1px solid #cccccc">
<input name="local" type="text" value="<? echo $dados[local]?>" size="45" maxlength="255">
</td>
</tr>
<tr>
<td align="right" valign="middle" style="border-bottom:1px solid #cccccc"><b>*Diretorio:</b></td>
<td width="154" valign="middle" style="border-bottom:1px solid #cccccc">
<input name="pastaantiga" type="hidden" value="<? echo $dados[pasta]?>">
<input name="pastanova" type="text" value="<? echo $dados[pasta]?>" maxlength="255">
</td>
<td width="56" valign="middle" style="border-bottom:1px solid #cccccc"><strong>Mostrar</strong></td>
<td width="93" valign="middle" style="border-bottom:1px solid #cccccc"><select name="ver" id="ver">
<option value="<? echo $dados[ver]?>" selected><? echo $dados[ver]?></option>
</select></td>
</tr>
<TR>
<td align="right" style="border-bottom:1px solid #cccccc"><strong>Foto de
Destaque:</strong></td>
<td colspan="7" valign="middle" style="border-bottom:1px solid #cccccc">
<? if($dados[foto01] != "") {
echo "<img align='left' src='thumbs.php?w=70&h=52&imagem=../images/eventos/$dados[id_franquia]/$dados[pasta]/$dados[foto01]' border=1>
<input name=foto_antiga type=hidden value=$dados[foto01] size=12>";
} else {
echo "<b>nenhuma foto</b>";
}?>
<b>Trocar Foto?</b>:<BR> <input name="nova_foto" type="radio" value="nao" checked onClick="java script:desabilitar()">
Não
<input name="nova_foto" type="radio" onClick="java script: Habilitar();" value="sim">
Sim
<input name="nova_foto" type="radio" value="nada" onClick="java script:desabilitar()">
Sem foto<br> <input name="foto_antiga" type="hidden" value="<? echo $dados[foto01]?>">
<input name='foto01' type='file' disabled class="nao" size=14> </td>
</TR>
<tr valign=middle>
<td align=right style="border-bottom:1px solid #cccccc"><b>*Destaque:</b></td>
<td colspan="3" style="border-bottom:1px solid #cccccc">
<? if($dados[destaque] == "S"){ ?>
<input name="destaque" type="radio" value="S" checked>
Sim <input name="destaque" type="radio" value="N">
Nao
<? } else {?>
<input name="destaque" type="radio" value="S">
Sim <input name="destaque" type="radio" value="N" checked>
Nao
<? }?>
</td>
</tr>
</table>
<table align="center">
<tr>
<td width="436" colspan="2"> <p align="center"><font size="1" face="Verdana, Arial, Helvetica, sans-serif">
<input type='submit' value='Alterar'>
</font></p></td>
</tr>
</table>
</form>
<br>
<? $id = $_POST[id]; $id_franquia = $_POST[id_franquia]; $id_cat = $_POST[id_cat]; $nome = $_POST[nome]; $data = "$_POST[ano]-$_POST[mes]-$_POST[dia]";; $local = $_POST[local]; $pastaantiga = $_POST[pastaantiga]; $pastanova = $_POST[pastanova]; $foto_antiga = $_POST[foto_antiga]; $foto01 = $_POST[foto01]; $destaque = $_POST[destaque]; $nova_foto = $_POST[nova_foto]; $ver = $_POST[ver]; if($nova_foto == nada){ $sql = "UPDATE galeria SET id_cat='$id_cat', id_franquia='$id_franquia', nome='$nome', data='$data', local='$local', pasta='$pastanova', foto01='', destaque='$destaque' ver='$ver' WHERE id='$id'"; } if($nova_foto == nao){ $sql = "UPDATE galeria SET id_cat='$id_cat', id_franquia='$id_franquia', nome='$nome', data='$data', local='$local', pasta='$pastanova', foto01='$foto_antiga', destaque='$destaque' ver ='$ver' WHERE id='$id'"; } if($nova_foto == sim){ // aqui executa o upload da foto $uploaddir="../images/eventos/$id_franquia/$pastanova/"; //echo $uploaddir; if($foto01 != "none") {// verifica campo arquivo if (move_uploaded_file($_FILES['foto01']['tmp_name'], $uploaddir . $_FILES['foto01']['name'])) { $varfoto01 = $_FILES['foto01']['name']; $var1 = "$varfoto01"; }} // termina a função para enviar a foto $sql = "UPDATE galeria SET id_cat='$id_cat', id_franquia='$id_franquia', nome='$nome', data='$data', local='$local', pasta='$pastanova', foto01='$var1', destaque='$destaque' ver='$ver' WHERE id='$id'"; } $sql2 = mysql_query($sql); // função renomeia pasta if($pastanova != $pastaantiga){ $var1 = "../images/eventos/$id_franquia/$pastaantiga"; $var2 = "../images/eventos/$id_franquia/$pastanova"; rename("$var1", "$var2"); } ?> <h3>Evento Alterado com sucesso!</h3> <br> <a href='?pg=../galeria/admin/listar.php'>Voltar</a>
Posted by fedimar on 22/05/2006, 11:10 in ASP
Community Forum Software by IP.Board
Licensed to: Webmasters Online