Ir para conteúdo
Fórum Script Brasil

Henderson

Membros
  • Total de itens

    362
  • Registro em

  • Última visita

Tudo que Henderson postou

  1. hiauhiau ok, ok eu tento :D
  2. nunca usei, mas expira em algum tempo: http://baixaki.ig.com.br/site/detail12271.htm grátis: http://baixaki.ig.com.br/site/detail38262.htm digite servidor asp na busca de www.baixaki.com.br que tem vários
  3. você tem acesso à página em que você queé que seja clicado automaticamente no botão? porque se tiver, tira o form, coloca o link direto realizando a ação... mas acho que tu tá querendo fazer isso pra conseguir voto em algum topsites ein, uahiuahiuahiau po, não faz sentido o que você está querendo fazer basta alterar a página, tirar o form, e colocar ela direto executando a ação... sem botões, e página executada automaticamente ao ser aberta
  4. consegui tu só inverteu né y é coordenada vertical, tinha que ser no top e x qe é horizontal no left mas eu troquei... deu certinho, valeu pra quem quizer, ficou assim: <script language="javascript"> function Layer() { document.getElementById("mais").style.left = event.x; document.getElementById("mais").style.top = event.y; if (document.getElementById("mais").style.visibility == 'visible') document.getElementById("mais").style.visibility = 'hidden'; else document.getElementById("mais").style.visibility = 'visible'; } </script> <div id="mais" style="cursor: pointer; position:absolute; width:10px; height:10px; z-index:1; visibility: hidden; overflow: visible; left: 400px; top: 400px; background-color: #F0F8FF; layer-background-color: #F0F8FF; border: 1px none #000000;"> <a href="#" onMouseOver"Layer()" onMouseOut"Layer()">Mais</a>
  5. cpf -> http://scriptbrasil.com.br/forum/index.php...8342&st=15# Quanto ao rg, não sei, eu nunca vi nenhum script e nunca vi em nenhum site algo que verifique se o rg realmente existe, mas se tiver, alguém vai postar pra você. A do cpf já está aí
  6. Set ObjUpload = Server.CreateObject("aspSmartUpload.SmartUpload") ObjUpload.Upload For Each File In ObjUpload.Files If Not File.IsMissing then nome = File.FileName path = split(nome,".") e = path(1) nome = "NOVONOME"&e File.SaveAs("arquivos/" & nome) End if Next não sei, não conheço o componente, mas entendeu a minha lógica? Veja se assim funciona! Quem sabe, hehe!
  7. na hora de inserir no banco de dados, você tem que substituir os "enters" do teclado por <br> que será reconhecido pelo navegador como uma quebra $campo = $_POST['campo']; $campo = str_replace(chr(13), "<br>", "$campo"); falei besteira? se falei, me desculpem, hehe!
  8. acabei de postar algo sobre isso: http://scriptbrasil.com.br/forum/index.php?showtopic=86882 é basicamente o que está feito só precisa resolver um problema lá!
  9. aí, beleza? Seguinte, tenho um código que quando passa o mouse em cima de um link, aparece uma janelinha... Aqui o código: <script language="javascript"> function Layer() { if (document.getElementById("mais").style.visibility == 'visible') document.getElementById("mais").style.visibility = 'hidden'; else document.getElementById("mais").style.visibility = 'visible'; } </script> <div id="mais" style="cursor: pointer; position:absolute; width:10px; height:10px; z-index:1; visibility: hidden; overflow: visible; left: 400px; top: 400px; background-color: #F0F8FF; layer-background-color: #F0F8FF; border: 1px none #000000;"> <a href="#" onMouseOver"Layer()" onMouseOut"Layer()">Mais</a> Só que eu colocando a posição da layer como está pode ser que alguns dos links MAIS fique por debaixo dela, e aí, dá erro. Quando se coloca o mouse em cima do link, ao invés de abrir, é como se ficasse abrindo e fechando a layer, porque o mouse fica alternando muito rápido entre a setinha e a mão que aparece em link. Então eu preciso pegar a posição do mouse, para poder abrir o layer um pouco mais pro lado do mouse... Só que eu não sei nada de javascript Esse código aí eu peguei pronto, porque nem isso eu saberia fazer, então por favor, me ajudem e sejam pacientes, hehe. Valeu
  10. você está rodando isso localmente? a pasta onde está o arquivo deve ter todas as permissões... senão vai dar esse erro mesmo...
  11. ele não tá encontrado o arquivo teste.htm verifique se ele realmente existe e se está na mesma pasta que o arquivo DELETA.ASP ou, me desculpe, mas não é certeza porque faz tempo que não mexo com FSO, mas tente assim: arquivo = Server.MapPath("teste.htm") Set FSO = Server.CreateObject("Scripting.FileSystemObject") FSO.DeleteFile arquivo se mesmo assim der o mesmo erro, queé dizer que o arquvio teste.htm não existe, pelo menos no mesmo diretório que o arquivo deleta.asp
  12. é, tá faltando coisa trabalhar com os arquivos do servidor é uma das coisas que, eu pelo menos acho, é muito mais simples no php, no asp, upload, deletar, criar... tudo, dá um poco mais de trabalho, mas.. faça assim Set FSO = Server.CreateObject("Scripting.FileSystemObject") FSO.DeleteFile "index.htm" aqui tem tudo de FSO http://scriptbrasil.com.br/forum/index.php...mp;#entry149950 ;)
  13. é possível sim e com FSO posta como você fez, pra saber o que deu errado!
  14. Henderson

    Cadastro No Bd

    realmente, você não pode tirar isso, porque você está enviando arquivo. Request.Form, serve para pegar os dados de um formulário, quando o método de envio do formulário é POST. Request.QueryString para quando o método de envio do form é GET. Mas como o método GET manda os dados pela URL, pode-se dizer que Request.QueryString pega os dados do link. Agora a sua principal duvida, que é não consegui pegar os dados do form, não sei te ajudar. Verifique o nome do campo no formulário... não sei.. porque isso tem a ver como UPLOAD eu não manjo muito não!
  15. pNome = RS("Nome") pNome = Ucase(Left(pNome,1)) & Lcase(Mid(pNome,2)) ;)
  16. Henderson

    Só Uma Idéia...

    não sei porque, mas eu mudei, fiz assim while ($rs = mysql_fetch_array($sql)) { $nposicao = $_POST[$rs['id']]; $id = $rs['id']; $sql2 = mysql_query("UPDATE times SET posicao = '$nposicao' WHERE id = '$id'"); } e funcionou!
  17. hey o meu código era uma idéia você tem que adaptar ao seu código, fica assim: Dim Conn Set Conn = Server.CreateObject("ADODB.Connection") Conn.Open "DBQ=" & Server.MapPath("informativo/bloggus/dados/blog.mdb") & ";Driver={Microsoft Access Driver (*.mdb)}" Set rs = Server.CreateObject("ADODB.Recordset") busca = request("txtBusca") sql = "Select TOiP 20 titpost from posts where post like'%" & busca & "%' or titpost like'%" & busca & "%' order by datapost DESC" set rs = Conn.execute(sql) If not rs.EOF then i = 0 while not rs.eof i = i + 1 if i >= 1 and i <= 4 then response.write (RS("titpost"))&"<br>" else end if rs.movenext wend Else Response.Write "<font color=red size=2><b>Não foi encontrado nenhum resultado!</b></font>" End If
  18. Henderson

    Só Uma Idéia...

    aí, preciso que me deem uma idéia... Assim, eu tenho uma tabela de campeonato... mas pelos critérios de desempate, eu não consigo dexar a ordem de classificação usando somente SQL por causa de que dependem de confrontos diretos, essas coisas, fica muito complicado de fazer direto pela SQL então eu criei um campo POSICAO na tabela... aí eu faço uma página com um form, e usando o while pra pegar todos os times cadastrados e com um campo texto do lado para digitar a posicao... o nome desse campo texto é o ID do time, que está cadastrado no banco... mas agora é que vem meu problema... pra eu fazer o update, eu preciso desse valor digitado, certo? então eu faço $sql = mysql_query("SELECT * FROM times ORDER BY time"); while ($rs = mysql_fetch_array($sql)) { $time = $rs['time']; $sql2 = mysql_query("UPDATE times SET posicao = '$nposicao' WHERE time = '$time'"); } o meu problema é o valor da variável nposicao que é o valor digitado no campo texto... como pegar? eu tentei $id = $rs['id']; $nposicao = $_POST['$id']; mas não dá, ele tenta pegar o valor do campo $id... e não do valor armazenado na variável id o que eu faço???
  19. tenta sql = "UPDATE suptec set tecnico = '"&Vtecnico&"', resposta='"&Vresposta&"', pendencia = false where id="&Vid
  20. você naõ está entendo, presta atenção na sua sql, no final, está assim id = "&Vid essa variável Vid é o que? de onde vem o valor dela? da querystring? porque está dando esse erro porque ela está vindo sem valor
  21. não, não... sua variável Vid... como você alimenta ela com um valor? só com esse pedaço do código eu não tenho como saber!
  22. tem que saber de onde tá vindo o valor... de onde vem o valor dessa variável? é de um form? se for um Request, veja se você está recuperando do campo certo... e se o campo está preenchido...
  23. pode fazer assim ó sql = "Select TOP 20 titpost, post from posts where post like'%" & busca & "%' or titpost like'%" & busca & "%' order by datapost DESC" set rs = conexao.execute(sql) cont = 0 while not rs.eof cont = cont + 1 if cont > 4 and cont <= 20 then 'mostra o que tem que mostrar end if rs.movenext wend vê se dá certo mas pelo que vi, não sei se é isso mas acho que você queé só dá um destaque pras 4 primeiras notícias não é? se for isso, faz assim: sql = "Select TOP 20 titpost, post from posts where post like'%" & busca & "%' or titpost like'%" & busca & "%' order by datapost DESC" set rs = conexao.execute(sql) i = 0 while not rs.eof i = i + 1 if i >= 1 and i <= 4 then 'NOTICIAS COM DESTAQUE else 'NOTICIAS SEM DESTAQUE end if rs.mvenext wend
  24. Henderson

    Abrir Formulário

    bom, não adianta eu baixar seu script porque eu não sei onde você quer fazer esta alteração poste o código da página em que exibe o curriculo, que mostro como selecionar apenas o do usuário que logou e poste também o código da página de login só explicando, variável do recordset é a variável que contem os dados da pesquisa do banco de dados, por exemplo sql = "select * from tabela" set rs = conexao.execute(sql) rs é a variável do recordset, entendeu?
×
×
  • Criar Novo...