21 replies to this topic

[bimonti]

Isso é uma Expressão Regular. Busque no google que você vai entender como funciona.

[Gefirson]

Colegas, tentei simplificar ao máximo uma função para verificar a validade de uma data.
Formato: dd/mm/yyyy

// Modo de uso.

analisa_data(document.getElementById('campo_data').value, 'Data de Envio inválida');

function analisa_data(data, mens){
var i = 1;
if (data.length != 10){
i = 0;
}
var dia = data.substring(0, 2);
var mes = data.substring(3, 5);
var ano = data.substring(6, 10);
var vet_dias_meses = Array('31', '28', '31', '30', '31', '30', '31', '31', '30', '31', '30', '31');
var s = '';
for(z=1; z<=vet_dias_meses[mes-1]; z++){
s = s+','+pad(z, 2, '0');
}
s = s.substring(1, 1000);
var vet_dias = s.split(',');
var tot = Array.indexOf(vet_dias, dia);
if (tot == -1){
i = 0;
}
if (i == 0){
alert(mens);
exit;
}
}

// Função necessária pega de um colega na net.

function pad (n, len, padding){
var sign = '',
s = n;

if (typeof n === 'number'){
sign = n < 0 ? '-' : '';
s = Math.abs(n).toString ();
}
if ((len -= s.length) > 0){
s = Array (len + 1).join (padding || '0') + s;
}
return sign + s;
}

Edição feita por: Gefirson, 23/04/2010, 16:12.

[Miguceamma]

Viagra Et Consequences Cialis 10 Kamagra 100 Mg Nimes online pharmacy Kamagra Francais Acheter Cialis Toma Diaria
Tretinoin 20 20 Gm From India cialis Buy Viagra Uk Online Buy Propecia Online Dosi Levitra

[RonsisM]

Levitra Patient Assistance cialis Pflanzliches Viagra Rezeptfrei Where Can I Buy Online Cheap Cialis Cialis Pas Cher Achat

[Miguceamma]

Viagra Ohne Rezept Kaufen Illegal Cephalexin 500 Mg And Alcohol Pastillas Propecia Finasteride generic cialis Buy Xanical Online No Script Over The Counter Cialis Substitute Buy Plavix Cheap
Puede Un Hipertenso Tomar Cialis Viagra Prix Suisse En Bourges viagra Levitra 10mg Generic

[Miguceamma]

Clomid Fast Delivery cialis Buying Genericviagrawithpaypal Propecia 2mg
Calculate Dosage For Amoxicillin 400 5ml Cilas Pills Online viagra Xenical Sans Ordonance Effets De Priligy Viagra A Sharm
Amoxicillin For Lyme Comprar Cialis Sin Receta En Barcelona Buying Macrobid 100mg Free Shipping In Internet viagra online prescription Cialis 20mg Avis Tretinoin Without Prescription Uk Crotamiton Herb

[Miguceamma]

Cialis Ogni Due Giorni buy viagra Viagra Kaufen Schneller Versand 60 Mg Cialis Canadian Pharmacy
Amoxicillin Is It Penicillin Viagra By Mail viagra Progesterone For Sale Cat Cephalexin
Dutasteride Duprost On Line compare viagra to cialis and levitra Patanol
Cialis Generique Pharmacie Prix Viagra Prezzi In Farmacia Cialis En Exceso best price for levitra 20mg Buy 500 Mg Keflex Viagra Generic No Pescription