Ir para conteúdo
Fórum Script Brasil

Rafael Spilki

Veteranos
 Perfil  Explorar Conteúdo

  • Total de itens

    1.583

  • Registro em

  • Última visita

 Tipo de Conteúdo 

Posts postados por Rafael Spilki

  2. (Resolvido) problemas com select

    em ASP

    Postado

    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. (Resolvido) Como fazer funcionar logando usuario?

    em ASP

    Postado

    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

  6. (Resolvido) Como fazer funcionar logando usuario?

    em ASP

    Postado

    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. "sqlstmt = "SELECT * FROM Carros WHERE"

    em ASP

    Postado

    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á:

    So que há um problema., se eu tentar pesquisar some pela Marca, Caro ou mesmo pela Placa que é o predefinido ele vai buscar todos os dados em geral do BD... por exemplo: eu tenho no meu banco as seguintes tabelas:

    Placa | Marca | Carro | Dono | Tempo | ID |

    abc audi a3 fabio 7dias 1

    def porche 911 joao 30dias 2

    Exemplo: se eu pesquisar pela Placa abc.....ele vai me dar os dados completos da ID numero 1.

    dessa forma que voce me passou.....aceita fazer a pesquisa com qualquer um dos dados.......mas me apresenta os dados todos da tabela Carros em geral. e não é isso que eu quero.

    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

  9. (Resolvido) Como fazer funcionar logando usuario?

    em ASP

    Postado

    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

  11. SEO

    em Sugestões e Críticas

    Postado

    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. "sqlstmt = "SELECT * FROM Carros WHERE"

    em ASP

    Postado

    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. Formulário de email

    em ASP

    Postado

    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. "sqlstmt = "SELECT * FROM Carros WHERE"

    em ASP

    Postado

    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

  16. Cadastro :: Banco Access

    em ASP

    Postado

    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

  18. categoria e subcategorias

    em ASP

    Postado

    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. Formulário de email

    em ASP

    Postado

    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...