Ir para conteúdo
Fórum Script Brasil

bolomaster

Veteranos
  • Total de itens

    827
  • Registro em

  • Última visita

Tudo que bolomaster postou

  1. bolomaster

    Como?

    você pode fazer com java script.. tenta lá ok abraços
  2. cara posta o seu para vermos e colocar já direto nele .. ok
  3. bolomaster

    Web Cam

    cara eu conheço uma forma de fazer so q usa um programa q capta a imagem da cam e envia para um pequeno script java.. tipo o que esta nesta pagina POSTO MOIRAO Clique no nome para ver bem o cara q fez isso ai eu tenho o email dele so não sei se ele vai ceder isso para você o email dele é esse ai EMail so não pode falar q você viu isso aqui comigo, na script brasil, e email dele tem na pagina .. ok abraços
  4. cara se você usa <%=%> é a mesma coisa q <% response.write%> tenta essa ai ok <td height="19" valign="top"><%=rs.fields("nomesac")%></td>
  5. ou então ok pode ser assim .. é mais complicado né
  6. cara se registra forum para ajudar a comunidade a crescer não sei se resolve: 1ª opcao. Coloque um botao na tela e em seu codigo digite PRINT; isto fara com q sua tela seja impressa. mas como acho q não é isto q você deseja, vamos a 2ª opcao: procedure TfSQL.SpeedButton1Click(Sender: TObject); var Cont : Integer; Arquivo : TextFile; Caminho : String; begin Cont := 0; screen.Cursor := crHourGlass; with fDM.ADOQrySQL do begin Caminho := InputBox('Informe o nome do arquivo', 'Nome', 'Consulta_'+FormatDateTime('YYYYMMDDhhmmss', Now)+'.txt'); if Trim(Caminho) = '' then begin Caminho := 'Consulta_'+FormatDateTime('YYYYMMDDhhmmss', Now)+'.txt'; end; try AssignFile(Arquivo, ExtractFilePath(Application.ExeName)+Caminho); except Caminho := 'Consulta_'+FormatDateTime('YYYYMMDDhhmmss', Now)+'.txt'; AssignFile(Arquivo, ExtractFilePath(Application.ExeName)+Caminho); end; Rewrite(Arquivo); //Acrescenta os nomes dos campos for Cont := 0 to FieldDefList.Count - 1 do begin Write(Arquivo, Fields.Fields[Cont].DisplayName, ';'); end; WriteLn(Arquivo); //Acrescenta os valores dos campos while not Eof do begin for Cont := 0 to FieldDefList.Count - 1 do begin Write(Arquivo, Fields.Fields[Cont].AsString, ';'); end; WriteLn(Arquivo); Next; end; CloseFile(Arquivo); end; screen.Cursor := crDefault; MessageDlg('Arquivo gerado com êxito!'+#13+ ExtractFilePath(Application.ExeName)+Caminho, mtInformation, [mbOK], 0); end; Este código pega o conteudo do dbgrid e envia para um arquivo TXT separado por ; Se deseja enviar para a impressora, altere o comando AssignFile(Arquivo, ExtractFilePath(Application.ExeName)+Caminho); por AssignFile(Arquivo, 'LPT1'); Assim, seus dados serao enviados para a porta LPT1, independente da impressora q estiver lá.
  7. Galera, eu programo em asp e php, se alguém quiser mexer com o design eu topo to ai para isso abraços
  8. Selmed([exameespecial]>0;[Total1Bim]+[Total2Bim]+([exameespecial]*2)/3;[Total1Bim]+[Total2Bim]) cara pelo q você me passou ficaria assim so q eu testei e não funcionou da o seguinte erro A Função Selmed indefinada na expressão como resolvo esta situação???
  9. bolomaster

    Me Ajudem Por Favor!

    cara você pode fazer assim na hora do scandisk você digita scandisk/all/surface ok vai fazer o scan completo e fazer o teste de superficie para verificar se você não ficou com nenhum bad block abraços
  10. cara no superasp eu vi um programinha para administraçao de banco de dados access online EDITOR ONLINE DE BD ACCESS pegue ai ok.. espero ter ajudado
  11. cara você vai ter que usar asp, e um servidor que hospede asp, no caso existem varios, bem a forma de fazer o envio de emails, não é dificil não .. eu te passo agora se você quiser. entra em contato comigo, mas está em asp ..ok abraços
  12. Qual o erro que ele apresenta ?????
  13. bolomaster

    Conexao Com O Bd Access

    cara você pode fazer assim colocar um campo id.. e puxar pelo id.. porque.. nunca vai existir duas ids, tipo numa pagina você colocaria isso aqui oh: e na outra pagina (VERDADOS) você colocaria assim oh: bem acho eu q funcionaria assim ok qualquer duvida posta ai novamente.. abraços
  14. Eu acho q você também pode procurar o arquivo cdonts.dll dentro da pasta system ok
  15. Kros colegas é o seguinte eu preciso sabe como eu crio a seguinte expressao no access bem eu tenho uma tabela com um campo q foi criado na consulta chamado media final, eu quero q ele faça o seguinte quando o campo recuperação for igual a 0 ele calcula apenas nota1+nota2 e quando o campo recuperação for Maior q 0 ele calcula (nota1+nota2+(recuperação*2)) / 3 entenderam. E mostre estes dados no campo media final q vou criar na hora da consulta entenderam ?? se alguém souber como por favor me ajudem se fosse em excel ficaria assim =SE(J7>0;(E7+G7+(J7*2))/3;E7+G7) mas em access eu não sei abraços
  16. cara COMO EU FAÇO PARA LISTAR OS COMPONENTES INSTALADOS NO MEU IIS ... POR EXEMPLO EU QUERO SABER SE ELE OFERECE SUPORTE AO CDONTS. E OUTROS COMPONENTES .. OK .. ABRAÇOS
  17. Ola galera, eu to com um problema eu não sei como eu faço para bordas pontilhadas ou tracejadas.. eu gostaria de criar um estilo para todos os meus campos de formulário onde eles fiquem tracejados, ou então pontilhados.. mas isso eu não sei fazer eu ate tenho um aqui mas deixa a linha normal olhem só .input { font-family: Arial, Helvetica, sans-serif; font-size: 11pt; color: #083e80; background: #CCCC99; border-right: 2px solid #94946C; border-left: 2px solid #94946C; border-top: 2px solid #94946C; border-bottom: 2px solid #94946C; }
  18. bolomaster

    Sobre Este Erro ..

    Kro colega posta o seu codigo completo, para podermos analizar a logica, e o porque está dando este erro .. ok abraços
  19. Descompilador???? Para qual finalidade você quer isso ??????
  20. Primeiro eu não sei como esta seu projeto mas seria mais ou menos isso : pergunta 1 - procedure TForm1.Abrir1Click(Sender: TObject); begin checaarquivosalvo; if (opendialog1.execute) then begin Nomearquivo := opendialog1.filename; richedit1.text := ''; richedit1.lines.loadfromfile(nomearquivo); form1.caption := 'Editor de Textos Doors - ' + nomearquivo; Extractfilename(nomearquivo); richedit1.modified := false; end; savedialog1.filename := nomearquivo; opendialog1.FileName := ''; end; 2 - você deve selecionar o savedialog1 e ir no object inspector selecione a opçao filter e la no filter você deve digitar no filter editor um nome para o filter e o filter como no exemplo Filter name | Filter Arquivo texto | *.txt Arquivos rafael | *.rmp Todos os arquivos | *.* faça este mesmo processo para opendialog1.. entendeu 3 - bem se você esta usando o fontdialog.. basta selecionar e ele muda normalmente, bem este exemplo q estou passando usa richedit e não memo, ok abraços e espero ter ajudado qualquer duvida posta ai novamente
  21. bolomaster

    Alguem Sabe Como ?

    Ola eu estou com uma duvida eu estou tentando configurar o chili soft.. para o linux . Bem eu gostaria de saber se alguém sabe se ele suporta cdonts, pois eu estou tentando e não estou conseguindo E por acaso alguém sabe como visualizar quais componentes ele da acesso ?? Eu pensei em postar isso la no forum de linux, mas achei q talvez aqui alguém já tenha trabalhado com a ferramenta .. abraços eu espero ter postado certo ... ??
  22. Kro colega você também pode usar ASP, mas é um pouquinho mais complicado mas te garanto uma coisa .. ajuda !!!!! entra ai e da uma olhadinha EXCEL1 ou EXCEL2 não sei se é exatamente isso q você quer mas quem sabe pode ajudar você
  23. Veio tem como sim, so q para isso, você vai precisar usar .. ASP, PHP ou uma outra linguagem dinamica. bem eu recomendo q você entre no forum de asp e poste sua duvida lá ok qualquer coisa é so entrar em contato abraços
×
×
  • Criar Novo...