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


7
Jun/08
4


Retirar Acentos com JavaScript

Esta função simples serve para retirar os acentos do campo, mais ele não retira na hora que você está digitando e sim quando você tira o foco do campo, sendo assim a função é acionada.

aqui abaixo segue o script desenvolvido em javascript retirado da internet e adaptado.


<script language="javascript">
function retirarAcento(objResp) {
var varString = new String(objResp.value);
var stringAcentos = new String('àâêôûãõáéíóúçüÀÂÊÔÛÃÕÁÉÍÓÚÇÜ');
var stringSemAcento = new String('aaeouaoaeioucuAAEOUAOAEIOUCU');

var i = new Number();
var j = new Number();
var cString = new String();
var varRes = '';

for (i = 0; i < varString.length; i++) {
cString = varString.substring(i, i + 1);
for (j = 0; j < stringAcentos.length; j++) {
if (stringAcentos.substring(j, j + 1) == cString){
cString = stringSemAcento.substring(j, j + 1);
}
}
varRes += cString;
}
objResp.value = varRes;
}
</script>

 

aqui abaixo segue um "form" simples só para teste com o comando "onChange" que contém um javascript para acionar a função "retirarAcento"


<form>
<input type="text" name="Teste" onChange="javascript:retirarAcento(this);">
</form>

Acesse também: Webly

27
May/08
2


Gerando Números aleatórios, Randomize

Gerar números randômicos é bem fácil.
Fica mais fácil criar uma função para receber os valores, assim tornando a função "livre" para ser usada em todo o projeto!

<%
Function GerarRandomize(Valores)
	Dim Numeros : Numeros = "0123456789"
	Randomize
	For I = 1 To Valores
		Dim Num : Num = Mid(Numeros, Int(35 * Rnd) + 1, 1)
		Dim Chave : Chave = Chave + Num
	Next
	GerarRandomize = Chave
End Function

Response.Write(GerarRandomize(10)) 'o número 10 significa quandos números serão gerados
%>

Significado das funções:
MID(): Serve para tirar uma string entre dois valores
Sintaxe: MID(String, CaracterInicio, TamanhoSeleção)

RND(): Devolve um numero aleatório.
Antes de se usar esta função, use Randomize, para ele se basear no relógio do sistema e desta maneira não repetir valores.

Qualquer dúvida é só postar:
Acesse também: Webly

21
May/08
0


Resgatando o Menor valor

Variáveis Var_NUMBER_01, Var_NUMBER_02, Var_NUMBER_03, Var_NUMBER_04 iram receber os valores, tratamento com a função Split
O Laço FOR indetifica dentro da variável Valor_DADOS o menor número em comparação ao valor da variável Menor_ para achar o menor valor

Script simples para ser vem adaptado

<%
Var_NUMBER_01 = "433"
Var_NUMBER_02 = "11245"
Var_NUMBER_03 = "712"
Var_NUMBER_04 = "20455"

Valor_DADOS = ""&Var_NUMBER_01&", "&Var_NUMBER_02&", "&Var_NUMBER_03&", "&Var_NUMBER_04&""
Valor_DADOS = Split(Valor_DADOS, ", ")

Menor_ = 1000000

For i = LBound(Valor_DADOS) To UBound(Valor_DADOS)
 If Int(Valor_DADOS(i)) < Int(Menor_) Then
  Menor_ = Valor_DADOS(i)
 End If
Next

Response.Write "Menor Número: " & Menor_
%>

O resultado é: 433

Dicas ou dúvidas relacionadas ao código postado, deixe seu comentário!

Dicas: Webly


Página 1 de 11



Portfólio Ted k'

Atualize seu Navegador