
AlexCT
Membros-
Total de itens
330 -
Registro em
-
Última visita
Tudo que AlexCT postou
-
Algum servidor que suporte FileSystem,word.application , Cdonts, BD??? http://www.aspecto.net, diz que não suporta
-
mas eu já procurei e não achei, pois já me passaram a função que cria... mas até ai, não resolve, pois como você falou. É o que preciso!!!!
-
eu tb já tinha pensado isso mas como recuperar ---- asp?valor=1&valor=2&valor=3 -- mas aqui no forum , da para baixar o arquivo word, sem sair da pagina, lá em baixo tem : Baixar / Imprimir este tópico depois Download versão Microsoft Word , é só clicar que você faz o download do tópico, seria bem assim!.
-
EStou com um problema... pois o bd tem 350 registros, e na hora de mostrar todos os registros, para no 26, ou mesmo quando for mostrar uma busca selecionada, busca apenas algumas Set Conn= server.createobject("adodb.connection") DSNtest = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.Mappath("database/db_jogo.mdb") Conn.Open DSNtest ramo_pesquisa = Request.Form("ramo") If ramo_pesquisa = "TODOS" Then SQL = "select * from jogos order by id asc" Else SQL = "select * from jogos where ramo like '%"&ramo_pesquisa&"%';" End If [B]Set RS = Conn.Execute(SQL) acho que o problema não deve estar ai, mas estou postando mesmo assim, o que pode ser, será que é o IIS?
-
tipo_pesquisa = Request.Form("tipo") estilo_pesquisa = Request.Form("estilo") SQL = "select * from jogos where tipo1 like '%"&tipo_pesquisa&"%' or tipo2 like '%"&tipo_pesquisa&"%' and estilo1 like '%"&estilo_pesquisa&"%' or estilo2 like '%"&estilo_pesquisa&"%' or estilo3 like '%"&estilo_pesquisa&"%';" Set RS = Conn.Execute(SQL) Tenho uma busca com DOIS SELECT's TIPO e ESTILO e a busca tem que retornar quando acha os dois valores. que seria TIPO - ESTILO -> OK que a união dos valores selecionados (dois SELECT(, vai resultar a busca. o valor do TIPO irá buscar em dois campos do BD TIPO 1 - TIPO 2 o valor do ESTILO irá buscar em três campos do BD ESTILO 1 - ESTILO 2 - ESTILO 3 A BUSCA tem que ser TIPO and ESTILO mas como tem 5 campos, estou me atrapalhando onde colocar AND e OR. Pois como esta o códico acima, não esta como deve ser. Pois a busca esta como se fosse TIPO or ESTILO. melhorou!??? se pensarmos em logica Boolena, seria: (TIPO1 or TIPO 2) and (ESTILO1 or ESTILO2 or ESTILO3) pode faezr assim na linguagem?
-
Tenho 3 perguntas. como eu ordeno? SQL = "select * from jogos where ramo like '%"&ramo_pesquisa&"%';" pois fiz assim para tabela inteira: SQL = "select * from jogos order by nomeativ asc" mas tentei colcoar na pesquisa seletiva, não seu certo! É possivel eu fazer uma busca com dois valores diferentes no mesmo campo? E muitos lugares existe links, tipo ordem crecente ou decrescente. De que forma posso fazer isso? Pois existe uma busca e depois que mostrar a busca a pessoa clica em um link e a tal busca ficar crescente ou decrescente. obs: claro, sem perder os dados da busca.
-
Estava vendo aqui no fórum, ao ver um tópico é possivel baixar ele em formato html e word , mas basta a pessoa clicar no link, que já é criado o arquivo word. sem ter que acessar outra página para isso. é bem isso que preciso. Que ao clicar, ele crie um arquivo word ou txt com os dados do registro. mas sem sair da página que está. como posso fazer... pois já me passaram como criar o arquivo, ams esta intereção de ir para este script e pegar os dos do registro que ainda não sei.
-
Tenho uma busca, e depois este comando para verificar o valor da busca em um campo. SQL="select * from tabela where campo1 like '%"& valor &"%';" pois a busca é só no campo 1 . E preciso mostrar esta busca, e não estou sabendo como. Mas preciso mostrar os outros campos que compoem a TABELA campo 1 - campo 2 - campo 3 - campo 4 - campo 5 valeU!
-
passa o links aonde achou!
-
alguém sabe como e se é possivel, gerenciar totalmente o bd, criando tabelas, criar novos campos, e exclui-los poupando o tempo de baixar o bd e depois ter que enviar novamente. Fazer tudo isso no proprio servidor. Pois chega uma hora que o bd fica muito grande para ficar puxando e enviando. E algo que compacte tb! valeu
-
Estou precisando de uma ajuda, de como posso deixar uma imagem( em camada ou sem). Sempre no topo da pagina, mesmo quando abaixar a barra de rolagem. Pois estou precisando deixar uma imagem sempre no topo do lado esquerdo. valeu!
-
Alguém poderia explicar para que serve o descrito abaixo? Response.ExpiresAbsolute=#May 05,2001 05:30:30# response.Expires=-1 response.Expires=1440 response.Buffer=true response.Flush
-
Estou tentando enviar e eleapare a paginade ok, ams nunca chega porque sera? estou usando o host ASPECTO sera que tem algum problema? <% '########### envia email clinica ################### nome = trim(request.form("nome")) email = trim(request.form("email")) cidade = trim(request.form("cidade")) estado = trim(request.form("estado")) pais = trim(request.form("pais")) trabalho = trim(request.form("trabalho")) mensagem = trim(request.form("mensagem")) txt = txt & "Cadastro de Pedido de Acesso" & vbCrLf txt = txt & ""&chr(13) txt = txt & ""&chr(13) txt = txt & ""&chr(13) txt = txt & ""&chr(13) txt = txt & "data do cadastro:" &data & vbCrLf txt = txt & ""&chr(13) txt = txt & ""&chr(13) txt = txt & "nome:" &nome & vbCrLf txt = txt & ""&chr(13) txt = txt & "e-mail:" &email & vbCrLf txt = txt & ""&chr(13) txt = txt & "cidade:" &cidade & vbCrLf txt = txt & ""&chr(13) txt = txt & "estado:" &estado & vbCrLf txt = txt & ""&chr(13) txt = txt & "país:" &pais & vbCrLf txt = txt & ""&chr(13) txt = txt & "local de trabalho:" &trabalho & vbCrLf txt = txt & ""&chr(13) txt = txt & "outras informações:" &mensagem set mensagem2 = server.createobject("CDONTS.NewMail") mensagem2.from = email mensagem2.to = "alexct@terra.com.br" mensagem2.Subject = "Cadastro - Pedido de Senha para Acesso txt" mensagem2.bodyformat = 1 mensagem2.mailformat = 1 mensagem2.Importance = 2 mensagem2.Body = "txt" mensagem2.Send Set mensagem2 = nothing htmlemail = "<html><head><title>Untitled Document</title></head>" htmlemail = htmlemail & "<p>Cadastro de Pedido de Acesso</p>" htmlemail = htmlemail & "<p> data do cadastro:" &data & vbCrLf htmlemail = htmlemail & "<br><br>" & vbCrLf htmlemail = htmlemail & "nome:" &nome & vbCrLf htmlemail = htmlemail & "<br>" & vbCrLf htmlemail = htmlemail & "e-mail:" &email & vbCrLf htmlemail = htmlemail & "<br><br>" & vbCrLf htmlemail = htmlemail & "cidade:" &cidade & vbCrLf htmlemail = htmlemail & "<br>" & vbCrLf htmlemail = htmlemail & "estado:" &estado & vbCrLf htmlemail = htmlemail & "<br>" & vbCrLf htmlemail = htmlemail & "país:" &pais & vbCrLf htmlemail = htmlemail & "<br>" & vbCrLf htmlemail = htmlemail & "local de trabalho:" &trabalho & vbCrLf htmlemail = htmlemail & "<br>" & vbCrLf htmlemail = htmlemail & "outras informações:" &mensagem & vbCrLf htmlemail = htmlemail & "</body></html>" set mensagem = server.createobject("CDONTS.NewMail") mensagem.from = email mensagem.to = "alexct@terra.com.br" mensagem.Subject = "Cadastro - Pedido de Senha para Acesso html" mensagem.bodyformat = 0 mensagem.mailformat = 0 mensagem.Importance = 2 mensagem.Body = "htmlemail" mensagem.Send Set mensagem = nothing response.redirect "cadastro_ok.htm" %>
-
Estou com uma duvida de Host. gostaria se alguém conhece algum destes!!! e dar sua opniao, sobre estes ou outros que achem bom! Pois preciso de um Host - Asp, Access, Aspmail e Cdonts, com o MB de hospedagem possivel. www.hostlocation.com.br 29,70+800MB+25email+ASP+ACCESS+PHP+MYSQL+ASPMAIL+CDONTS web.hostnet.com.br 27,90+100MB+25ilim+ASP+ACCESS+ASPMAIL+CDONTS www.speedhost.com.br 26,90+100MB+50emiail+ASP+ACCESS+ASPMAIL+CDONTS+PHP www.globalhosts.com.br 19,90+400MB+25ilim+ASP+ACCESS+ASPMAIL+ASPEMAIL www.bighost.com.br 24,90(+50SETUP)+300MB+30EMAIL+ASP+ACCESS+ASPMAIL+CDONTS www.knal.com.br 29,90+800MB+25EMAIL+ASP+ACCESS+ASPMAIL+CDONTS+ASPEMAIL+PHP+MYSQL
-
Estou tentando fazer com que a pessoa clique num botão (gera senha) e a senha apareça no lugar da reservado para digitar a senha mas não estou conseguindo faezrque o dado da senha retorne para a propria pagina e a pareça no lugar especifico como poderia fazer? o codigo manjado da function <% Function GerarChave(valores) Dim chr_Array(35) chr_array(0) = "0" chr_array(1) = "1" chr_array(2) = "2" chr_array(3) = "3" chr_array(4) = "4" chr_array(5) = "5" chr_array(6) = "6" chr_array(7) = "7" chr_array(8) = "8" chr_array(9) = "9" chr_array(10) = "a" chr_array(11) = "b" chr_array(12) = "c" chr_array(13) = "d" chr_array(14) = "e" chr_array(15) = "f" chr_array(16) = "g" chr_array(17) = "h" chr_array(18) = "i" chr_array(19) = "j" chr_array(20) = "k" chr_array(21) = "l" chr_array(22) = "m" chr_array(23) = "n" chr_array(24) = "o" chr_array(25) = "p" chr_array(26) = "q" chr_array(27) = "r" chr_array(28) = "s" chr_array(29) = "t" chr_array(30) = "u" chr_array(31) = "v" chr_array(32) = "w" chr_array(33) = "x" chr_array(34) = "y" chr_array(35) = "z" Randomize do while len(chave) < 06 num = chr_array(Int(35 * Rnd )) chave = chave + num loop GerarChave = chave End Function response.write "Senha gerada: " & GerarChave(06) '& vbcrlf %>
-
todos falam que não seguro salvaro logine senha, até ai concordo estou pensando em fazer uma coisa,mas não sei a sintese e se funciona Antes de gravar asenha euacrescento um monte de numero e codigo após a senha tipo codificado= senha + sgdhsyws12515511c5sd1f5sd5f response.cookies("user")("senha")=codificado e na hora de recuperar tirar estes codigos amais codificado = request.cookies("user")("senha")= senha=codificado - sgdhsyws12515511c5sd1f5sd5f funcionaria mas só não sei como acrescentar, pois + é para soma né ou acrescentar algo antes e algo depois... a idéia seria essa
-
Tenho um bd Access mas não estou conseguindo listar apenas um unico registro pois só sei fazer mostrar todos como posso fazer para mostrar apenas 1 registro? e como faço para mostrar o registro que eu queira? é possivel eu impedir que a pessoa delete todos os registros, sendo obrigatorio deixar pelo menos 1? fico grato!!!
-
Instalei o aspmail e cdonts mas não sei o que fazer agora, pois antes de testar queria entender como funciona... como este programa faz para enviar o e-mail , por exemplo: fulano@terra.com.br se nem conectado a internet estarei. ele manda para qual e-mail? já que uso o IIS 5, que e-mail tenho que colocar para testar se recebo uma resposta e que esta dando certo o envio! fico grato peo esclarecimento
-
Duvidas Sobre Iis Pergunta E Eu Dou Uma Mão
pergunta respondeu ao franciscobiscaino de AlexCT em Microsoft Windows
tenho o servidor instalado IIS 5.1 ,mas quero colocar o aspmail e cdonts, mas não sei como ... poderia dar uma ajuda! -
Estou tentando fazer um sistema que caso a senha esteja correto, o login e a senha fique em um cookie gravada e retorne no espaço do login e senha, evitando que a pessoa tenha o trabalho de digitar novamente mas não esta dando certo... Não aparece nada depois por que será? login.asp <input type="text" name="uid" size="20" value="<%=Request.Cookies("usuario")%>"> <input type="password" name="pwd" size="20" value="<%=Request.Cookies("password")%>"> verifica.asp If Not RS.EOF Then Session("logado") = True Response.Cookies("usuario")= uid Response.Cookies("password")= pwd
-
Alguém sabe como eu possa após eu inserir os dados no bd enviar um e-mail para o administrador e um para o cadastrado.
-
Poxa velu mesmo essas duvidas do EOF e BOF , foram bem utei pois a pior coisa é ver o comando e não saber para que serve... gratissimo
-
Estou tentando fazer que ao chamar uma pagina, a pessoa vá fazer o login e volte para ela depois de confirmado o login cforum_login.asp <%Response.Buffer=TRUE%> <% Session("vim")=Request.ServerVariables("HTTP_REFERER") %> aqui tentei fazer um teste na mesma pagina para ver oque ele contem <% dim IP IP=Request.ServerVariables("HTTP_REFERER") Response.Write IP %> cforum_check.asp If Not RS.EOF Then Session("logado")=TRUE Set RS = Nothing Conn.Close Response.Redirect(Session("vim")) Else Set RS = Nothing Conn.Close Response.Redirect"cforum_login.asp" End If cindex.asp <%Response.Buffer=TRUE%> <% If Session("logado")= FALSE Then Response.Redirect"cforum_login.asp" %> Esta certo a sintese?