Ir para conteúdo
Fórum Script Brasil

bareta

Moderadores
  • Total de itens

    6.231
  • Registro em

  • Última visita

Tudo que bareta postou

  1. bareta

    Select

    <%if Request.Form("mnuTecnico") = Request.Form("mnuTecnico") then id = "selected" else id = false end if%> isso vai sempre dar select para todos os registros.... a comparação deve ser feita com o id que vem do banco... logo o if tem q estar dentro do loop...
  2. bareta

    Select

    obviamente... coloque no if... uma comparação entre o request("select") e o valor vindo do banco...
  3. bareta

    multi-idioma

    fiz isso uma vez... meu deus.. do ceu.. kkk fiz o cadastro de idiomas pelo administrador.... deu muito campo era.. formulario q num cabava mais... ahudasidaushd
  4. bom para você importalo você deve salvar em um formato que seja lido pelo bloco de notas.... assim como no exel... (é isso pelo q entendi)..
  5. bareta

    combo dinâmico

    boiei... se estado não esta no loop não seria o caso coloca-lo... explica como essa bagaça ai funciona.. (ou como deveria^^)..
  6. seria pedir d+ pra depositar R$ 100,00 na minha conta??? ta ai: de outra forma... http://www.portalmaracaju.com.br/blog/arti...=76&blog=14
  7. bom vamos lá... 2 coisas que sempre faço quando to criando algumas coisa. 1- faco no papel como tudo funciona... isso te guia na programação e não deixa esquecer itens que posteriormente gerem erros... (pra não perde tempo fazendo uma coisa, e depois refazendo porque não ficou legal como deveria ficar). 2- manter um rigoroso uso de funções (asp / JS) em formulários, que evitam os erros mais comuns de usuários... (digitar itens errados.. [aspas, virgulas em lugar de pontos e coisas do tipo] e não preencher outros [idiota isso mais as vezes você esquece e pra frente da pauuu..] ).. basicamente é isso... faço os teste básicos... (óbvio que nunca da erro... incrivel)... passo pro cliente e peço para que ele teste tudo novamente... e de o ok da coisa... com certeza com isso você evitar ter que pegar uma base com 30k de registros e ter de alterar os dados... porque seu formulario tinha um erro e o cara que digito tava loko pra toma cerveja no dia.... kkk
  8. essa eu num enetendi... explica melhor seu raciocinio ai.... eu escuto fm aqui pela web.... se aperto esc o player da stop... mais é normal... nada de script..
  9. bareta

    Select

    no list box use if... <Select name="xxx"> <% if xxx=xxx then zz="selected" else zz=false end if %> <option value="xx" <%=zz%>>xxx</option> </select>
  10. bareta

    Ajuda com calendario

    bom vamos por partes... 1- você acusa um problema no inicio do tópico e sua duvida no final tem nada a ver... 2- podia ter pego um calendario escrito de forma mais simplificada... você já entendeu como funciona esse código??? a resolução é simples... você faz um select no momento em que ele escreve o dia... procurando por aquela data no banco... se tiver faz link se não só escreve o dia
  11. bareta

    Visualizar imagens do BD

    use a buscado fórum que você encontra esse código...
  12. verifique a existência de um componente d upload no server e faça upload via este componente... isso ira te poupar tempo e dor de cabeça.
  13. bom e vista desta série de problemas que temos, (na boa, para e observa qual o problema que mais da nojo e acontece com mais frequência em qualquer código que você faz... R: <b>DATAS</b>). bom cansado de passar raiva com servidores americanos, formatos diferenciados de bancos e sessions.licd=xxx adotei uma técnica que consiste no uso de 3 colunas no banco... dia - mes - ano muito melhor... sua sql fica um pouco maior... mais te ajuda a resplver esses problemas.... exemplo buscar registros com datas entre 1/01/2008 e 31/12/2008.. data_i=cdate("01/01/2008") data_f=cdate("31/12/2008") sql="select * from tabela where dia>day(data_i) and dia<day(data_f) and mes>month(data_i) and mes<month(data_f) and ano>year(data_i) and ano<year(data_f) order by ano desc,mes desc,dia desc"
  14. bareta

    Flash +ASP

    repetido.... fechando.
  15. bareta

    Dados de um mes

    para isso funcionar o nome da tabela teria de ser um numero de 1 a 12 poi ficaria data=25/12/2008 (feliz natal a propósito) select * from suatabela where 12=12 o certo com um campo chamado data select * from suatabela where data=month(date())
  16. o problema do dream nem é tanto isso... se nego não sabe bulhufas de asp e aprende a fazer o dreamweaver inserir código... acha que vai rola tudo certo.... mais esse programa é burro... insere os blocos de código em lugar errado... mó noiado... jkkkkkk uso ele só pra colorir meus códigos e autopreencher o q to digitando.
  17. bareta

    Exercicio Urgente - Asp

    siga o exemplo do primeiro post crie exercicios que executem todas as rotinas básicas do asp.... não tem segredo...
  18. faz um teste ai e avisa <%@ LANGUAGE="VBSCRIPT"%> <% strIP = Request.ServerVariables("REMOTE_ADDR") strMac = GetMACAddress(strIP) strHost = Request.ServerVariables("REMOTE_HOST") function GetMACAddress(strIP) Set net = Server.CreateObject("wscript.network") Set sh = Server.CreateObject("wscript.shell") sh.run "%comspec% /c nbtstat -A " & strIP & " > c:\" & strIP & ".txt",0,true Set sh = nothing Set fso = createobject("scripting.filesystemobject") Set ts = fso.opentextfile("c:\" & strIP & ".txt") macaddress = null Do While Not ts.AtEndOfStream data = ucase(trim(ts.readline)) if instr(data,"MAC ADDRESS") Then macaddress = trim(split(data,"=")(1)) Exit Do End if loop ts.close Set ts = nothing fso.deletefile "c:\" & strIP & ".txt" Set fso = nothing GetMACAddress = macaddress End function %> <HTML> <HEAD> <TITLE>Say Hello To the MAC MAN</TITLE> </HEAD> <BODY> <%Response.Write("Your IP is : " & strIP & "<BR>" & vbcrlf)%> <%Response.Write("Your MAC is : " & strMac & vbcrlf)%> </BODY> </HTML>
  19. bareta

    Envio por Smtp

    so faezr uma busca no fórum eu postei vários exemplos aqui já.
  20. bareta

    Bloqueio

    vamos lá.... um ip sempre vai ser: 000.000.000.000 então..... usei uma tabela no banco com 4 colunas... ip0|ip1|ip2|ip3 function ipblock(ip) ipblock=true ipb=split(ip,".") sql="select * from ipblock order by id" set rs=conn.execute(sql) if rs.eof then ipblock=false else Do While Not rs.EOF for i=lbound(ipb) to ubound(ipb) if ipb(i)=rs("ip"&(i)) then ipblock=true else ipblock=false end if if ipblock=true then exit for loop if ipblock=true then exit Do rs.movenext wend end if rs.close set rs=nothing end function usando if ipblock("189.96.146.42")=true then response.write "sorry ^^" else response.write "lets gooo kid" end if basicamente isso...
  21. cdonts é islusão.... ele envia uma menfagem que nunca ira chegar... se você já rodou um script que mostra os componentes instalados... a idéia mais inteligente é rodar um dos códigos que ele mostrou ativo o resto é da soco em ponta de faca, por isso uso um script que contem 5 componentes diferentes que são os principais usados... o server sempre vai rodar um deles.... tenta ai... <% Set Mailer = Server.CreateObject("SMTPsvg.Mailer") Mailer.FromName = "Meu Nome" Mailer.FromAddress= "eu@dominio.com.br" Mailer.RemoteHost = "smtp2.locaweb.com.br" Mailer.AddRecipient "João da Silva", "joao@provedor.com.br" Mailer.ContentType = "text/html" ' formatação html Mailer.Subject = "Seu pedido foi recebido" Mailer.BodyText = "Prezado João, seu pedido será entregue em breve, obrigado pela visita." If Mailer.SendMail Then Response.Write "Mensagem enviada com sucesso" Else Response.Write "Erro " & Mailer.Response End If %>
  22. bareta

    (Resolvido) video

    obviamente.... se mapa é uma varivael você não pode difinila no replace como texto... o certo seria: mapa=replace(mapa,"height=""344""","height=""456""")
  23. bareta

    Problemas no Upload

    só um comentario... hj em dia creio que sistemas binários serão cada vez mais bloqueados... então esses códigos sem componentes são um pouco inviaveis de utilizar...
  24. bareta

    Help Desk

    fala a real pro cêis.... kkkk eu usei o web suporte alguma coisa... q era free.. tive que fazer correções pra tornalo util... muito tempo tentando entender coisas dos outros.. perca de tempo... hj to meio revoltado... sahuidashdisa... mano porque você não monta um help desk... bd acess + um cadinhu de código + cadinho de ajax e foi onti... o mais dificil é so estruturar as idéias pra coisa fica legal....
×
×
  • Criar Novo...