Nov/082
Título de Notícia com efeito “Fade” em jQuery
Script simples em JavaScript usando jQuery para fazer efeito de fade em títulos de notícias, veja o exemplo:
- Campanha incentiva registro civil
- Carga de petróleo está avaliada em US$ 100 milhões.
- Alongamento previne lesões na 'corrida'
- Obama disputa com Lula preferência no Rio
Para esse efeito usei um arquivo chamado "mask_news.js", nele contem todas as informações necessárias para o desenvolvimento do script.
Abrindo esse arquivo você perceberá uma linha para dar tempo ao efeito, constando em segundos:
delay = delay || 3000;
Coloquei 3 segundos, mais fica a seu critério aumentar ou diminuir:
Veja o código completo:
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=utf-8" />
<title>Ajax Título News</title>
<div style="background: #FF9933;">
<style type="text/css">
#noticias {
list-style: none;
font: 12px Arial;
font-weight: bold;
}
</style>
<script language="javascript" src="jquery-1.2.6.js"></script>
<script language="javascript" src="mask_news.js"></script>
<script type="text/javascript">
$(document).ready(
function() {
$("#noticias").newsTicker();
parseSamples();
}
);
</script>
</head>
<body>
<ul id="noticias" style="">
<li>Campanha incentiva registro civil</li>
<li>Carga de petróleo está avaliada em US$ 100 milhões.</li>
<li>Alongamento previne lesões na 'corrida'</li>
<li>Obama disputa com Lula preferência no Rio</li>
</ul>
</body>
</html>
Segue abaixo os arquivos para download:
Baixar: jquery-1.2.6.js
Baixar: mask_news.js
Nov/081
Comparando Datas com JavaScript
<script language="javascript">
function checarDatas(){
var NomeForm = document.Formulario;
var data_1 = NomeForm.data_01.value;
var data_2 = NomeForm.data_02.value;
var Compara01 = parseInt(data_1.split("/")[2].toString() + data_1.split("/")[1].toString() + data_1.split("/")[0].toString());
var Compara02 = parseInt(data_2.split("/")[2].toString() + data_2.split("/")[1].toString() + data_2.split("/")[0].toString());
if (Compara01 > Compara02) {
document.getElementById("resultado").innerHTML = "Data do Campo 01 Maior";
}
else {
document.getElementById("resultado").innerHTML = "Data do Campo 01 Menor";
}
return false;
}
</script>
<div id="resultado"></div>
<form method="post" action="Teste.pl" name="Formulario" onsubmit="return checarDatas()">
campo01: <input type="text" id="data_01" /><br />
campo02: <input type="text" id="data_02" />
<input type="submit" />
</form>
Acesse também a Webly
Nov/081
ASPUpload : Usando o Persits.Upload - (Parte 02), Pegando o nome do Arquivo
Galera é uma coisa simples, mais que muita gente ainda fica perdido.
Antigamente eu ficava também, usava upload sem componentes, mais ai achei uma solução para o o Persits.Upload, apesar de não usar muito ele.
Esse script é muito simples, manda para a internet e pega o nome da imagem. Essa era uma grande complicação para a galera, cada um tinha seu jeito de fazer, creio que não achei o mais simples, mais achei um menos complicado!!
<form method="post" enctype="multipart/form-data" action="Teste.asp?Enviar=$">
Arquivo: <input type="file" name="Campo" />
<input type="submit" value="Enviar" />
</form>
<%
If CStr(Request.QueryString("Enviar")) <> "" Then
Dim Upload, PegaNomeCampo, NomeCampo
Set Upload = Server.CreateObject("Persits.Upload") ' Criando o Objeto
Upload.Save Server.MapPath("fotos") ' Salvando na pasta
PegaNomeCampo = Upload.Files("Campo").FileName ' Pegando o conteúdo do campo todo
NomeCampo = Right(PegaNomeCampo, Len(PegaNomeCampo) - InstrRev(PegaNomeCampo,"\")) ' Pegar os últimos valores do campo
Response.Write("Upload com Sucesso! O Nome da Foto: "&NomeCampo) ' Exibindo na tela
End If
%>
Nov/080
Função “três pontinhos”
Código simples para você ter aqueles "três pontinhos" em sua notícia, feeds etc...
Usando VBScript
<%@ Language="VBScript" %> <% Public Function Pontos(VarTexto, Max) ' Recebemos os valores If Int(Len(VarTexto)) > Max Then Response.Write(Left(VarTexto, Max)&"...") ' Usamos a função "substring" para fazer os cortes Else Response.Write(VarTexto) End If End Function Texto = "Lorem Ipsum is simply dummy text of the printing and typesetting industry. Lorem Ipsum has been the industry's standard dummy text ever since the whenwhen, when an unknown printer took a galley of type and scrambled it to make a type specimen book." Call Pontos(Texto, 150) ' Chamando a função e mostrando o resultado %>
Agora usando JScript com ASP
<%@ Language="JScript" %>
<%
function pontos(varTexto, Max) { // Recebemos os valores
if (varTexto.length > Max) {
Response.Write(varTexto.substring(0, Max)+"..."); // Usamos a função "substring" para fazer os cortes
}
else {
Response.Write(varTexto);
}
}
texto = "Lorem Ipsum is simply dummy text of the printing and typesetting industry. Lorem Ipsum has been the industry's standard dummy text ever since the whenwhen, when an unknown printer took a galley of type and scrambled it to make a type specimen book.";
pontos(texto, 150); // Chamando a função e mostrando o resultado
%>
Nov/082
Você sabe o que é JSON?
JSON (JavaScript Object Notation) é um acrônimo que serve como alternativa para XML em AJAX, mais não requer o uso exclusivo de JavaScript.
O JSON tem várias vantagens sobre o XML, um deles é a facilidade de escreve e o uso da função eval(), isso foi fundamental para o uso dele no AJAX pelo fato de todos os navegadores web aceitarem.
Existe várias linguagens utilizando o JSON com pacotes de terceiros. Algumas dessas linguagens suportam já o JSON como: JavaScript, ASP, ActionScript, C/C++, C#, Delphi, ColdFusion, Java, Perl, PHP, Python, Rebol e Ruby.
O Google e a Yahoo são uma das empresas que já usam o JSON em suas aplicações, mais lembrando que o JSON não oferece suporte para referências de objetos.
Vamos ver agora um exemplo de terceiros com ASP baseado no exemplo do Google para aplicações JSON.
<!--#Include File="JSON_2.0.2.asp"-->
<%
Dim user
Set user = jsObject()
user("name") = "Ted"
user("surname") = "SobreNome k"
user("message") = "Enviando uma Mensagem para JSON"
user.Flush
%>
O Resultado é:
{"name":"Ted","surname":"SobreNome k","message":"Enviando uma Mensagem para JSON"}
baixe o arquivo JSON_2.0.2.asp
Super simples, até a próxima!


