Ir para conteúdo
Fórum Script Brasil

Developer

Membros
  • Total de itens

    254
  • Registro em

  • Última visita

Tudo que Developer postou

  1. Como o cyberalexxx falou, você precisa de um componente... Verifique quais componentes de upload tem na sua hospedagem... Ou faça um upload sem componente: Upload de arquivos sem utilização de componente Parte 1 Parte 2 Parte 3 Parte 4
  2. Que eu saiba em HTML não tem como controlar o tempo de um marquee, mas em JS sim...
  3. Isso se faz com JS... Se quiser mais respostas posta la, que te ajudam melhor!
  4. Developer

    Erro

    <% Set Cnn = Server.CreateObject("ADODB.Connection") DSNtest="DRIVER={Microsoft Access Driver (*.mdb)}; " DSNtest=dsntest & "DBQ=" & Server.MapPath("../bdd/windows.mdb") Cnn.Open DSNtest %> <% Set rstExcel = Server.CreateObject("ADODB.Recordset") rstExcel.Open "INSERT INTO win (Id, Nome, Versao, Descricao, Windows, Autor, Data, Categoria, Destribuicao, Expirar, Downloads, Serv1, Serv2, Serv3, Serv4, Serv5, Extencao, Foto, Ampliada, Idioma, Votos, Positivos, Negativos, Enviador) VALUES(0, '"&request("nome")&"', '"&request("versao")&"', '"&request("descricao")&"', '"&request("windows")&"', '"&request("autor")&"', "&request("data")&", '"&request("categoria")&"', '"&request("destribuicao")&"', '"&request("expirar")&"', '"&request("downloads")&"', '"&request("serv1")&"', '"&request("serv2")&"', '"&request("serv3")&"', '"&request("ser4")&"', '"&request("serv5")&"', '"&request("extencao")&"', '"&request("foto")&"', '"&request("ampliada")&"', '"&request("idioma")&"', '"&request("votos")&"', '"&request("positivos")&"', '"&request("negativos")&"', '"&request("enviador")&"'",cnn, 3, 2 rstExcel.Close Set rstExcel = Nothing Cnn.Close Set Cnn = Nothing %> <B>Envio Com Sucesso!!!</B><BR><BR>
  5. Ae cyberalexxx, era isso que eu tava falando pra ele.. deve ser algum campo numerico, ou algum campo texto que ele colocou de numerico no SQL... DELPHI-Man32, no banco de dados, todos estão em tipo string?
  6. No Portal da SB tem varias aposlilas boas, a maioria aprendi lendo as apostilas de la https://www.scriptbrasil.com.br
  7. O que acontece? Ele dá erro, ou só não pega o valor do form? Você viu se o nome do form está corretamente?
  8. Que eu saba tem acesso dos dois.. Sendo que o nome do caminho fisico esteja correto... OBS: Eu testei aqui, e não tem como... Só dá em VB, C, JAVA, e algumas outras..
  9. Developer

    Formulario

    Não é obrigatório usar nenhum desses dois comando, só usam se quiser.... Primeiramente....Qual componente seu servidor dá suporte?
  10. É ta com problema no servidor... Nenhum MSN entra... Nem o meu Não sei porque
  11. http://www.aspbrasil.com.br/conteudo/detal...424&Secao=dicas http://www.asppdf.com/
  12. Me adciona ai... Depois eu falo contigo, pois agora to ocupado victor@ckless.com.br
  13. Depende... Tem uma configuração de cada coluna... se tiver para não aceita um caracter nulo ele vai dar esse erro... Deve ser isso, algum deve estar conf. errado, olha o erro: Nenhum valor dado para um ou mais requereu parâmetros. Sabe como configura?
  14. Eu perguntei isso. porque poderia ser erro no banco de dados.. devia estar boqueado o caracter nulo... Tem algum campo numerico no banco de dados?
  15. Developer

    Bom Dia Em Asp?

    <% Dim semana(7) Dim mes(12) semana(1) = "Domingo" semana(2) = "Segunda-feira" semana(3) = "Terça-feira" semana(4) = "Quarta-feira" semana(5) = "Quinta-feira" semana(6) = "Sexta-feira" semana(7) = "Sábado" mes (1) = "Janeiro" mes (2) = "Fevereiro" mes (3) = "Março" mes (4) = "Abril" mes (5) = "Maio" mes (6) = "Junho" mes (7) = "Julho" mes (8) = "Agosto" mes (9) = "Setembro" mes(10) = "Outubro" mes(11) = "Novembro" mes(12) = "Dezembro" 'Aqui é uma função que verifica se a data é menor que 10. if day(date) < 10 then dia = 0&day(date) else dia = day(date) end if if time => #00:00# and time < #12:00# then saudacao = "Bom dia, " elseif time => #12:00# and time < #18:00# then saudacao = "Boa tarde, " else saudacao = "Boa noite, " end if 'Aqui responde a data por extenso na página. response.write saudacao&semana(weekday(date))&", "&dia&" de "&mes(month(date))& " de "&year(date)&" e agora são "&time %>
  16. SCRIPT DA PAGINA: result_avancada.asp <% 'Abre a conexo com o banco de dados Set Conecta = Server.CreateObject ("ADODB.Connection") Conecta.open "Provider=Microsoft.Jet.OLEDB.4.0; Data Source="& Server.MapPath("dbasegeral/dbasegeral.mdb") procura = request.form("procura") estado = request.form("estado") cidade = request.form("cidade") objetivo = request.form("objetivo") religiao = request.form("religiao") moracom = request.form("moracom") fumante = request.form("fumante") aparencia = request.form("aparencia") estcivil = request.form("estcivil") set listarUser = server.createobject("ADODB.recordset") sql = "select * from usuarios where cidade='"&cidade&"' and estado='"&estado&"' and procura='"&procura&"' and objetivo='"&objetivo&"' and religiao='"&religiao&"' and moracom='"&moracom&"' and fumante='"&fumante&"' and aparencia='"&aparencia&"' and estcicil='"&estcivil&"'" listarUser.open sql, conecta, 3,3 %> vejam ai o que errado e se a consulta em SQL pode ser feita! a proposito, alguém sabe ond encontro um banco de dados com todas as cidades brasileiras por estado! tipo quando escolho um estado ele filtra somente as cidades do estado selecionado! ok, t+v Isso acontece quando você digita todos os campo, ou só quando deixa algum sem preencher?
  17. To ai: contato.asp <% function email_cdonts(de_email, para_email, subject, mensagem) Set objmail = Server.CreateObject("CDONTS.NewMail") objmail.mailformat=0 'para enviar html como mensagem objmail.bodyformat=0 'para enviar html como mensagem objmail.from = de_email objmail.to = para_email objmail.subject = subject objmail.body = mensagem objmail.send Set objmail = nothing end function If request("acao") <> "" then mensagem="Dados do Usuário:<br><br>Nome: "&request("nome")&"<br>E-mail: "&request("email")&"<br>MSN: "&request("MSN")&"<br>Yahoo: "&request("yahoo")&"<br><br>Identificação do deposito:<br>Documento: "&request("documento")&"<br>Data do envio: "&request("datadeposito")&"<br>Depositante: "&request("depositante") call email_cdonts (request("email"), "contato@seusite.com.br", "ASSUNTO", mensagem) response.write "Enviado com sucesso!!!" else %> <table> <form action="contato.asp" name="faleconosco"> <tr><td>Nome: </td><td><input name="nome"></td></tr> <tr><td>Email: </td><td><input name="email"></td></tr> <tr><td>MSN: </td><td><input name="MSN"></td></tr> <tr><td>YAHOO: </td><td><input name="yahoo"></td></tr> <tr><td>Documento: </td><td><input name="documento"></td></tr> <tr><td>Data do deposito: </td><td><input name="datadeposito"></td></tr> <tr><td>Depositante: </td><td><input name="depositante"></td></tr> <tr><td colspan="2"><input type="Hidden" name="acao" value="form"><input type="Submit" name="botao" value="Enviar"></td></tr> </form> </table> <%end if%>
  18. Agora que você foi perceber isso hahaha
  19. Já aconteceu isso comigo... Os e-mails nunca chegavam... Isso não é problema no codigo, e sim no servidor... O SMTP do hospedeiro deve estar ruim... Entre em contato com seu hospedeiro...
  20. Sim.. Dá pra verificar se a pasta existe com um comando FSO... Mas tem pessoas que mudam as pastas, e nem todos os anti-virus são as mesmas pastas de descompacão.. http://www.aspbrasil.com.br/conteudo/detal...Secao=tutoriais
  21. tenta assim <%Set Gravar = Server.CreateObject("ADODB.Recordset") sql = "select * from TABELA" Gravar.open sql, Conecxao, 1,1 Gravar.AddNew Gravar("nome") = nome Gravar("email") = email Gravar("cidade") = cidade Gravar("estado") = estado Gravar.UpDate Response.Redirect("pagina.asp")%> ou <% conexao.execute "Insert into tabela (nome, email,cidade,estado) Values ('"&request("nome")&"', '"&request("email")&"', '"&request("cidade")&"', '"&request)("estado")&"')" Response.Redirect("pagina.asp")%> Vê se funciona ai...
×
×
  • Criar Novo...