ejubr
-
Total de itens
50 -
Registro em
-
Última visita
Posts postados por ejubr
-
-
-
essa é nova pra min, alguém sabe me explicar, minh amiga pediu pra min instalar o windows xp no computador dela um celeron 700mhz de 196mB e hd de 20GB a instalação funciona blza mas na hora de inicializar o micro pra começar a usar o computador quando o xp esta carregando não aparece a tela de entrada do windows e o minitor é desligado e o led fica laranjado. alguém entende o que esta acontecendo?
-
deixei o código assim:
de vermelho é o SQL tentei usar a sugestão so site linha de código :Utilizando a clausula like do sql
<html>
<head>
<title> Resposta </title>
</head>
<body bgcolor="FFFFFF">
<%
'conectamos ao banco
url_conexao = Server.MapPath("banco.mdb")
set conexao = Server.CreateObject("ADODB.Connection")
conexao.open "DRIVER={Microsoft Access Driver (*.mdb)};DBQ="&url_conexao
'recuperar a variavel
id = request("nome")
'selecionamos toda a tabela do banco
sql = "select * FROM tabela WHERE nome LIKE '"&request.form("nome")&"'"
set rs = conexao.execute(sql)
'testamos se a tabela esta vazia, pra não dar erros
if rs.eof then
response.write "<center>Nada no banco de dados</center>"
else
'vamos pro primeiro registro da tabela
rs.movefirst
'iniciamos a repetição.. até chegar ao fim da tabela
do while not rs.eof
'mostramos os dados da tabela do banco.. usando rs("campo").. onde RS é o objeto que executa o SQL que seleciona o banco
Response.write "<table width=""200"" border=""0"" cellspacing=""0"" cellpadding=""0"">"
response.write "<tr><td>Nome: " &rs("nome") &"</td>"
response.write "<td>Email: " & rs("email") & "</td></tr></table>"
'vamos para o proximo registro
rs.movenext
loop
end if
%>
</body>
</html>
so que ainda continua falando que não tem nada no banco de dados, tem algum erro no sql?
-
essa é nova pra min, alguém sabe me explicar, minh amiga pediu pra min instalar o windows xp no computador dela um celeron 700mhz de 196mB e hd de 20GB a instalação funciona blza mas na hora de inicializar o micro pra começar a usar o computador quando o xp esta carregando não aparece a tela de entrada do windows e o minitor é desligado e o led fica laranjado. alguém entende o que esta acontecendo?
-
não estou entendendo porq a pagina de pesquisa.asp com o seguinte código não esta conseguindo fazer a pesquisa no banco de dados o código dela e o seguinte:
<html><head>
<title> Resposta </title>
</head>
<body bgcolor="FFFFFF">
<%
'conectamos ao banco
url_conexao = Server.MapPath("banco.mdb")
set conexao = Server.CreateObject("ADODB.Connection")
conexao.open "DRIVER={Microsoft Access Driver (*.mdb)};DBQ="&url_conexao
'recuperar a variavel
id = request("nome")
'selecionamos toda a tabela do banco
sql = "select * from tabela WHERE nome = '"&request.form("nome")&"'"
set rs = conexao.execute(sql)
'testamos se a tabela esta vazia, pra não dar erros
'if rs.eof then
'response.write "Nada no banco de dados"
'else
'vamos pro primeiro registro da tabela
rs.movefirst
'iniciamos a repetição.. até chegar ao fim da tabela
do while not rs.eof
'mostramos os dados da tabela do banco.. usando rs("campo").. onde RS é o objeto que executa o SQL que seleciona o banco
Response.write "<table width=""200"" border=""0"" cellspacing=""0"" cellpadding=""0"">"
response.write "<tr><td>Nome: " &rs("nome") &"</td>"
response.write "<td>Email: " & rs("email") & "</td></tr></table>"
'vamos para o proximo registro
rs.movenext
loop
'end if
%>
</body>
</html>
e o erro que aparece e o seguinte:
Tipo de erro:ADODB.Recordset (0x800A0BCD)
BOF ou EOF são verdadeiros, ou o registro atual foi excluído. A operação solicitada pelo aplicativo requer um registro atual.
por favor me ajudem esta pagina de pesquisa estava funcionando perfeitamente mas depois que instalei outro windows e mudei o banco de dados para ms access xp não quis mais funcionar
-
estou novamente discutindo este tópico por que estou com o seguinte problema a pagina de resposta que faz a consulta no banco de dados com o seguinte codigo:
<html><head>
<title> Resposta </title>
</head>
<body bgcolor="FFFFFF">
<%
'conectamos ao banco
url_conexao = Server.MapPath("banco.mdb")
set conexao = Server.CreateObject("ADODB.Connection")
conexao.open "DRIVER={Microsoft Access Driver (*.mdb)};DBQ="&url_conexao
'recuperar a variavel
id = request("nome")
'selecionamos toda a tabela do banco
sql = "select * from tabela WHERE nome = '"&request.form("nome")&"'"
set rs = conexao.execute(sql)
'testamos se a tabela esta vazia, pra não dar erros
if rs.eof then
response.write "Nada no banco de dados"
else
'vamos pro primeiro registro da tabela
rs.movefirst
'iniciamos a repetição.. até chegar ao fim da tabela
do while not rs.eof
'mostramos os dados da tabela do banco.. usando rs("campo").. onde RS é o objeto que executa o SQL que seleciona o banco
Response.write "<table width=""200"" border=""0"" cellspacing=""0"" cellpadding=""0"">"
response.write "<tr><td>Nome: " &rs("nome") &"</td>"
response.write "<td>Email: " & rs("email") & "</td></tr></table>"
'vamos para o proximo registro
rs.movenext
loop
end if
%>
não esta executando o codigo.
porque eu coloquei varios registro no banco de dados mas quando faco a consulta a penas retorna a parte do codigo que diz que não há nada no banco de dados, embora exita varios registros que eu mesmo coloquei.
ajuda
aproveitando a oportunidade o ASP e case sensitive ou digitar letras maiusculas ou minusculas tanto faz?
Editado: Use as tags QUOTE e CODE para formatar seus codigos!
-
e galera blza?alguém sabe informar como instalar componetes no servidor?
eu estava usando o win2K e agora estou usando o winxp e quando fui verificar os componentes que estaos instalados observei que por exemplo o CDONTS não esta, neste caso o que faço?
-
desculpa troquei, brigadao cyberlexxx, ao invés de urso.
-
o código final do arquivo pesquisa.asp ficou assim
<%
'recuperando a variavel que foi digitada no campo type do formulário
session("pesquisa") = request.form("pesquisa")
palavra = CStr(Request("pesquisa"))
URL ="http://www.google.com.br/search?q="& Server.UrlEncode(Palavra)
Response.Redirect(URL)
%>
e funcionou beleza
valeu urso, brigadao pela ajuda de todo mundo
t+
-
rodei um script que testa os componentes instalados, e observei que apenas os seguintes estavam instalados:
ADODB
FyleSystemObject
CDONTS
há alguns dias postei que não estava conseguindo pegar os dados de um formulario e envia-los para o meu email.
o codigo que utilizei para realizar esta tarefa utilizava componente CDONTS.
Mas pera la. sem o SMTP não vai funcionar não é mesmo?
Como faço para instalar um componente SMTP, estou usando o IIS 5.0 no windows 2000 pro.
me ajudem, to com o meu site atrasadao
-
to tentando mas continua não funcionando e na barra de endereco aparece o seguinte
-
na pasta de gerenciamento do iis mostrar uma pasta de nome
"servidor virtual SMTP padrão", so que até hoje não mexe em nenhuma configuração dela, so configurei a de nome "sites da web padrão", tem algum tuto que mostra as configurações corretas para o uso do Cdonts para envio de email, por que quando rodo os códigos para o envio de email , aparece uma mensagem dizendo que o email foi enviando com sucesso mas quando vou conferir nada aconteceu.
-
me desculpe houve um engano foi o cyberalexxx, e o código foi o seguinte:
1 - crie um formulario solicitando as seguintes informações
De:
Para:
Copia:
Assunto:
Anexo:
Mensagem:
2 - Crie a pagina de envio:
'crie o objeto
Set ObjMail = CreateObject("CDONTS.NewMail")
'verifica se existe anexo e inclui
if len(request.form("anexo") > 0 then
Call ObjMail.AttachFile(request.form("anexo"))
end if
'passa as informações para envio
ObjMail.to = request.form("para")
objMail.BCC = request.form("Copia")
ObjMail.from = request.form("De")
ObjMail.subject = request.form("assunto")
ObjMail.body = request.form("mensagem")
'envia email
ObjMail.send
response.write("email enviado com sucesso")
'zera valores
Set eObjMail = nothing
faz o que o Dark0 falou primeiro e depois monta esse código e roda ele?
-
cara o dark0 me ajudou a fazer isto de uma bem simples que funciona, da uma olhada nos posts passados que tem um exemplo bem facil de fazer que você vai conseguir, vou dar uma procurada e vou postar depois.
-
e ae blza?
o form ficou assim:
<form name="form1" method="get" action="pequisa.asp">
<div align="left">
<input name="textfield" type="text" size="23" id="pesquisa">
<input type="submit" name="Submit" value="OK">
</div>
</form>
o action está apontando para a pagina de nome pesquisa.asp que tem o seguinte código:
<%
session("pesquisa") = request.form("pesquisa")
palavra = CStr(Request("pesquisa"))
URL ="http://www.google.com.br/search?q=" & Server.UrlEncode(Palavra)
Response.Redirect(URL)
%>
o que esta errado?
-
o código ficou assim:
<%
'recuperando a variavel que foi digitada no campo type do formulário
session("pesquisa") = request.form("pesquisa")
palavra = CStr(Request("pesquisa"))
URL ="http://www.google.com.br/search?q=" & Server.UrlEncode(Palavra)
Response.Redirect(URL)
%>
na pagina de resposta aparece o seguinte na barra de endereços:
http://localhost/cps/pequisa.asp?textfield=Python&Submit=OK
falando que a página não foi localizada
como é que o asp sabe que vai pegar o que foi digitado no campo type do formulário, isto não é feito pelo id?
-
fiz o seguinte:
criei um formulario, como um campo type, e um botao submit.
e fiz o seguinte arquivo .asp
<%
'recuperando a variavel que foi digitada no campo type do formulário
id = request("pesq")
'pegando a variavel recuperada e inserindo no final da url para abrir a pagina de pesquisa
response.redirect(http://www.google.com/search?q=("pesq"))
%>
quiz dizer o seguinte com isto ai em cima,
a pessoa digita uma palavra qualquer no campo type, que depois é recuperada pela variavel pesq do arquivo .asp e quando a pessoa clica em ok era para abrir uma pagina do google com a pesquisa realizada
aonde errei? tudo?rsrsrs
to tentando ainda sou novato.
so pra informação o formulario esta em um arquivo e o asp e um outro arquivo
-
to sem saber por onde começar, será que no action do formulario eu coloco o a url
http://www.google.com/search?q=(variavel), o que esta de vermelho é uma variavel, que foi digitada no campo type do formulário, entendeu?
-
e ae galera,
gostaria de saber como devo fazer, pois tenho um campo no meu site que é para o visitante fazer uma pesquisa na internet, tipo o google, quando a pessoa digita o que quer pesquisar e clica em ok a página resposta é uma página do google com a pesquisa já realizada.
Help
-
uso o 2000 professional
-
como faço para instalar, pois li no forum que para usar o CDONTS preciso primeiro saber se o SMTP esta instalado, alguém pode me dar um ajuda.
-
valeu cara por ter respondido, já faz um tempao que ninguém me responde, acho que o erro é meu to mexendo muito com design esses dias e agora vou retomar a programação do site que to fazendo.
mas quanto ao assunto do email, é pelo iis que tenho que configurar o servidor para o envio de emails?
valeu
-
o que tenho que configurar para meus email chegarem ao email de destino que escolhi o invés de ficarem na pasta que estão?
ajuda
-
e ai galera, segura essa
mais um pau de ie, é o seguinte, instalei na minha máquina windows 2000 professional e atualizei o ie 5.0 para 6.0 sp1 depois de uma semana atualizado e rodando blza, agora esta dando pau as fontes dos site estão aparecendo grandes demais o que esta atrapalhando o visual de todos os site detonando com os design que sabe explicar.
valeuuu
Proposta
em ASP
Postado
pelo que eu entendi o simbolo % indica o caracter inicial, ou final do resgistro que será encontrado no bd, certo?
então so que a busca continua retornado todos os registros do bd.
olha o código abaixo:
<%
'conectamos ao banco
url_conexao = Server.MapPath("banco.mdb")
set conexao = Server.CreateObject("ADODB.Connection")
conexao.open "DRIVER={Microsoft Access Driver (*.mdb)};DBQ="&url_conexao
'recuperar a variavel
id = request("nome")
'selecionamos toda a tabela do banco
sql = "select * from tabela WHERE nome LIKE '%"&request.form("nome")&"%'"
set rs = conexao.execute(sql)
'testamos se a tabela esta vazia, pra não dar erros
if rs.eof then
response.write "<center>Nada no banco de dados</center>"
else
'vamos pro primeiro registro da tabela
rs.movefirst
'iniciamos a repetição.. até chegar ao fim da tabela
do while not rs.eof
'mostramos os dados da tabela do banco.. usando rs("campo").. onde RS é o objeto que executa o SQL que seleciona o banco
Response.write "<table width=""200"" border=""0"" cellspacing=""0"" cellpadding=""0"">"
response.write "<tr><td>Nome: " &rs("nome") &"</td>"
response.write "<td>Email: " & rs("email") & "</td></tr></table>"
'vamos para o proximo registro
rs.movenext
loop
end if
%>