Ir para conteúdo

POWERED BY:

Arquivado

Este tópico foi arquivado e está fechado para novas respostas.

gabrielsor

Consulta no banco

Por , em ASP Clássico

Recommended Posts

gabrielsor    0

gabrielsor
Postado

Salve galera, tenho dois textbox com os nomes de bref1 e bref2, tenho que fazer uma consulta no banco aonde ele pega somente os numeros entre os valores digitados...

estou utilizando esse código porem tá dando erro...

 

Sql = "SELECT * FROM Cadastro"

If not request.form("bref1")="" then
	Sql = Sql & " WHERE autonum >= '" & Request.Form("bref1") & "' and <= '" & request.form("bref2")& "' "
end if

Alguém aee me ajudaaa por favor...

Flww...vlw galera... :D

Compartilhar este post

Link para o post
Compartilhar em outros sites

gabrielsor    0

gabrielsor
Postado

Usa o between no SQL, pesquisa no google, para usar de acordo com a sua necessidade, e que erro gera?

 

Tentei utilizar o between e ficou assim...porém continua com erro...

 

Sql = "SELECT * FROM Cadastro"

If not request.form("bref1")="" then
	Sql = Sql & " WHERE autonum between '" & Request.Form("bref1") & "' and  '" & Request.Form("bref2") & "'"
end if

o erro é o seguinte:

 

Tipo de erro:

Microsoft OLE DB Provider for ODBC Drivers (0x80040E07)

[Microsoft][Driver ODBC para Microsoft Access] Tipo de dados imcompatível na expressão de critério.

/relatorio.asp, line 73

 

 

A linha 73 é:

objRS.Open Sql, BdWeb, 3

Compartilhar este post

Link para o post
Compartilhar em outros sites

gabrielsor    0

gabrielsor
Postado

Posta o codigo completo do SQL

 

 

<%

Dim Sql


Set BdWeb = Server.CreateObject("ADODB.Connection")
BdWeb.Open "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("db\banco.mdb")
Sql = "SELECT * FROM Cadastro"

If not request.form("bref1")="" then
	Sql = Sql & " WHERE autonum between '" & Request.Form("bref1") & "' and  '" & Request.Form("bref2") & "'"
end if

Set objRS = Server.CreateObject("ADODB.Recordset")

   objRS.Open Sql, BdWeb, 3


%>

se eu faço uma consulta mais simples, usando o like por exemplo, funciona normal... http://forum.imasters.com.br/public/style_emoticons/default/ermm.gif

Compartilhar este post

Link para o post
Compartilhar em outros sites

Dee    0

Dee
Postado

Estas variavel,is = Request.Form("bref1") e Request.Form("bref2") é texto ou numérico ?

se for numérica nao precisa de aspas simples na consulta Sql que você ta fazendo.

Compartilhar este post

Link para o post
Compartilhar em outros sites

xanburzum    169

xanburzum
Postado

ou você precisa converter para numérico, com o CInt

Compartilhar este post

Link para o post
Compartilhar em outros sites

gabrielsor    0

gabrielsor
Postado

aproveitando o tópico...

Tenho esse código de envio de email e queria saber se alguém tem alguma sujestão de como enviar essa tabela com o resultado da pesquisa para o email utilizando esse código abaixo...

 

<html>
<head>
<title>Confirmação</title>
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
</head>

<body>
<%
nome = request.Form("nome") 'resgata o nome'
email = request.Form("email") 'resgata o email'
mensagem = request.Form("mensagem") 'INSERIR A TABELA AQUI!!!'

Set objeto = Server.CreateObject("CDONTS.NewMail") 'cria o objeto'
objeto.From = email 'Email de quem envia a mensagem. Neste caso o email digitado no formulario'
objeto.To = "email@email.com.br" 'Email que vai receber a mensagem'
objeto.Subject = "contato" 'assunto da mensagem'
objeto.Bodyformat = 0 'faz com que o cdonts envie conteudo html'
objeto.MailFormat = 0 'faz com que o cdonts envie conteudo html'
objeto.Body = "Olá <b>seu nome</b>!<br><b>"& nome &"</b> enviou uma mensagem para você!<br><br>Mensagem: "& mensagem &""
objeto.Send 'envia a mensagem'
Set objeto = Nothing 'finaliza o objeto'
%>
<div align="center">Mensagem enviada com sucesso!</div>
</body>
</html>

mais uma vez, vlw pela ajuda!!!

Compartilhar este post

Link para o post
Compartilhar em outros sites

Dee    0

Dee
Postado

Faz a consulta e o resultado você poe aki:

objeto.Body = ""

 

e segue os comentários do código.

 

pra isso você precisa ter o cdonts instalado no servidor.

Compartilhar este post

Link para o post
Compartilhar em outros sites

xanburzum    169

xanburzum
Postado

faz uma pesquisa no fórum sobre como enviar email em HTML, na verdade você irá colocar no body do email uma tabela HTML

Compartilhar este post

Link para o post
Compartilhar em outros sites

gabrielsor    0

gabrielsor
Postado

faz uma pesquisa no fórum sobre como enviar email em HTML, na verdade você irá colocar no body do email uma tabela HTML

 

Vlw xamburzum, dei uma pesquisada e entendi como funciona a propriedade do body do email...agora minha dúvida é a seguinte: tenho uma tabela na página relatório.asp, como enviar essa tabela preenchida com a pesquisa para a página do envio.asp (que tem todas as propriedade do envio do email...)?

Compartilhar este post

Link para o post
Compartilhar em outros sites

xanburzum    169

xanburzum
Postado

no body do email você usa o response.write e dentro dele coloca as tgs HTML, tipo assim:

 

corpo = "<html><head><meta http-equiv=" & chr(34) & "Content-Type" & chr(34) & " content=" & chr(34) & "text/html; charset=iso-8859-1" & chr(34) & "></head>"

corpo = corpo+ "<body><font face=" & chr(34) & "Verdana" & chr(34) & " size="2">Corpo da mensagem..." & Date() & "</font></body></html>"

Compartilhar este post

Link para o post
Compartilhar em outros sites

gabrielsor    0

gabrielsor
Postado

no body do email você usa o response.write e dentro dele coloca as tgs HTML, tipo assim:

 

corpo = "<html><head><meta http-equiv=" & chr(34) & "Content-Type" & chr(34) & " content=" & chr(34) & "text/html; charset=iso-8859-1" & chr(34) & "></head>"

corpo = corpo+ "<body><font face=" & chr(34) & "Verdana" & chr(34) & " size="2">Corpo da mensagem..." & Date() & "</font></body></html>"

ok, eu uso o response.write(....) e como eu coloco uma tabela de uma outra página aqui dentro?

Compartilhar este post

Link para o post
Compartilhar em outros sites

xanburzum    169

xanburzum
Postado

dentro do corpo você usa tags HTML, para montar sua tabela, usando o <table><td><tr>, exemplo, coloco esse code, no corpo do email

 

HTML = "<!DOCTYPE HTML PUBLIC""-//IETF//DTD HTML//EN"">"
    HTML = HTML & "<html>"
    HTML = HTML & "<head>"
    HTML = HTML & "<meta http-equiv=""Content-Type"""
    HTML = HTML & "content=""text/html; charset=iso-8859-1"">"
    HTML = HTML & "<meta name=""GENERATOR"""
    HTML = HTML & " content=""Microsoft Visual Studio 6.0"">"
    HTML = HTML & "<title>HTMLMail</title>"
    HTML = HTML & "</head>"
    HTML = HTML & "<body bgcolor=""FFFFFF"">"
    HTML = HTML & "<IMG SRC=""http://www.microsoft.com/library/"
    HTML = HTML & "images/gifs/homepage/microsoft.gif"" BORDER=0 "
    HTML = HTML & "WIDTH=167 HEIGHT=36 ALT=""Microsoft Corporation"">"
    HTML = HTML & "<p><font size =""3"" face=""Arial""><strong>"
    HTML = HTML & "Microsoft Exchange CDONTS Example</strong></p>"
    HTML = HTML & "<p><font size =""2"" face=""Tahoma"">"
    HTML = HTML & "CDO for NTS allows an easy way to send mail.<br>"
    HTML = HTML & "This example shows how the content can be "
    HTML = HTML & "an HTML page<br>"
    HTML = HTML & "which allows you to send rich text and"
    HTML = HTML & "inline graphics.</p>"
    HTML = HTML & "</body>"
    HTML = HTML & "</html>"

Compartilhar este post

Link para o post
Compartilhar em outros sites

gabrielsor    0

gabrielsor
Postado

dentro do corpo você usa tags HTML, para montar sua tabela, usando o <table><td><tr>, exemplo, coloco esse code, no corpo do email

 

HTML = "<!DOCTYPE HTML PUBLIC""-//IETF//DTD HTML//EN"">"
    HTML = HTML & "<html>"
    HTML = HTML & "<head>"
    HTML = HTML & "<meta http-equiv=""Content-Type"""
    HTML = HTML & "content=""text/html; charset=iso-8859-1"">"
    HTML = HTML & "<meta name=""GENERATOR"""
    HTML = HTML & " content=""Microsoft Visual Studio 6.0"">"
    HTML = HTML & "<title>HTMLMail</title>"
    HTML = HTML & "</head>"
    HTML = HTML & "<body bgcolor=""FFFFFF"">"
    HTML = HTML & "<IMG SRC=""http://www.microsoft.com/library/"
    HTML = HTML & "images/gifs/homepage/microsoft.gif"" BORDER=0 "
    HTML = HTML & "WIDTH=167 HEIGHT=36 ALT=""Microsoft Corporation"">"
    HTML = HTML & "<p><font size =""3"" face=""Arial""><strong>"
    HTML = HTML & "Microsoft Exchange CDONTS Example</strong></p>"
    HTML = HTML & "<p><font size =""2"" face=""Tahoma"">"
    HTML = HTML & "CDO for NTS allows an easy way to send mail.<br>"
    HTML = HTML & "This example shows how the content can be "
    HTML = HTML & "an HTML page<br>"
    HTML = HTML & "which allows you to send rich text and"
    HTML = HTML & "inline graphics.</p>"
    HTML = HTML & "</body>"
    HTML = HTML & "</html>"

 

http://forum.imasters.com.br/public/style_emoticons/default/ermm.gif

não eh bem isso que eu to querendo fazer...se eu fizer isso que você falou, eu vou simplismente criar uma tabela nova e inserir NOVOS dados nela, o que eu quero é que no corpo do email, apareça a MESMA tabela da página anterior com os MESMOS dados recuperados de uma consulta...

Compartilhar este post

Link para o post
Compartilhar em outros sites

xanburzum    169

xanburzum
Postado

justamente, mas antes você cria sua tabela com as tags HTML dentro do body e coloca os dados que quiser, entendeu...

Compartilhar este post

Link para o post
Compartilhar em outros sites

gabrielsor    0

gabrielsor
Postado

justamente, mas antes você cria sua tabela com as tags HTML dentro do body e coloca os dados que quiser, entendeu...

 

Uhnn acho que sim...mais por exemplo, se eu tenho que criar a tabela no body do email...eu tenho que usar um for ou alguma coisa do tipo pra criar essa tabela? pq nao tem como saber exatamente qtas linhas a consulta vai me trazer pra eu dps jogar pra tabela que eu criei no body do email... :huh:

Compartilhar este post

Link para o post
Compartilhar em outros sites

xanburzum    169

xanburzum
Postado

não apenas, insira as tags HTML no corpo do email (body), igual ao que postei acima, a diferença é que você vai colocar a tag <table><tr><td>

Compartilhar este post

Link para o post
Compartilhar em outros sites
Ir para a lista de tópicos ASP Clássico
×

Informação importante

Ao usar o fórum, você concorda com nossos Termos e condições.

  Aceito