Ted k’ É assim que tem que ser! Programando em ASP, ASP.NET, PHP, CSS, dentre outras…


18
Nov/08
2


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

14
Nov/08
1


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

6
Nov/08
1


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
%>
4
Nov/08
0


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
%>
2
Nov/08
2


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!





Portfólio Ted k'

Atualize seu Navegador