Ir para conteúdo
Fórum Script Brasil

cyberalexxx

Membros
  • Total de itens

    2.500
  • Registro em

  • Última visita

Posts postados por cyberalexxx

  1. ph34r.gif

    Olá, gostaria muito de saber como utlizar esse esquema de código de barras,

    por exemplo, o que eu preciso para gerar um código de barra padrão 39...

    eu preciso dos códigos numéricos, para gerar o de barras?

    Sim, voce precisa dos numeros!!

    no caso de boletos é só pedir pro banco o manual de cobrança, que tem as informações necessárias para geração da representação numérica do código de barras (linha digitavel)

  2. exemplo:

    <%
    response.write "<table><tr>"
    x = 1
    Do while not rsbanco.eof
       response.write "<td>"
       response.write rsbanco("modelo") & "<br>"
       response.write rsbanco("cor")
       response.write "</td>"
      if x mod 4 = 0 then
         response.write "</tr><tr>"
      end if
      x=x+1
      rsbanco.movenext
    loop
    response.write "</tr></table>"
    %>
    

  3. cara já resolveu?! Se já essa fica só pra constar =)

    Eu alteraria a consulta para:

    SELECT * FROM produtos WHERE lancamento <> 'sim' order by rnd(<campo chave da tabela>);

    o resto fica igual....

    já ouvi comentários que o uso do rnd sem um randomize gera sempre o mesmo resultado, não sei se é verdade pois nunca testei, eu uso mysql então faço o sorteio através de order by rand()

  4. faz uma função:

    function formata(numero)
       temp = replace(numero,",",";")
       temp = replace(temp,".",",")
       temp = replace(temp,";",".")
       formata = temp
    end function
    
    a = "1.234,56"
    response.write formata(a) 'output = 1,234.56
    
    

  5. Pessoal quanto a impressão esta ok agora, era uma coisinha besta de falta de atenção mesmo, agora outra dúvida surge, para fazer um download deste resultado mostrado no browser para um arquivo XLS é muito difícil?

    tenta assim:

  6. seguinte quando mudo um valor no campo txtcodpedido o sistema executa o seguinte script:

    Dim rsgrid As New ADODB.Recordset
    dataitens.ConnectionString = conecta 'string definida na abertura do formulário
    dataitens.RecordSource = "Select descricao, quantidade, preco_venda, total from itenspedido where codpedido=" & txtcodpedido.text
    Set griditens.DataSource = dataitens
    

    quando faço isso a primeira vez com o grid zerado funciona.

    Se eu alterar o valor do campo txtcodpedido novamente ele não atualiza o grid.

    Alguém tem alguma idéia de como fazer isso??

  7. Tenho um botão em um formulário que abre um novo formulário com um DataGrid, tem como eu escolher uma opção no DataGrid (clique duplo) e pegar uma informação do DataGrid e jogar em um Text do Formulário anterior???

  8. fiz um exemplo de edição de arquivos txt com ASP, é bem simples (ta meio corrido aki pra mim) serve apenas como lógica, mais da pra incrementar bem:

    <%
    Set FSO = Server.CreateObject("Scripting.FileSystemObject")
    
    if request("botao") = "gravar" then
       novotexto = request("texto")
       Set novoarquivo = FSO.OpenTextFile("c:\teste\texto.txt",2)
       novoarquivo.Write(novotexto)
       novoarquivo.close
    end if
    
    Set arquivo = FSO.OpenTextFile("c:\teste\texto.txt",1)
    Response.Write "Conteudo do arquivo<BR>"
    textorecuperado = arquivo.Readall
    
    Response.Write "<Form action='" & request.servervariables("script_name") & "'>"
       Response.Write "<textarea lines=10 rows='20' cols='60' name='texto'>" & textorecuperado & "</textarea><br>"
       Response.Write "<input type=submit name='botao' value='gravar'>"
    Response.Write "</form>"
    
    arquivo.close
    Set FSO = nothing
    %>

    Detalhe: não é preciso renomear nem gerar arquivos temporários é só gravar por cima.

  9. É só mudar o content type da pagina:

    Response.ContentType = "application/msword"
    Response.AddHeader "Content-Disposition", "attachment;filename=arquivo.doc"

  10. Concordo com o Dark0.

    Acho que fazer um curso é importante para pegar lógica de programação, mais para aprender outras linguagens, nada como um PC na mão e um google na web.

    Eu mesmo esse fim de semana tava me aperfeiçoando em VB6 somente através de apostilas que achei na WEB, o unico curso q eu fiz foi programação em linguagem BASIC em 1900 e guarana com rolha.

  11. você tem alguma página com exemplo de como fazer essa comparação?

    eu não conheço nada de asp e tive q começar a tentar arrumar uma coisa q já exite,,,,

    1 - Criar na tabela de chamados um campo de respondido.

    2 - Quando responder o chamado dar um update no campo respondido colocando o valor "sim"

    3 - Na pagina que processa o valor passado via querystring (numero do chamado) modifique a instrução sql para pegar apenas os registros em q o campo respondido seja diferente de "sim":

    [/code]

×
×
  • Criar Novo...