Ir para conteúdo
Fórum Script Brasil

Rafael Spilki

Veteranos
  • Total de itens

    1.583
  • Registro em

  • Última visita

Tudo que Rafael Spilki postou

  1. Falow Ju... q bom que deu certo! Só contigo mesmo pra ser de primeira... baita pé quente... Comigo aqui de vez em quando, quando vou trabalhar com data, só vai depois de reza braba! rsssssssssss qualquer. coisa posta aí! []'s Rafael Spilki
  2. Daí ju... beleza? Primeiro tente seu select desta forma: datai = request.form("DataInicio") dataf = dateValue.form("DataFim") ComandoSQL = "SELECT * FROM agenda WHERE datapedido BETWEEN #" & (datai) & "# and #" & (dataf) & "# ORDER BY datapedido ASC" Acontece que quando for fazer esse select o mesmo pode funcionar por que a data pode estar aparecendo num formato diferente do que deveria... tipo americano quando deveria ser brasileiro ou brasileiro quando deveria ser americano... caso de erro faça assim: datai = request.form("DataInicio") dataf = dateValue.form("DataFim") datai = Cdate(day (datai) &"/"& month (datai) &"/"& year (datai)) dataf = Cdate(day (dataf) &"/"& month (dataf) &"/"& year (dataf)) ComandoSQL = "SELECT * FROM agenda WHERE datapedido BETWEEN #" & (datai) & "# and #" & (dataf) & "# ORDER BY datapedido ASC" mas caso continue dando erro tente assim: datai = request.form("DataInicio") dataf = dateValue.form("DataFim") datai = Cdate(month (datai) &"/"& day (datai) &"/"& year (datai)) dataf = Cdate(month (dataf) &"/"& day (dataf) &"/"& year (dataf)) sql = "SELECT * FROM agenda WHERE datapedido BETWEEN #" & (datai) & "# and #" & (dataf) & "# ORDER BY datapedido ASC" Putz... falo por experiencia propria... trabalhar com datas é sempre meio imprevisível... caso continue não funcionando daí de um debug na sua query assim e poste o resultado: datai = request.form("DataInicio") dataf = dateValue.form("DataFim") sql = "SELECT * FROM agenda WHERE datapedido BETWEEN #" & (datai) & "# and #" & (dataf) & "# ORDER BY datapedido ASC" response.write sql response.end []'s Rafael Spilki
  3. Oi André... foi meio correria aqui hoje a tarde... mas enfim... algumas dúvidas pra poder entender e te ajudar melhor: 1) vi ali que o seu timeout é de 15min... pergunto... se após fazer o ligin você ficar 15 min sem usar o site... paradão mesmo... e depois de 15 min der um refresh na página... a sessão contnua aberta? 2) Além do teste acima, que caso você não tenha feito ainda peço para fazeres pra confirmarmos algumas coisas pergunto: se apos fazer o login se você já tentou fazer uma limpeza nos cookies, historicos e etc do seu navegador e se após essa limpeza a sessão continua? Faça esses dois testes acima e poste o seu codigo completo do jeito que ele está agora... fica mais fácil quando vejo o todo... da pra entender melhor sua lógica de programação e identificar melhor o problema, ok? Pensando assim subjetivamente neste caso de não efetuar o logout podem ser muitas coisas... e passariamos horas aqui tentando descobroir.... com a resposta aos dois testes acima e com o codigo completo certamente sairá do problema, ok? Fico aguardando... []'s Rafael Spilki
  4. Boa Bareta... é Thelon... faz ele explodir se continuarmos jogando ele na parede! rssssssssss
  5. rssssssssssss... muito boa! Agora é o bichinho do Thelon que amassa!?! amassa mesmo depois de morto!?!? ficou bem Legal Thelon... Parabens... Só falta agora uma bola!?! rsss...
  6. Da uma sacada nesse link aqui: http://www.macoratti.net/asp_cok1.htm acho que explica tudo... se o problema persistir sugiro postar seu codigo completo, inclusive com o global.asa para que eu possa te ajudar melhor... E sim, em princípio, o Global.asa é um arquivo que tipo "acumula" várias "coisas" dentro dele... mas a forma de usar tanto dentro do arquivo como fora do arquivo são as mesmas... muda talvés um pouquinho na hora de executar algo específico... mas nada de mais... tenta aí e depois posta o resultado... []'s Rafael Spilki
  7. Oi Fábio, então, isso que você postou eu já tinha entendido ;-) , o que eu ainda não entendi é o que está acontecendo de errado com aquela query que eu te passei, pois ela deveria resolver este problema, mas vamos lá: Pelo que eu entendi e me explique esta parte caso eu tenha entendido errado, você quer que ao pesquisar por exemplo por placa, apareça somente as "placas" em sua pesquisa, ou seja: digito lá abc, daí ao invés de aparecer "abc audi a3 fabio 7dias 1" você quer que imprima em tela apenas "abc" é isso? Bom... se for isso um jeito interessante seria criar vários inputs de pesquisa, por exemplo: Pesquise por placa: Pesquise por marca: então criei aqui um exemplinho básico pra você ver: Busca.html <form action="busca.asp" method="post"> você quer pesquisar como: <input type="radio" name="cmbBusca" value="1" checked="checked" />por placa <input type="radio" name="cmbBusca" value="2" />por marca <input type="radio" name="cmbBusca" value="3" />por carro <br> <input type="text" name="Placa" size="7" maxlength="7"> <br> <br> <input type="submit" value="Buscar"> </form> busca.asp <% vPlaca = request.form("Placa") busca = requst.form("cmbBusca") if busca = 1 then call porplaca() elseif busca = 2 then call pormarca() elseif busca = 3 then call porcarro() end if sub porplaca() DSNtemp="DRIVER={Microsoft Access Driver (*.mdb)}; " DSNtemp=dsntemp & "DBQ=" & server.mappath("db.mdb") sqlstmt = "SELECT * FROM Carros WHERE Placa like '%" & vPlaca & "%' OR Carro like '%" & Marca & "%' OR Dono like '%" & ID & "%'" Set rs = Server.CreateObject("ADODB.Recordset") rs.Open sqlstmt, DSNtemp, 3, 3 totalrecs = rs.recordcount x = 0 for x = 1 to totalrecs if rs.eof then exit for else id = rs("ID") carro = rs("Carro") placa = rs("Placa") marca = rs("Marca") dono = rs("Dono") tempo = rs("Tempo") %> <br> <b>Placa:</b> <%=placa%> <br> <p> <% rs.MoveNext %> <% end if next %> end sub sub pormarca() DSNtemp="DRIVER={Microsoft Access Driver (*.mdb)}; " DSNtemp=dsntemp & "DBQ=" & server.mappath("db.mdb") sqlstmt = "SELECT * FROM Carros WHERE Placa like '%" & vPlaca & "%' OR Carro like '%" & Marca & "%' OR Dono like '%" & ID & "%'" Set rs = Server.CreateObject("ADODB.Recordset") rs.Open sqlstmt, DSNtemp, 3, 3 totalrecs = rs.recordcount x = 0 for x = 1 to totalrecs if rs.eof then exit for else id = rs("ID") carro = rs("Carro") placa = rs("Placa") marca = rs("Marca") dono = rs("Dono") tempo = rs("Tempo") %> <br> <b>Marca:</b> <%=marca%> <br> <p> <% rs.MoveNext %> <% end if next %> end sub sub porcarro() DSNtemp="DRIVER={Microsoft Access Driver (*.mdb)}; " DSNtemp=dsntemp & "DBQ=" & server.mappath("db.mdb") sqlstmt = "SELECT * FROM Carros WHERE Placa like '%" & vPlaca & "%' OR Carro like '%" & Marca & "%' OR Dono like '%" & ID & "%'" Set rs = Server.CreateObject("ADODB.Recordset") rs.Open sqlstmt, DSNtemp, 3, 3 totalrecs = rs.recordcount x = 0 for x = 1 to totalrecs if rs.eof then exit for else id = rs("ID") carro = rs("Carro") placa = rs("Placa") marca = rs("Marca") dono = rs("Dono") tempo = rs("Tempo") %> <br> <b>Carro:</b> <%=carro%> <br> <p> <% rs.MoveNext %> <% end if next %> end sub testa aí e ve se é isso que você precisa... se for existem outros jeitos de fazer tb, mas esse aí foi o que me ocorreu agora... retorne ao tópico se deu certo para que outros possam aproveitar; []'s Rafael Spilki
  8. Então o Recordset da num while? posta aí seu codigo completo pra eu poder te ajudar com mais certeza, ok? []'s Rafael Spilki
  9. Fala André, td bem? Então, primeiro ao global.asa: não, não é necessário que o utilize. O global.asa é um "arquivo" que visa facilitar alguns processos dos programadores, utilizados normalmente em e-commerce, serve para declarar variáveis, controlar eventos do começo ao fim de uma programação entre outros. Para terminar com a sessão se usa: <%session.abandon%> normalmente se coloca um botãzinho de logout mas já vi em javascript ("acho") uma funçãozinha que ao fechar a página do navegador automaticamente executa uma função que submete o <%session.abandon%>... mas daí terá que postar lá em JS. Agora a dúvida que eu fiquei é que você postou perguntando se precisa ou não usar o Global.asa e pelo que eu vi em seu código você já está o utilizando: <!--#include file ="global.asa" --> Outra coisa ainda que eu não consegui ver é a parte do código onde você está imprimindo em tela as infs do usuário... porque ali tb pode ter algum errinho que pode estar ocasionando esse problema que você mencionou. E por último ainda existe a session.timeout que você pode usar para colocar um tempo na sua sessão e após esse tempo abandonar a sessão automaticamente: Session.Timeout = VALOR_MINUTOS espero ter ajudado... qualquer coisa posta aí denovo! []'s Rafael Spilki
  10. Essa query ta dentro de algum loop como while por exemplo? Se sim, posta codigo completo, ok? []'s Rafael Spilki
  11. Rafael Spilki

    SEO

    Concordo... sala de SEO será muito útil... até porque existem várias "extratégias" e técnicas diferentes a serem adotadas, dependendo em muitas das vezes de caso para caso... Já vi várias técnicas diferentes sendo empregadas e a grande maioria delas com bons resultados. Dá tanto pano pra manga que uma sala de SEO poderia envolver assuntos referentes a ferramentas utilizadas em SEO como o ALEXA e o próprio Google Analytics entre outros. Não parando por aí, poderiamos tratar nesta sala de MetaTags, de SiteMaps, de como os webstandards podem contrinuir para o SEO e até mesmo de Google ADWords, porque não? Talvés até de assuntos mais básicos como: como fazer uma boa escolha de palavras chaves? o que devo e como devo colocar a descrição do meu site na meta DESCRIPTION, e na meta TITLE?!? o que colocar na meta TITLE?!?! Poderíamos discutir sobre banklinks, referências, relevâncias além de conhecer sites de indicações "sérios" se é que eles existem, de como consultar seu posicionamento atual no google entre outros... É... essa salinha aí faz falta hein pessoal? participarei se existir... Boa idéia... ótima idéia... []'s Rafael Spilki
  12. Não tenho certeza se entendi exatamente o que você precisa... Tipo, você quer que eu pesquisar por carro Audi por exemplo apareça somente a coluna do bd que contem audi? ou seja, somente a coluna marca? é isso? Se for outra coisa me explica um pouquinho melhor que eu te ajudo por aqui! []'s Rafael Spilki
  13. Rafael Spilki

    Formulário de email

    Cara... mas então... esse codigo que você postou é de AspEmail e não de aspmail como você falou que seu servidor disponibiliza... sacou a diferença? vou te passar um codigo de aspmail pra você testar: Em Mailer.FromName = "Seu_Nome", substitua a parte "Seu_Nome" pelo nome do Remetente do E-mail (seu nome). Na linha Mailer.FromAddress = "seu_nome@seudominio.com.br" substitua o endereço de e-mail "seu_nome@seudominio.com.br" pelo endereço de e-mail remetente (seu e-mail). Na linha Mailer.RemoteHost = "smtp.seudominio.com.br" substitua a parte "seudominio.com.br" pelo endereço de seu web site. <--Início ASP--> (não copie essa linha) <% if request("botao") = "enviar" then Set Mailer = Server.CreateObject("SMTPsvg.Mailer") Mailer.FromName = "Seu_Nome" Mailer.FromAddress= "seu_nome@seudominio.com.br" Mailer.RemoteHost = "smtp.seudominio.com(.br)" Mailer.AddRecipient "teste", request.form("para") Mailer.Subject = request.form("assunto") Mailer.BodyText = request.form("mensagem") if Mailer.SendMail then Response.Write "E-MAIL ENVIADO COM SUCESSO!" else Response.Write mailer.response end if response.end end if %> <--Fim ASP--> (não copie essa linha) <--Início HTML--> (não copie essa linha) <html> <head> <title>HostSul - Exemplo de AspMail</title> <head> <body> <form method="POST" action="aspmail.asp"> <p>AspMail - Envio de E-mail através de página Web</p> <table border="0" width="100%"> <tr> <td width="14%">Para :</td> <td width="86%"><input type="text" name="para" size="20"></td> </tr> <tr> <td width="14%">Assunto :</td> <td width="86%"><input type="text" name="assunto" size="20"></td> </tr> <tr> <td width="14%">Mensagem :</td> <td width="86%"><textarea rows="2" name="mensagem" cols="20"></textarea></td> </tr> <tr> <td width="14%"></td> <td width="86%"><input type="submit" value="enviar" name="botao"></td> </tr> </table> </form> </body> </html> <--Fim HTML--> (não copie essa linha) Faça as alterações e adaptações necessárias e veja se funciona... qualquer coisa posta aí novamente... []'s Rafael Spilki
  14. Então, olha só: sqlstmt = "SELECT * FROM Carros WHERE Placa like '%" & vPlaca & "%'" "WHERE Placa" significa que ele vai procurar no campo Plca do seu Banco de dados na tabela Carros, ok? para consultar tb em outra tabelas você pode usar o OR ou ainda o AND, dependendo do caso... portanto tente assim: sqlstmt = "SELECT * FROM Carros WHERE Placa like '%" & vPlaca & "%' OR nome_campo_marca like '%" & nomedavariavel_marca & "%' OR nome_campo_carro like '%" & nome_variavel_carro & "%'" Era isso que você precisava? []'s Rafael Spilki
  15. Rafael Spilki

    Radio Online

    Amigão... tem uma porrada de radios prontas na net... escolhe uma da um tapa no visual e era isso... inclusive aqui na SB mesmo rola algumas: https://www.scriptbrasil.com.br/busca/radio/javascript/1/ []'s Rafael Spilki
  16. Posta aí que campos tem no seu bd, nome do banco e nome da tabela... No que se refere aos campos do BD mais especificamente se você teum um do tipo autonumerado... Te ajudo a construir aqui alguma coisinha que resolva essa parada... é bem simples na real... []'s Rafael Spilki
  17. Rafael Spilki

    Formulário de email

    beleza cara... mas tipo facilitaria muito se você postasse tb essa linha específica 64 aí pra eu dar uma olhada pra ti! Fico no aguardo. []'s Rafael Spilki
  18. Não sei se entendi... você quer fazer tipo como é no Mercado Livre quando va cadastrar um anúncio? Tipo seleciona uma opção em um list/menu e conforme a opção que você selecionou abre outro list/menu e assim por diante? é isso? []'s Rafael Spilki
  19. Rafael Spilki

    Formulário de email

    Ok Filipe, duas coisas: Primeira: entre em contato com o seu server e pergunte pra ele qual componente você pode utilizar pra enviar e-mails: aspmail, cdo.sys, cdo.nts??? Poste aqui o componente que você tem disponível... Segunda: poste exatamente a mensagem de erro e a linha a qual ela se refere; Assim que eu tiver essas informações conseguirei te ajudar! []'s Rafael Spilki
×
×
  • Criar Novo...