- Fórum WMO
- → alessancost's Content
alessancost's Content
There have been 29 items by alessancost (Search limited from 08/05/2023)
#793944 Site Jurídico
Posted by alessancost on 27/10/2006, 15:41 in Avaliação de Sites
Obrigado
Jus eundi - Direito de ir e vir
#794080 Site Jurídico
Posted by alessancost on 27/10/2006, 21:23 in Avaliação de Sites
Interessante sua idéia em relação as abas... Eu fiz +ou- isso. Quando o usuário visita uma seção o nome do mesmo aparece na abas (cinza). Eu fiz dessa maneira pois trabalho muito com incluides e até o menu horizontal e um, portanto tive que achar uma maneira simples de identificar as seções sem aumentar muito o código. Obrigado novamente pela sugestão.
Desculpe, eu não quis dizer portifólio mas sim layout, falha minha
#797437 Site Jurídico
Posted by alessancost on 08/11/2006, 09:28 in Avaliação de Sites
Andreia Regina, em azul esta o menu horizontal e no sinza é a seção do site, ou seja, aonde vc esta localizado no site, por isso que as vezes pode repetir os nomes
#720452 Busca Por Palavras Na Frase
Posted by alessancost on 18/03/2006, 19:27 in ASP
#720592 Busca Por Palavras Na Frase
Posted by alessancost on 19/03/2006, 09:29 in ASP
<% Rs3.MoveNext
Loop
end if
If strconsulta <> "" Then
SQL = "SELECT palavra, registro "
SQL = SQL + "FROM arquivo "
IF strbusca = 1 then
SQL = SQL + "WHERE palavra LIKE '" & TiraAcento(Replace(strconsulta, "'", "''")) & "' "
end if
IF strbusca = 2 then
palavra2=split(strconsulta," ")
SQL = SQL + "WHERE palavra LIKE '%" & TiraAcento(Replace(palavra2(0), "'", "''")) & "%' "
for x = 1 to Ubound(palavra2)
pesq=palavra2(x)
SQL = SQL + "OR palavra LIKE '%" & TiraAcento(Replace(palavra2(x), "'", "''")) & "%' "
next
end if
SQL = SQL + "ORDER BY palavra;"
Rs2.open sql
intContador = Rs2.RecordCount %>
Agora estou tetanto resolver esse problema...
Quando digito casa no campo o resultado é
casa
casamento
casarão
no caso tenho que fazer com que o resultado seja casa... se consequir posto aqui o resultado
#719330 Busca Por Palavras Na Frase
Posted by alessancost on 15/03/2006, 23:00 in ASP
Alessandro Costa
Alessandro Andrade
Alessandro Natto
Até ai tubo bem! Mas se eu digitar alessandro costa.... o resultado será
Alessandro Costa
Mas estou querendo que fique assim
Alessandro Costa
Alessandro Andrade
Alessandro Natto
Thiago Costa
Marta da Costa Lima
O meu código ta assim:
If strconsulta <> "" Then
SQL = "SELECT palavra, registro "
SQL = SQL + "FROM dicionario_latim "
IF strbusca = 1 then
SQL = SQL + "WHERE palavra LIKE '" & TiraAcento(Replace(strconsulta, "'", "''")) & "' "
end if
IF strbusca = 2 then
SQL = SQL + "WHERE PALAVRA LIKE '%" & TiraAcento(Replace(strconsulta, "'", "''")) & "%' "
end if
SQL = SQL + "ORDER BY palavra;"
#720181 Busca Por Palavras Na Frase
Posted by alessancost on 17/03/2006, 23:21 in ASP
consulta2 = split(strconsulta," ")
SQL = SQL + "WHERE PALAVRA LIKE '%" & TiraAcento(Replace(consulta2(1), "'", "''")) & "%' "
n=0
i=2
Do While n = 0
if NOT consulta2(i) = null or NOT consulta2(i) = "" then
SQL = SQL + "'%" & TiraAcento(Replace(consulta2(1), "'", "''")) & "%' "
i = i + 1
else
n = 1
end if
loop
E ocorre esse erro:
Microsoft VBScript runtime error '800a0009' Subscript out of range: 'i'
Como posso descobrir em quantas partes ele quebrou uma frase? Já que eu não sei quantas palavras o usuário poderá colocar numa pesquisa.
Obrigado e um bom final de semana
#749753 Salvar Automaticamente Em Pdf
Posted by alessancost on 13/06/2006, 23:28 in HTML, CSS e Metodologias
Klaus, você está certo, o window.print() abre a janela pedindo a confirmação do usuário. Você também disse que minha aplicação pode gerar o PDF do HTML e disponibilizar para download... que linguagem eu deveria usar para tal (Javascript ou asp)? Existe alguma matéria relacionada a esse assunto?
bimonti, realmente a opção de salvar como pdf na hora de imprir não está disponível em todos os computadores, porém o meu público alvo utiliza o windows, entretanto eu não havia pensado na possibilidade do usuário não ter impressora instalada. Obrigado pelo toque
Obrigado
#730977 Select Para Dois Inputs
Posted by alessancost on 14/04/2006, 11:55 in HTML, CSS e Metodologias
Eu tenho que fazer uma coisa que não sei... novidade!!!
Eu tenho um select e dois inputs. No select existem algumas opções que quando selecionado um faz aparecer automaticamente texto nos dois inputs.
Ex: Seleciono martelo no select, no primeiro input aparece o texto prego e no segundo input o texto madeira.
Seleciono água no select, no primeiro input aparece o texto copo e no segundo input o texto peixe.
Obrigado
#731033 Select Para Dois Inputs
Posted by alessancost on 14/04/2006, 14:21 in HTML, CSS e Metodologias
Eu estou fazendo parti de um banco de dados. O nome do select é Category, do primeiro input é Links e do segundo input é Source
Kakao obrigado pela ajuda, mas aqui não funcionou o teste
#732069 Figura Que Aparece Somente Nas Noticia Lidas
Posted by alessancost on 18/04/2006, 09:09 in ASP
Alguém sabe como faço para aparecer uma figura quando a noticia já foi lida pelo usuário?
Obrigado
#749521 Salvar Automaticamente Em Pdf
Posted by alessancost on 13/06/2006, 12:14 in HTML, CSS e Metodologias
Com um pouco de pesquisa descobri que posso imprimir o conteúdo de uma página htm automaticamente, apenas visualizando a página com o código abaixo:
<body onload="window.print();">
Agora, quando tentamos imprimir uma página manualmente através do botão Arquivo >> Imprimir do IE aparece uma janela onde podemos selecionar a impressora. Escolhendo a opção Adobe PDF o computador vai salvar em vês de imprimir o conteúdo da página em instenção PDF.
Gostaria de saber se existo com fazer tudo isso, ou seja, salvar o conteúdo em htm em PDF automaticamente, assim que o usuário visualiza a página.
Obrigado
#732584 Figura Que Aparece Somente Nas Noticia Lidas
Posted by alessancost on 19/04/2006, 12:56 in ASP
Mas tenho uma dúvida! Fazendo do modo que você explicou a imagem mudaria para todos os usuários assim que o primeiro for ler a notícia, certo?! Eu quero que mude a figura somente para o usuário que leu a noticia.
#731274 Validação De Campos
Posted by alessancost on 15/04/2006, 16:09 in HTML, CSS e Metodologias
if (checaCPF(document.form1.cpf549.value)) {
document.form1.submit();
return true;
} else {
errors="1";
if (errors) alert('Digite corretamente o CPF!');
document.MM_returnValue = (errors == '');
return false;}
O que significa colocar por último?
Se eu pegar essa função ACIMA e colocar como última ela vai ser a última a ser processada, assim todas as outras validações vão funcionar sem problema, mas na ordem ERRADA... todos os códigos de validação que estão abaixo do CFP não funcionam... pois quando é verificado o CPF já ocorre o cadastro sem verificar o e-mail e etc...
Não quis passar uma idéia errada... esse código não foi simplesmente copiado... eu fiz muitas pesquisas para chegar nesse resultado... acontece que infelizmente não estou conseguindo resolver esse problema, fora isso, todos os recursos de validação estão funcionando deposid e muito trabalho.
Desculpe-me novamente
#731225 Validação De Campos
Posted by alessancost on 15/04/2006, 12:16 in HTML, CSS e Metodologias
O problema que o codigo só funciona até o CFP aparti dai os outros não estão funcionando.
Mas se eu tirar o codigo do CPF e coloca-lo como o último tudo funciona.
Por tanto acredito que o código do CPF não esta permitindo que os outros códigos funcionem.
Mas não posso tirar da ordem colocando o CPF por último.
Estou ficando loucoooo
Alguém me ajude por favor
function checkForm(formName){
errors="";
d=document.forms[formName];
if(d.nome768.value==""){errors+=" O campo Nome Completo não foi preenchido\n";}
if(d.cpf549.value==""){errors+=" O campo CPF não foi preenchido\n";}
if(d.eml.value==""){errors+=" O campo E-mail não foi preenchido\n";}
if(d.login708.value==""){errors+=" O campo Usuário não foi preenchido\n";}
if(d.senha583.value==""){errors+=" O campo Senha não foi preenchido\n";}
if(d.senha583_2.value==""){errors+=" O campo Confirme sua Senha não foi preenchido\n";}
if(d.pergunta.value==""){errors+=" O campo Lembrete de Senha não foi preenchido\n";}
if(d.resposta.value==""){errors+=" O campo Resposta não foi preenchido\n";}
if(d.key_ent.value==""){errors+=" O campo Código de Confirmação não foi preenchido\n";}
if(errors!="")
{msg = "_____________________________________________________________\n\n";
msg += "Seu cadastro não pode ser concluído porque algum erro foi encontrado.\n";
msg += "Preencha o(s) campo(s) solicitado(s) e tente novamente:\n";
msg += "_____________________________________________________________\n\n";
alert(msg + errors);
return false;}
if(form1.nome768.value.indexOf(" ") < 1)
{alert("Voce precisa preencher Nome e Sobrenome!");
form1.nome768.focus();
return false;}
if (checaCPF(document.form1.cpf549.value)) {
document.form1.submit();
return true;
} else {
errors="1";
if (errors) alert('Digite corretamente o CPF!');
document.MM_returnValue = (errors == '');
return false;}
if (/^([\w\.\-])+\@(([\w\-])+\.)+([\w ]{2,4})$/.test(document.form1.eml.value) == false) {
alert("E-mail inválido!");
return false;}
if(d.senha583.value!=d.senha583_2.value)
{alert("As senhas não condizem!");
return false;}
if(d.codigo.value!=d.key_ent.value)
{alert("O código de confirmação esta errado!");
return false;}
function setErrorMsg(err) // VALIDAR CPF
{document.all.forms[0].theError.value=err;}
function checaCPF (CPF) {
if (CPF.length != 11 || CPF == "00000000000" || CPF == "11111111111" ||
CPF == "22222222222" || CPF == "33333333333" || CPF == "44444444444" ||
CPF == "55555555555" || CPF == "66666666666" || CPF == "77777777777" ||
CPF == "88888888888" || CPF == "99999999999")
return false;
soma = 0;
for (i=0; i < 9; i ++)
soma += parseInt(CPF.charAt(i)) * (10 - i);
resto = 11 - (soma % 11);
if (resto == 10 || resto == 11)
resto = 0;
if (resto != parseInt(CPF.charAt(9)))
return false;
soma = 0;
for (i = 0; i < 10; i ++)
soma += parseInt(CPF.charAt(i)) * (11 - i);
resto = 11 - (soma % 11);
if (resto == 10 || resto == 11)
resto = 0;
if (resto != parseInt(CPF.charAt(10)))
return false;
return true;}}
function teste(e) { // SOMENTE NUMEROS NO CAMPO
if(window.event) {
key = e.keyCode;}
else if(e.which) {
key = e.which;}
if (key!=8 || key < 48 || key > 57) return (((key > 47) && (key < 58)) || (key==8));
{return true;}}
function mostra_cadastro1(){ // FUNÇÃO ESCONDE/MOSTRA CADASTRO
document.getElementById('cadastro1').style.display='block';
document.getElementById('cadastro2').style.display='none';}
function mostra_cadastro2(){
document.getElementById('cadastro1').style.display='none';
document.getElementById('cadastro2').style.display='block';}
#725766 Substituir Textos Por Outros
Posted by alessancost on 31/03/2006, 01:13 in ASP
Gostaria de saber como faço isso: Eu digito <per>texto</per> em um textarea e salvo no banco. Bem, no banco vai aparece conforme digitado “<per>texto</per>”. Agora tenho uma página que mostra o conteúdo do bando e nessa mesma página tenho que fazer um código que reconhece os “<per> </per>” digitado anteriormente no textarea e substitui-lo na página de apresentação por <div> </div>. Como posso fazer isso?
Obrigado
#718405 Objrs.recordcount
Posted by alessancost on 14/03/2006, 12:36 in ASP
#718276 Objrs.recordcount
Posted by alessancost on 14/03/2006, 08:52 in ASP
<%
id = Request.QueryString("IDNews")
Set objConn = Server.CreateObject("ADODB.Connection")
Set objRs = Server.CreateObject("ADODB.Recordset")
objConn.Open strConn
objRs.Open "SELECT TOP 10 IDNews, NewsHeadline, NewsCategory FROM News WHERE IDNews <> " & id & " AND NewsCategory = " & IDCategory & " AND IDNews <> " & id & " ORDER BY NewsDate DESC, IDNews DESC", objConn, 0, 1
contador = 0
retira = 0 %>
<% = objRs.RecordCount %>
Obrigado
#718091 Erro Na Quantidade De Posts
Posted by alessancost on 13/03/2006, 17:25 in ASP
#719030 Escrever A Página Na Paginação
Posted by alessancost on 15/03/2006, 12:41 in ASP
Obrigado
#719036 Escrever A Página Na Paginação
Posted by alessancost on 15/03/2006, 13:09 in ASP
Vou estudar o código que você postou
----------------------------------
maktub, acho que você não entendeu o que estou querendo fazer. Eu não encontrei no seu código um campo onde o usuário escreveria a página que ele quer ir...
Eu já tenho uma paginação... o que quero fazer agora é criar um campo onde o usuário digita a página que ele que ir na paginação.
Grato
Use o Botão Editar para acrescentar mais informações no Post
#718063 Erro Na Quantidade De Posts
Posted by alessancost on 13/03/2006, 16:44 in ASP
<%SQL2 = "Select top 10 datapost, titpost, id From posts where id <> " & id & " AND autorpost = '" & autor & "' order by datapost desc" Set Rs = ConnDB.Execute(SQL2) postautor = 0 While not Rs.EOF if postautor = 0 then postautor = 1%> <div class="linha05">Outros posts do Autor</div> <%end if data2 = Rs("datapost") data = split(Rs("datapost"),"/") dia = data(0) mes = data(1) ano = data(2) if len(dia) = 1 then dia = "0" & dia end if if len(mes) = 1 then mes = "0" & mes end if if len(ano) = 1 then mes = "0" & ano end if datapost = dia &"/"& mes &"/"& Right(ano, 2)%> <div class="fonte01"></div><div class="fonte06"><font title="Data do Post"><%= datapost %></font> - <a href="../blog/post.asp?id=<%= Rs("id") %>" title="Ler o Post"> <%= Rs("titpost") %></a></div> <%data = Rs("datapost") Rs.MoveNext Wend%>
Obrigado
#720467 Mistério Com Meus Formulários
Posted by alessancost on 18/03/2006, 20:03 in ASP
#720451 Mistério Com Meus Formulários
Posted by alessancost on 18/03/2006, 19:24 in ASP
Obrigado
#726791 Substituir Textos Por Outros
Posted by alessancost on 02/04/2006, 23:32 in ASP
Com sua ajuda chequei ao resultado desejado...
entrevistas = replace(replace(replace(replace(rs("entrevistas"),"<pergunta>","<div><b><font color=""#003399"">Jus eundi</font> - "),"</pergunta>","</b><br><img src=""../img/espaco.gif"" width=""1"" height=""5""></div>"),"</resposta>","</div><br>"),"<resposta>","<div><b><font color=""#b06b14"">"&rs("nome")&"</font></b> - ")
- Fórum WMO
- → alessancost's Content
- Privacy Policy
- Regras ·