[Resolvido] Criando Mural

[Silas Martins 0]

O sistema de mural tá semi-completo só falta os emotions isso fica por conta da criatividade de cada.

 

<%@Language="vb script:NovoRecado();">
											</td>
											<td align="right">
												<%If Request.QueryString("Pagina") = 1 or Request.QueryString("Pagina") = "" Then%>
													<input type="button" name="btnAnterior" value="Anterior" class="Form1" onClick="java script:Paginacao(<%=Request.QueryString("Pagina") - 1%>);" disabled>
												<%Else%>
													<input type="button" name="btnAnterior" value="Anterior" class="Form1" onClick="java script:Paginacao(<%=Request.QueryString("Pagina") - 1%>);">
												<%End If%>
												<%If rsMuralRecados.EOF Then%>
													<input type="button" name="btnProximo" value="Próximo" class="Form1" onClick="java script:Paginacao(<%=Request.QueryString("Pagina") + 1%>);" disabled>
												<%Else%>
													<%If Request.QueryString("Pagina") = "" Then%>
														<input type="button" name="btnProximo" value="Próximo" class="Form1" onClick="java script:Paginacao(<%=Request.QueryString("Pagina") + 2%>);">
													<%Else%>
														<input type="button" name="btnProximo" value="Próximo" class="Form1" onClick="java script:Paginacao(<%=Request.QueryString("Pagina") + 1%>);">
													<%End If%>
												<%End If%>
											</td>
										</tr>
									</table>
								</td>
							</tr>
					</table>
				</td>
			</tr>
		</table>
	</body>
</html>

<%
	rsMuralRecados.Close
	Set rsMuralRecados = Nothing
	objConn.Close
	Set objConn = Nothing
%>

Continua na proxima parte.