Ir para conteúdo
Fórum Script Brasil

[ GuTo ]

Membros
  • Total de itens

    955
  • Registro em

  • Última visita

Tudo que [ GuTo ] postou

  1. Assim... pelo que to entendo você estão falando de um SISTEMA DE UPLOAD DE ARQUIVOS EM JAVASCRIPTS ??? E ainda por cima com restrição de extensões ??? Bem, eu sinceramente nunca vi ou ouvi falar sobre alguma JAVASCRIPT que servisse para realizar UPLOADS. Só vi códigos escritos em ASP e entre outras linguagens dinâmicas. Caso eu esteje errado, solicito que enviem-me o código JavaScript para UPLOAD. Abraço!
  2. [ GuTo ]

    Indique...

    Ocorre um erro no enviar o bagulho <% dim useraction useraction = request("action") select case useraction case "login" seunome = request.form("seunome") seuemail = request.form("seuemail") nomeamigo = request.form("nomeamigo") emailamigo = request.form("emailamigo") Set objCDO = Server.CreateObject("CDONTS.NewMail") htmlemail = htmlemail & "<font face=Verdana size=2><strong><font size=2>" htmlemail = htmlemail & "<p><font face=Verdana color=#000080>Olá </font><i><font " htmlemail = htmlemail & "face=Verdana color=#FF0000>" & nomeamigo & "</font></i><font face=Verdana color=#000080>!<br>" htmlemail = htmlemail & "<br>" htmlemail = htmlemail & "O seu amigo " & seunome & " entrou no site da xxxxxxx e pensou que você iria gostar de visitar o site também!</font></font></strong></font></p>" htmlemail = htmlemail & "<br>" htmlemail = htmlemail & "<p><strong><font size=2 color=#000080><font face=Verdana>O site da xxxxxxx, é um portal onde você encontra uma seção para Webmaster, com vários exemplos de DHTML, Java Script, CSS, etc. Além da seção Webmaster, você também encontra no nosso portal, uma seção de Apostilas, com tudo oque você precisa para entrar no mundo da informática e muito mais. Na xxxxxxx, você também irá encontrar uma seção de Dowloads com os melhores programas, é muito fácil de encontrar o programa que você quer, basta você fazer uma busca e pronto. Caso você queira receber o Boletim Semanal da xxxxxxx, entro no nosso portal e cadastre-se! O cadastro é muito simples, basta você forenecer seu nome e e-mail para estar sempre atualizado!</font><br><br>" htmlemail = htmlemail & "<font face=Verdana>Atenciosamente,<br>" htmlemail = htmlemail & "</font></font><i><font face=Verdana size=2 color=#000080>&nbsp;xxxxxxx" htmlemail = htmlemail & "- O seu Portal de Informática<br>" htmlemail = htmlemail & "&nbsp;</font><a href=http://www.xxxxxxx.com.br><font face=Verdana size=2 color=#000080>www.xxxxxxx.com.br</font></a></i></strong></p>" objCDO.To = emailamigo objCDO.From = seunome objCDO.Subject = "V I S I T E ! ! !" objCDO.Body = htmlemail objCDO.MailFormat = 0 objCDO.Bodyformat = 0 objCDO.Send response.redirect "indique2.asp" end select %> <html> <head> <title>xxxx - Indicação</title> </head> <body topmargin="0" leftmargin="0" bgcolor="#429AC6"> <p align="center"><br> <font face="Arial" size="2" color="#FFFFFF"><b>Preenchendo este formulário, você estará indicando o site xxxx à seu amigo.</b></font><br> <form name="theform" action="indique.asp?action=login" method="post"> ... bla bla... mas eu não sei o q tah errado... ajudem-me abraço
  3. confira se o resto do seu HTML está correto, do contrário é possível que ocorra erros na exibição da página. espero te-lo ajudado
  4. [ GuTo ]

    4 Coisas...

    Olá Sou o -webmaster- que criou este tópico. Eu já visitava este fórum muito antes de ele estar assim, tão diferente (melhor), mas só fui me cadastrar no fórum depois de uns tempos de ter postado este tópico. Eu já consegui "evoluir" um pouquinho no ASP, mas não sei nada ainda, o site é que foi um pouco adiante até agora, rs*** Bem, vamos ao que interessa... O que eu consegui daquilo tudo que pedi anteriormente: - Já sei exibor o IP do visitante. - Já sei exibir o número total de membros cadastrados, e o total de membros do sexo Masculino e do Feminino também. - Já criei um sistema de busca, mas ainda não é detalhado. (Se alguém quiser me dar um HELP...) O que pretendo ainda... - Criar um fórum completo (pode ser = ou parecido com este), com um sistema de login para cada usuário, onde eles poderão administrar seus dados e tudo mais. - E agora vou testar o código que o nosso amigo Salgado nos forneceu aqui. Lembrando que o código serve pra exibir o último membro cadastrado. (Ah, muito obrigado pela colaboração ae brow!) Bem, espero que me ajudem... Em breve quando eu souber perfeitamente ASP vou ajudar todo mundo, certamente. No antigo fórum, ajudei mta gente com o HTML, CSS e um pouco de JAVASCRIPT. Se alguém precisar de alguma ajuda em HTML e CSS, eu ajudarei. JavaScript to em aprendendo juntamente com o ASP, devagar e sempre, rs*** Um abraço ;)
  5. aeee jissa e d+ amigos em breve estarei colocando um site de javascripts (MEU) no ar. um site que vai ter tudo quando é código javascript que eu já encontrei na net. convido você e seus amigos interessados futuramente a visitar o meu site e se quiserem, publicar suas criações. todos javascripts serão bem vindos. um abraço. obs.: o endereço vai ser superjavascripts.kit.net o site a principio não tera nada dinamico (acho), mas com o tempo qm sabe...
  6. [ GuTo ]

    Exibir Total...

    Tenho 2 códigos, preste atenção! O que tem de errado neste código? <% Dim Total,garotos,garotas Set bd = Server.CreateObject("ADODB.Connection") bd.Open "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("db/tudo.mdb") Set tabrs = Server.CreateObject("ADODB.recordset") tabrs.open "tblCad",bd,1,3 total = tabrs.recordcount tabrs.movefirst while not(tabrs.Eof) if tabrs("MascFem")="1" then garotos=garotos+1 end if if tabrs("MascFem")="0" then garotas=garotas+1 end if wend tabrs.close bd.close %> E neste: <% Dim Connection, SQLquery, RS, Total, Garotos, Garotas Set Connection = Server.CreateObject("ADODB.Connection") Connection.Open "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("db/cadastros.mdb") SQLquery = "SELECT count(*) AS total FROM tblCad WHERE Adicionado=1" Set RS = Connection.Execute(SQLquery) Total = RS("total").Value Garotos = RS("MasFem=1").Value Garotas = RS("MasFem=0").Value %>
  7. [ GuTo ]

    Formulario- Cadastro+email

    agradeceria se voces pudessem me passar tambem este codigo depois. estou precisando muito. solicito a todos que responderem este tópico.
  8. [ GuTo ]

    Exibir Ip

    obrigado pela ajuda moderador "hackerclube", mas o script não é assim eu pensei melhor... é assim ó... <% Response.Write(Request.ServerVariables("REMOTE_ADDR")) %> abraço
  9. [ GuTo ]

    Iframes

    Crie uma INDEX sem frames nem nada crie tables, uma para seu menu da esquerda e outra para o da direita deixa uma table pro centro da página, onde nela você colocara um iFrame com algum nome (name). nos links dos menus voce coloca target="nomedoiframe" deu pra me entender? se não deu contate-me e eu faço um exemplo pra você ver! abraço
  10. [ GuTo ]

    Exibir Ip

    este script ERA pra exibir o IP do visitante, mas isso não acontece. meu site é hospedado no brinkster.com. <% Response.Write request.servervariableS("REMOTE_ADDR") %>se algo estiver errado, me corrigam. abraço :D
  11. uma pequena e leve dúvida... <meta http-equiv="Content-Type" content="no-cache; charset=iso-8859-1"> isso aki, exatamente este código, não deixaria o browser salvar meus códigos fonte no cache do IE né?! quero uma resposta rápida :D Abraço
×
×
  • Criar Novo...