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. A melhor solução no seu caso, pelo que entendi, seria usar FSO. você faz uma consulta, imprimindo os registros em tela. Nos checkboxes você coloca os ids dos registros. Marca os checkboxes necessários os enviando para outra página (terá que montar um array para receber esses dados). Depois por FSO você consegue fazer o resto... Pode inclusive usar a ideia do Bareta tb... []'s
  2. Só vendo o código... Mas acho que isso você vai resolver com HTML ou CSS e não ASP... todo caso, posta o código aí e explica um pouquinho melhor. []'s
  3. Basta criar uma session com alguma informação que possa ser usada no select para buscar os dados cadastrados no banco... No caso eu usei senha... mas pode ser qualquer coisa e em qualquer tabela! []'s
  4. porque essa variavel não esta declarada, coloque: <%dim senha, login%> no topo do seu código []'s
  5. Rafael Spilki

    Erro no Script

    Fala Legionariors, sugiro dar uma pesquisadinha em repetições por linha no google... tb sugiro dar uma estudada nas tags <tr>, <td> e já aproveita e estuda tambéms as tags <ul>, <li>, etc. []'s
  6. você da um redirect para relatorio.asp... ou seja, não terá nada para resgatar por querystring... O jeito é na mesma rotina de insert criar uma session com a senha e o usuário e depois resgatar essa session na hora de fazer a consulta no bd, ou seja: cadastrar.asp fica assim: <!--#include file="conexao.asp"--> <% Dim conexao Login = Request.form("txtLogin") Senha = Request.form("txtSenha") strInsert = " INSERT into usuarios" strInsert = strInsert & "(login, senha)" strInsert = strInsert + "VALUES ('" + Login + "'," strInsert = strInsert + "'" + Senha + "')" Call abreConexao Set rsInsert = conexao.Execute(strInsert) session("login") = Login session("senha") = Senha Call fechaConexao Set rsInsert = Nothing Response.redirect("relatorio.asp") %> e a relatorio.asp ficara assim: <% Dim MM_conn_STRING MM_conn_STRING = ("DRIVER={MySQL ODBC 5.1 Driver};SERVER=000.000.000.00;PORT=0000;DATABASE=x;USER=x;PASSWORD=x;OPTION=3;") %> <% dim conn set conn = SERVER.CreateObject("ADODB.Connection") conn.Open MM_conn_STRING %> <% senha = session("senha") login = session("login") IF senha = " " THEN response.write "senha inexistente" response.end end if 'RESPONSE.Redirect("pg_relatorio.asp?codigo="&REQUEST.QueryString("txtSenha")) 'END IF %> <% Dim CA1 Set CA1 = Server.CreateObject("ADODB.Recordset") CA1.ActiveConnection = MM_conn_STRING CA1.Source = "SELECT codigo,login, senha FROM usuarios where senha = "&senha&"" CA1.Open() %> <body> <table> <tr><td colspan="4">Login:<%=(CA1.Fields.Item("login").Value)%></td></tr> <tr><td colspan="4">Senha:<%=(CA1.Fields.Item("senha").Value)%></td></tr> </table> </body> <% CA1.Close() Set CA1 = Nothing %> <% conn.Close() Set conn = Nothing %> Enfim... mais ou menos isso! []'s
  7. Muito bom... puxa a brasa pro nosso assado... mas porque não? []'s
  8. Rafael Spilki

    Liberum Help Desk

    Nós só temos como ajudar no posicionamento do bd se você colocar aqui o caminho pro seu bd, ou seja, o esforço deve ser o mesmo... no meu server a pasta raiz chama wwwroot, dentro dessa pasta tenho uma outra pasta chamada bd e dentro dela o arquivo do bd, ou seja, o endereço é: wwwroot/bd/bd.mdb tente aplicar essa lógica ao seu caso e veja se funciona! []'s
  9. Eu uso o AspUpload... no meu server é free... mas certamente eles devem pagar uma mensalidade de licença... E a propósito 70kb é enorme dependendo do ponto de vista... Meu server por exemplo limita em 4kb para upload sem componentes... ;-) []'s
  10. o server deve ter bloqueios ou não aceitar arquivos grandes... []'s
  11. você deve autenticar o SMTP para envio para servidores externos. Procure por "cdo.sys com smtp autenticado" no google que com certeza tu acha. []'s
  12. O select está certo... mas você tem que fazer um loop do tipo while usando seu recordset... Google it! []'s
  13. Poisé... eu consigui em algumas delas... mas importa sem cores... No 3ds aparece suporte para importação aos .ai's, mas não há como eu consiga fazer! Vou dar uma pesquisada sobre o blender hj! Já havia me programado pra isso... Mas com esse conjunto q você usa: corel + blender você exporta/importa em que formato? Comecei a estudar 3d a muito pouco tempo! Concluí o basicão só até agora! rssssss...
  14. Boa tarde. Alguém sabe como importar um arquivo .ai para dentro do 3ds max 9? To tentando aqui mas aparece essas mensagens (erros) em tela: "line in file exceeds 255 characters" "improper file format" Alguma sugestão? []'s
  15. tente assim: titulo = acentos(Upload.form("titulo")) []'s
  16. Quando ele se logar faça uma consulta e na mesma rotina coloque uma condicional para se ela retornar em branco aparecer um alerta em tela... Agora é mão na massa!
  17. Olha o Kaka tentando ser modesto! rssssssssssssssssssss... Só onda Kaka... não liga não que sei que tu é modesto pacas... mesmo... de verdade! Galera... parabéns a todos... muito legal julgar o script de vocês.. uma honra. Aprendi muito tb! Ao restante da equipe organizadora devo um pedido de desculpas porque na real só participei do julgamento mesmo... no restante não fiz mais nada! Q vergonha... faltava tempo total... desculpa mesmo! []'s
  18. mas não é só isso: tb tem a questão das aspas... da uma pesquisadinha no google... isso é simples... se não ta funcionando é porque a sintaxe ta errada! é algo por aí... []'s
  19. você colocou errado... de uma olhada na sua sintaxe... o certo é _blank []'s
  20. A questão é que você está verificando isso no recordset... entenda que se tem algum dado no RS seu app vai dar falha... Talvés uma melhor seja correr essa verificação direto em algum campo do bd, algo do tipo: if exe("cod") = "" then response.write "registro não encontrado" else response.write "registro encontrado" end if Será que ajudou? []'s
  21. Debug a variável e veja como ela está vindo... acredito que possa ser um problema ali, porque pelo que vi as condicionais estão certas... dubug: rs =rs_max("CodigoRastreamento") response.write "rs = " & rs response.end []'s
  22. Primeiro porque você continua querendo tratar a varíavel dentro da query... isso não é bom e pode incorrer em erros! Tire isso de lá... além disso sua sintaxe tá meio estranha... seria mais prudente tentar assim: strSQL = "SELECT nome,contato,regiao,email,telefone,celular,uf,sigla FROM Scanner where uf = '"&variaveltextosemacento&"' OR email = '"&variaveltextocomacento&"' ORDER BY nome" []'s
  23. veja como eu coloquei minha variável e veja como você colocou... No caso do operador = (igual) não precisa, nem deve se usar o %, ok? Além disso... seria interessante você tratar o texto antes de enviar pra query... se essa query por exemplo estiver dentro de um loop poderá repetir uma operação (como de tirar acentos) desnessária várias vezes... []'s
  24. O like vai retornar o que for igual ou semelhante... e o = como o próprio simbolo significa apenas o que for igual... ex: where campobd = '"&variaveltexto&"' Era isso? []'s
×
×
  • Criar Novo...