Ir para conteúdo
Fórum Script Brasil

Pesquisar na Comunidade

Mostrando resultados para as tags ''Erro''.

  • Pesquisar por Tags

    Digite tags separadas por vírgulas
  • Pesquisar por Autor

Tipo de Conteúdo


Fóruns

  • Programação & Desenvolvimento
    • ASP
    • PHP
    • .NET
    • Java
    • C, C++
    • Delphi, Kylix
    • Lógica de Programação
    • Mobile
    • Visual Basic
    • Outras Linguagens de Programação
  • WEB
    • HTML, XHTML, CSS
    • Ajax, JavaScript, XML, DOM
    • Editores
  • Arte & Design
    • Corel Draw
    • Fireworks
    • Flash & ActionScript
    • Photoshop
    • Outros Programas de Arte e Design
  • Sistemas Operacionais
    • Microsoft Windows
    • GNU/Linux
    • Outros Sistemas Operacionais
  • Softwares, Hardwares e Redes
    • Microsoft Office
    • Softwares Livres
    • Outros Softwares
    • Hardware
    • Redes
  • Banco de Dados
    • Access
    • MySQL
    • PostgreSQL
    • SQL Server
    • Demais Bancos
  • Segurança e Malwares
    • Segurança
    • Remoção De Malwares
  • Empregos
    • Vagas Efetivas
    • Vagas para Estágios
    • Oportunidades para Freelances
  • Negócios & Oportunidades
    • Classificados & Serviços
    • Eventos
  • Geral
    • Avaliações de Trabalhos
    • Links
    • Outros Assuntos
    • Entretenimento
  • Script Brasil
    • Novidades e Anúncios Script Brasil
    • Mercado Livre / Mercado Sócios
    • Sugestões e Críticas
    • Apresentações

Encontrar resultados em...

Encontrar resultados que...


Data de Criação

  • Início

    FIM


Data de Atualização

  • Início

    FIM


Filtrar pelo número de...

Data de Registro

  • Início

    FIM


Grupo


AIM


MSN


Website URL


ICQ


Yahoo


Jabber


Skype


Location


Interests

  1. Olá gente, Sou novo no fórum, desculpe alguma coisa. Já faz um tempo que venho tentando solucionar um problema que vem me incomodando muito, à um tempo atrás meu Corel Draw estava perfeito, porém de uns meses para cá ele não consegue salvar ou exportar as ilustrações pra PDF, já tentei re-instalar, procurar novos drives instalar versões anteriores e nada deu certo, até já tentei salvar em .ai(adobe illustrator) para depois salvar como PDF mas também descobri que ele também não estava salvando corretamente esse tipo de arquivo. Quando o Corel Converte o PDF fica sempre no mesmo tamanho (um quadrado) e em branco. Para o .aí aparece uma mensagem de erro (não lembro a mensagem, mas vou postar um print). Encontrei uma solução temporária, exportar em JPG e depois converter para PDF, mas essa solução faz com que se perca a qualidade e os objetos "achatam" em uma só imagem. Meu computador é muito potente: Windows 7 Core i7 8gb de RAM 4T de HD Por favor peço a ajuda de vocês para solucionar esse problema, espero ter escrito tudo para poder ajudar a descobrir o problema. Obrigado
  2. Fala rapaziada, recentemente comprei o pacote oficial da Adobe, tudo certinho, só que apenas com o Photoshop estou tendo este problema, anexei a imagem aqui. Tento abrir o Photoshop mas não vai por nada e da esse erro, já tentei instalar versões anteriores mas não funcionou, não achei nenhuma solução até agora, alguém ai já teve esse problema?
  3. Pessoal Boa Tarde! Se alguém puder me ajudar estou utilizando rodando um sisteminha PDV em wampserver utilizando PHP 7.0.33 funciona tudo certinho mais ao realizar a impressao do cupom fiscal ele não apresentar a descricao do produto. segue abaixo o codigo que esta apresentando o erro <?php $tax_summary = array(); foreach ($rows as $row) { echo '<tr><td class="text-left">' . product_name($row->product_name) . '</td>'; echo '<td class="text-center">' . $this->tec->formatNumber($row->quantity) . '</td>'; echo '<td class="text-right">'; if ($inv->total_discount != 0) { $price_with_discount = $this->tec->formatMoney($row->net_unit_price + $this->tec->formatDecimal($row->item_discount / $row->quantity)); $pr_tax = $row->tax_method ? $this->tec->formatDecimal((($price_with_discount) * $row->tax) / 100) : $this->tec->formatDecimal((($price_with_discount) * $row->tax) / (100 + $row->tax)); echo '<del>' . $this->tec->formatMoney($price_with_discount+$pr_tax) . '</del> '; } echo $this->tec->formatMoney($row->net_unit_price + ($row->item_tax / $row->quantity)) . '</td><td class="text-right">' . $this->tec->formatMoney($row->subtotal) . '</td></tr>'; } ?>
  4. Olá senhores! Eu trabalho como afiliado, e preciso clonar uma página de vendas de um produto digital para usar na minha estrutura própria. Eu clonei a página, e descobri que o site era feito no wordpress / elementor. Funcionou perfeitamente, porém todos os links fazem referência ao site original, como imagens, css, scripts e outros. Porém seria mais interessante que o arquivo index puxasse todas essas referências direto dos diretórios locais, para manter a organização e evitar problemas futuros. Pensando nisso eu removi o endereço do site original das referências, mas quando eu faço isso o site quebra, e não faz sentido sendo que os arquivos referenciados existem nos diretórios locais. Por exemplo, uma referencia que teria: <link rel='stylesheet' id='hello-elementor-css' href='https://nome-do-site.com/wp-content/themes/hello-elementor/style.min.css?ver=2.6.1' media='all' /> Sabendo que os diretórios e os arquivos referenciados existem no diretório local, eu removo https://nome-do-site.com porém não funciona e o site quebra. Por favor, há algum detalhe que eu não percebi, ou teria alguma outra forma de resolver esse problema? Não estou conseguindo achar uma solução por conta própria, e agradeço qualquer ajuda.
  5. Boa noite quando executo o código aparece a 1 pergunta (Nome do neto) e a aplicação simplesmente da erro 0xC0000005 e fecha. Erro Já revi o código várias vezes e não consigo encontrar o erro. Alguém me pode ajudar por favor ? ( Sou novo em programação). #include <stdio.h> #include <locale.h> #include <stdlib.h> int main (){ setlocale(LC_ALL, ""); int nomedoneto, nomedoavoM1, nomedaavoP1, nomedoavoM2, nomedaavoP2; //nome do neto e dos 4 avós. int idadedoneto, idadedoavoM1, idadedaavoP1, idadedoavoM2, idadedaavoP2; //idade do neto e dos 4 avós. printf("O nome do neto é: \n"); scanf("%s", nomedoneto); printf("A idade do neto é: \n"); scanf("%d", &idadedoneto); printf("O nome do avôM1 é: \n"); scanf("%s", nomedoavoM1); printf("A idade do avôM1 é: \n"); scanf("%d", &idadedoavoM2); printf("O nome do avôM2 é: \n"); scanf("%s", nomedoavoM2); printf("A idade do avôM2 é: \n"); scanf ("%d", &idadedoavoM2); printf("O nome da avóP1 é: \n"); scanf ("%s", nomedaavoP1); printf("A idade da avôP1 é: \n"); scanf ("%d", &idadedaavoP1); printf("O nome da avóP2 é: \n"); scanf ("%s", nomedaavoP2); printf("A idade da avóP2 é: \n"); scanf ("%d", &idadedaavoP2); int diferencadaidade1 = idadedoavoM1 - idadedoneto; int diferencadaidade2 = idadedoavoM2 - idadedoneto; int diferencaidade3 = idadedaavoP1 - idadedoneto; int diferencadaidade4 = idadedaavoP2 - idadedoneto; printf("A diferença da idade do neto e da sua avó materna é: %d \n, com o seu avô materno é de: %d \n, com a sua avó paterna é: %d \n e com o seu avô paterno é de: %d \n "); return 0; }
  6. Olá. Eu estou começando agora a programar e estava tentando executar um código para a reprodução de áudio pelo VSCode a partir da biblioteca pygame usando Python. Eu copiei o arquivo de áudio para a mesma pasta onde está salvo o arquivo do código, mas continua me devolvendo erro e eu não sei o que fazer já que este era supostamente um código simples(kk). No caso estou usando o linux Lite. Erro: /bin/python3.9 "/home/samuel/Desktop/programmer/python/exercicios python curso em vídeo/21-playSound.py" Traceback (most recent call last): File "/home/samuel/Desktop/programmer/python/exercicios python curso em vídeo/21-playSound.py", line 1, in <module> import pygame File "/usr/lib/python3/dist-packages/pygame/__init__.py", line 120, in <module> from pygame.base import * ModuleNotFoundError: No module named 'pygame.base' código: import pygame pygame.mixer.init() pygame.init() pygame.mixer.music.load('som.wav') pygame.mixer.music.play(loops=0,start=0.0) pygame.event.wait()
  7. Bom dia! Como resolvo: Escreva um programa que calcula a área de um retângulo. O programa deve pedir ao usuário que entre com a altura e a largura do retângulo. Em seguida deve imprimir uma mensagem com a resposta. Tentei fazer assim: altura_retangulo = input ("Entre com a altura do retângulo") largura_retangulo = input ("Entre com a largura do retangulo") area_retangulo = (altura_retangulo * altura_retangulo) print(area_retangulo) Só que dá erro. Vocês podem me ajudar? Obrigado!
  8. Olá pessoal, tudo bem? Tenho uma planilha com macros para tratamento de dados e está habilitada para macros, porém, acontece um bug que ela simplesmente some com todos os códigos e não deixa salvar a plan. Aparecendo os erros abaixo e quando dou atl+F11 os módulos estão em branco. Já aconteceram 3x com planilhas diferentes. Ela funciona por um período e do Nada acontece esse erro. uso ela todos os dias para atualizar as bases de dados. Alguém já passou por um problema semelhante? Vlw, pessoal.
  9. SCRIPT: @echo off & setlocal DisableDelayedExpansion set counter=4 :senha Title %~n0 Mode 50,5 & Color 0e if %counter% equ 0 goto :senha2 set /p input="Enter Username: " set "psCommand=powershell -Command "$pword = read-host 'Enter password' -AsSecureString ; ^ $BSTR=[System.Runtime.InteropServices.Marshal]::SecureStringToBSTR($pword); ^ [System.Runtime.InteropServices.Marshal]::PtrToStringAuto($BSTR)"" for /f "usebackq delims=" %%p in (`%psCommand%`) do set password=%%p ) if %input%==joao123 ( if %password%==1234 goto :Senha4 ) goto :senha3 :senha2 echo echo Account Locked Out Timeout In 5 timeout /t 5 exit :senha3 echo, set /a counter -=1 echo. @echo on @echo off color 40 echo USERNAME OR PASSWORD INCORRETO(S) echo. if %counter% lss 4 echo %counter% tentativas restantes pause goto senha :senha4 echo Username and Passwords corretos! color 0a pause
  10. Olá! Gostaria de pedir ajuda. Quando quero fazer o rastreio de contorno de alta qualidade , na janela do meu corel draw x7 é impossível clicar no botão de ok para finalizar o processo! Como faço para conseguir?? Obrigada =D
  11. Tenho um sistema onde são cadastrados médicos e plantões, para mostrar ao cliente todos os plantões preciso fazer um join na tabela de médicos. Porém, o join está retornando com erro: todos os dados dos médicos vem certo, porém os do plantão vem um mesmo valor em todas as linhas. Acredito que seja um erro de join, pois com 2 selects os valores retornados ficam normais. Alguém pode me ajudar? (está em anexo o print de como está retornando os valores) Código: SELECT * FROM TB_PLANTOES join TB_MEDICOS on PLANT_MED_CODIGO = PLANT_CODIGO order by field(PLANT_DIA,'Domingo','Segunda','Terça','Quarta','Quinta','Sexta','Sábado');
  12. Olá pessoal, to começando a programa e me indicaram o VS Code, podem está dando erro na hora de compilar. Estou começando a programar em C, sempre que peço para o programa compilar aparece que deu erro, alguém poderia me ajudar???
  13. Olá, Quando tento executar um comando para criar uma PROCEDURE, este erro aparece: "Error Code: 1558. Column count of mysql.proc is wrong. Expected 21, found 20. Created with MariaDB 100108, now running 100411. Please use mysql_upgrade to fix this error" Pesquisei e executei este comando: sudo mysql_upgrade -u root -p Que me retornou este erro: "mysql_upgrade: Got error: 2002: Can't connect to local MySQL server through socket '/var/run/mysqld/mysqld.sock' (2) while connecting to the MySQL server. Upgrade process encountered error and will not continue." Como posso resolvê-lo? Obrigada.
  14. Bom dia, Tenho um pequeno sistema de registro de denúncias. O cadastro funciona, de boa, mas a pesquisa quando vou escolher as datas, aparece esse erro aqui: Erro em tempo de execução '-2147467259(80004005)': Erro não especificado Eis o código: Private Sub btnPesquisar_Click() Dim linhaFinal, linha, x As Integer ListBox1.Clear // o erro para aqui e não depura mais linhaFinal = Planilha1.Cells(Rows.Count, 1).End(xlUp).Row x = 0 For linha = 2 To linhaFinal If Planilha1.Cells(linha, 1).Value >= MonthView1 And Planilha1.Cells(linha, 1).Value <= MonthView2 Then ListBox1.AddItem Planilha1.Cells(linha, 1).Value ListBox1.List(x, 1) = Planilha1.Cells(linha, 2).Value ListBox1.List(x, 2) = Planilha1.Cells(linha, 3).Value ListBox1.List(x, 3) = Planilha1.Cells(linha, 4).Value ListBox1.List(x, 4) = Planilha1.Cells(linha, 5).Value x = x + 1 End If Next End Sub Porque isso acontece e o que pode ser feito? Preciso da ajuda dos colegas! Forte abraço! Resposta Rápida Resposta 1
  15. Tive um problema com arquivos em PDF, alguns dos arquivos abrem normalmente por leitores de PDF, porém ao abrir no CorelDraw ele apresenta um erro "O arquivo está danificado", mas, como comentado, o arquivo pode ser aberto por seus leitores, alguém sabe o que poderia arrumar o erro? Obrigado!
  16. #include <gtk/gtk.h> //Uma novidade que vem do c.. //Os comentarios podem ser escritos com // ou /* */ /* Esta é uma função callback. Os argumentos de dados são ignorados * neste exemplo. Mais sobre callbacks abaixo. */ static void hello( GtkWidget *widget, gpointer data ) { g_print ("Hello World\n"); } static gboolean delete_event( GtkWidget *widget, GdkEvent *event, gpointer data ) { /* Se você retornar FALSE no tratador do sinal "delete_event", * o GTK emitirá o sinal "destroy". Retornar TRUE significa * que você não quer que a janela seja destruída. * Isso é útil para exibir diálogos do tipo 'tem certeza de * que deseja sair?'. */ g_print ("evento 'delete' ocorreu\n"); /* Mude TRUE para FALSE e a janela principal será destruída com um * "delete_event". */ return TRUE; } /* Outro callback */ static void destroy( GtkWidget *widget, gpointer data ) { gtk_main_quit (); } int main( int argc, char *argv[] ) { /* GtkWidget é o tipo de dado para os widgets */ GtkWidget *window; GtkWidget *button; /* Esta função é chamada em todas as aplicações GTK. Argumentos da linha * de comando são interpretados e retornados à aplicação. */ gtk_init (&argc, &argv); /* criar uma nova janela */ window = gtk_window_new (GTK_WINDOW_TOPLEVEL); /* Quando a janela recebe o sinal "delete_event" (dado pelo gerenciador * de janelas, geralmente pela opção "fechar", ou na barra de título), * nós pedimos que ela chame a função delete_event () como definido * acima. Os dado passado para a função callback é NULL e é ignorado. */ g_signal_connect (G_OBJECT (window), "delete_event", G_CALLBACK (delete_event), NULL); /* Aqui conectamos o evento "destroy" a um tratador de sinal. Esse * evento ocorre quando chamamos gtk_widget_destroy() na janela, ou * se retornamos FALSE no callback "delete_event". */ g_signal_connect (G_OBJECT (window), "destroy", G_CALLBACK (destroy), NULL); /* Ajusta a largura da borda da janela. */ gtk_container_set_border_width (GTK_CONTAINER (window), 10); //Coloca um nome na janela gtk_window_set_title (GTK_WINDOW (window), "Aqui o nome da Janela"); /* Cria um novo botão com o texto "Hello World". */ button = gtk_button_new_with_label ("Hello World"); /* Quando o botão recebe o sinal "clicked", chamará a função hello() * passando NULL como argumento. hello() é definida acima. */ g_signal_connect (G_OBJECT (button), "clicked", G_CALLBACK (hello), NULL); /* Isso fará com que a janela será destruída pela chamada * gtk_widget_destroy(window) quando o botão for clicado ("clicked"). * Novamente, o sinal destroy poderia vir daqui ou do gerenciador * de janelas. */ g_signal_connect_swapped (G_OBJECT (button), "clicked", G_CALLBACK (gtk_widget_destroy), G_OBJECT (window)); /* Isto empacota o botão na janela (um recipiente gtk). */ gtk_container_add (GTK_CONTAINER (window), button); /* O passo final é exibir o widget recém-criado. */ gtk_widget_show (button); /* e a janela */ gtk_widget_show (window); /* Toda aplicação GTK deve ter uma chamada gtk_main(). O controle * termina aqui e espera por um evento (como um apertamento de tecla * ou evento do mouse). */ gtk_main (); return 0; }
  17. escrevi este código ele apresenta um erro quando tento compilar // DuasBolas.java public class DuasBolas { public static void main(String args[]) { // Instanciando um objeto DuasBolas bola1 = new DuasBolas(); //Armazenando valores nos atributos do objeto bola1.raio = 0.34f; bola1.oca = false; bola1.cor = 10; bola1.material= 33; // Instanciando um outro objeto DuasBolas bola2 = new DuasBolas(); // Armazenando valores nos atributos do outro objeto bola2.oca = true; bola2.material = bola1.material; // Usando valores armazenado bola2.raio = 5 * bola1.raio; bola2.material = bola1.cor+1; System.out.println("Bola1 : "); System.out.println(" raio = " + bola1.raio ); System.out.println(" oca = " + bola1.oca ); System.out.println(" cor = " + bola1.cor ); System.out.println("Bola2 : "); System.out.println(" raio = " + bola2.raio ); System.out.println(" oca = " + bola2.oca ); System.out.println(" cor = " + bola2.cor ); } } este é o erro .\DuasBolas.java:8: error: cannot find symbol bola1.raio = 0.34f; ^ symbol: variable raio location: variable bola1 of type DuasBolas .\DuasBolas.java:9: error: cannot find symbol bola1.oca = false; ^ symbol: variable oca location: variable bola1 of type DuasBolas .\DuasBolas.java:10: error: cannot find symbol bola1.cor = 10; ^ symbol: variable cor location: variable bola1 of type DuasBolas .\DuasBolas.java:11: error: cannot find symbol bola1.material= 33; ^ symbol: variable material location: variable bola1 of type DuasBolas .\DuasBolas.java:15: error: cannot find symbol bola2.oca = true; ^ symbol: variable oca location: variable bola2 of type DuasBolas .\DuasBolas.java:16: error: cannot find symbol bola2.material = bola1.material; ^ symbol: variable material location: variable bola2 of type DuasBolas .\DuasBolas.java:16: error: cannot find symbol bola2.material = bola1.material; ^ symbol: variable material location: variable bola1 of type DuasBolas .\DuasBolas.java:18: error: cannot find symbol bola2.raio = 5 * bola1.raio; ^ symbol: variable raio location: variable bola2 of type DuasBolas .\DuasBolas.java:18: error: cannot find symbol bola2.raio = 5 * bola1.raio; ^ symbol: variable raio location: variable bola1 of type DuasBolas .\DuasBolas.java:19: error: cannot find symbol bola2.material = bola1.cor+1; ^ symbol: variable material location: variable bola2 of type DuasBolas .\DuasBolas.java:19: error: cannot find symbol bola2.material = bola1.cor+1; ^ symbol: variable cor location: variable bola1 of type DuasBolas .\DuasBolas.java:21: error: cannot find symbol System.out.println(" raio = " + bola1.raio ); ^ symbol: variable raio location: variable bola1 of type DuasBolas .\DuasBolas.java:22: error: cannot find symbol System.out.println(" oca = " + bola1.oca ); ^ symbol: variable oca location: variable bola1 of type DuasBolas .\DuasBolas.java:23: error: cannot find symbol System.out.println(" cor = " + bola1.cor ); ^ symbol: variable cor location: variable bola1 of type DuasBolas .\DuasBolas.java:25: error: cannot find symbol System.out.println(" raio = " + bola2.raio ); ^ symbol: variable raio location: variable bola2 of type DuasBolas .\DuasBolas.java:26: error: cannot find symbol System.out.println(" oca = " + bola2.oca ); ^ symbol: variable oca location: variable bola2 of type DuasBolas .\DuasBolas.java:27: error: cannot find symbol System.out.println(" cor = " + bola2.cor ); ^ symbol: variable cor location: variable bola2 of type DuasBolas 17 errors error: compilation failed Poderiam me ajudar? já fiz de td e não consegui resolver
  18. Bom dia pessoal. Estou com um problema na hora da execução de um programa simples que fiz durante meu estudo sobre "structs". Simplesmente o programa não faz a leitura correta das letras que possuem acento. #include<stdio.h> #include<stdlib.h> #include<locale.h> main() { setlocale(LC_ALL,"portuguese"); struct dados { char name[40], disciplina[30]; float nota1, nota2; } aluno; printf("\n\t\t\t\t------------ Cadastro de Aluno ------------\n"); printf("\nInsira seu nome....: "); fflush(stdin); fgets(aluno.name, 40, stdin); printf("\n\nDisciplina.........: "); fflush(stdin); fgets(aluno.disciplina, 30, stdin); printf("\n\nInsira a 1° nota...: "); scanf("%f",&aluno.nota1); printf("\n\nInsira a 2° nota...: "); scanf("%f",&aluno.nota2); printf("\n\n"); printf("\n\t\t\t\t------------ Lendo dados inseridos ------------\n"); printf("\nNome...........: %s\n", aluno.name); printf("Disciplina.....: %s\n", aluno.disciplina); printf("Nota 1.........: %.2f\n", aluno.nota1); printf("Nota 2.........: %.2f\n", aluno.nota2); return 0; }
  19. Boa tarde pessoal do Forum, Vou explicar primeiro a cituação: tenho minha index que dentro dela tenho um FORM que envia a informação digitada em um campo text para minha pagina php "ex.php", nesta pagina eu pego o conteudo digitado e trato ele para uma busca no diretória para realizar o download de um arquivo. Até ai tudo funcionando as mil maravilhas só que caso o arquivo não exista eu criei um ELSE com o seguinte código: header("Location: ".$_SERVER['HTTP_REFERER'].""); Oque faz o usuario retornar a pagina anterior onde foi preenchido o FORM, ok porem eu queria caso não encontrar o arquivo mostar ao usuário a janela de alerta. Tentei a seguinte maneira: else{ echo "<script>alert('Janela de Alerta.');</script>"; header("Location: ".$_SERVER['HTTP_REFERER'].""); } Porem a pagina parece que ignora o alerta e já retorna executando só o HEADER. Caso eu coloque só o aviso funciona porem eu fico na pagina "ex.php" ao invés de retornar para a pagina inicial. alguém pode me ajudar a resolver isto?. Estou longe de ter um bom conhecimento em PHP porem creio que estou muito perto ou totalmente longe rs
  20. Boa tarde! 😀 Estou utilizando um código VBA para consolidação de planilhas afim de enviar um relatório semanal. Preciso de ajuda pois o código está buscando os dados certos, porém eu não preciso que me retorne a planilha inteira e sim apenas da A6 até a coluna E6 em todas as planilhas, e apenas os dados contidos, não precisa vim a formatação original pois se preciso for, formato depois do jeito que eu precisar. Tentei usar o Offset mas está dando erro "tempo de execução 9". Em anexo coloquei o print do modelo da planilha que será consolidada. Código Utilizado: Option Explicit Private Sub btExecuta_Click() Application.ScreenUpdating = False 'Definição das variáveis '-------------------------------------- Dim W As Worksheet Dim WNew As Workbook Dim ArqParaAbrir As Variant Dim A As Integer Dim NomeArquivo As String 'Capturar arquivos para tratamento '--------------------------------------- ArqParaAbrir = Application.GetOpenFilename("Arquivo do Excel (*.xlsm), *.xl*", _ Title:="Escolha o arquivo a ser importado", _ MultiSelect:=True) If Not IsArray(ArqParaAbrir) Then If ArqParaAbrir = "" Or ArqParaAbrir = False Then MsgBox "Processo abortado, nenhum arquivo escolhido", vbOKOnly, "Processo abortado" Exit Sub End If End If 'Começa a importação dos dados '------------------------------------- Set W = Sheets("CONSOLIDADO") W.UsedRange.EntireColumn.Delete W.Select 'Loop para importação dos arquivos '-------------------------------------- For A = LBound(ArqParaAbrir) To UBound(ArqParaAbrir) NomeArquivo = ArqParaAbrir(A) Application.Workbooks.Open (NomeArquivo) Set WNew = ActiveWorkbook ActiveSheet.Range("a6").CurrentRegion.Select Selection.Copy Destination:=W.Cells(W.Rows.Count, 1).End(xlUp).Offset(1, 0) Application.DisplayAlerts = False ActiveWorkbook.Close savechanges:=False Application.DisplayAlerts = True W.Cells(W.Rows.Count, 1).End(xlUp).Offset(1, 0).Select Next A Application.ScreenUpdating = True MsgBox "Processo concluído. Arquivos copiados..." End Sub **** Desde já agradeço.
  21. E AI MEU POVO, GOSTARIA DE UMA AJUDINHA, TENHO ESSE SISTEMA DE CADASTRO QUE LÉ OS DADOS, ARMAZENA NAS LINHAS DA MATRIZ E DEPOIS IMPRIME NA TELA O CADASTRO, EU GOSTARIA DE SABER COMO FAÇO PRA REMOVER O ÍNDICE ESPECIFICADO PELO USUÁRIO, É O CÓDIGO VERIFICAR SE O O ÍNDICE DIGITADO PELO USUÁRIO EXISTE, E SE EXISTIR, GOSTARIA QUE ELE EXCLUÍSSE OS DADOS DESSE ÍNDICE, E OS ÍNDICES POSTERIORES RETROCEDESSEM, DESDE JÁ OBRIGADO! #include <stdio.h> #include <stdlib.h> #include <string.h> #define SIZE 100 void cadastro(); void pesquisa(); void lista(); void remover(); char nome[SIZE][50]; char email[SIZE][50]; int cpf[SIZE]; char op; int op2; int main(void) { int r; do{ system("cls"); printf("\n====MENU=====\n"); printf("1 - CADASTRO\n"); printf("2 - LISTAR TODOS\n"); printf("3 - PESQUISAR\n"); printf("4 - EXCLUIR\n"); printf("5 - SAIR\n"); scanf(" %c", &op); switch(op){ case '1': cadastro(); break; case '2': lista(); system("pause"); break; case '3': pesquisa(); break; case '4': remover(); break; default: printf("\nOpcao invalida\n"); system("pause"); break; } }while(op>4); } void remover(){ int posicao; int i; lista(); printf("\nCodigo Para remover: "); scanf("%d", &posicao); for(i=0; i<SIZE; i++){ if(posicao == nome[i]){ printf("\nAluno excluido!\n"); system("pause"); }else{ break; } i--; } } /*FUNCAO PARA IMPRIMIR OS CADASTROS*/ void lista(){ int i; for(i=0; i<SIZE; i++){ if(cpf[i]>0){ printf("\nCodigo: %d", i+1); printf("\nNome: %s", nome[i]); printf("\nEmail: %s", email[i]); printf("\nCPF: %d", cpf[i]); printf("\n++++++++++++++++++++++\n"); }else{ break; } } } /*FUNCAO DE CADASTRO*/ void cadastro(){ static int linha; do{ printf("\nDigite o nome: "); scanf("%s", &nome[linha]); printf("\nDigite o email: "); scanf("%s", &email[linha]); printf("\nDigite o CPF: "); scanf("%d", &cpf[linha]); linha++; printf("\n1 - continuar \tSAIR - Qualquer tecla"); scanf("%d", &op2); }while(op==1); } /*FUNCAO PARA PESQUISAR O USUARIO já CADASTRADO*/ void pesquisa(){ int cpfPesquisa; char emailPesquisa[50]; char nomePesquisa[50]; int i; do{ printf("\nl - CPF: "); printf("\n2 - EMAIL: "); printf("\n3 - NOME: "); scanf(" %c", &op); switch(op){ case '1': printf("Digite o CPF: "); scanf("%d", &cpfPesquisa); for(i=0; i<SIZE; i++){ if(cpf[i] == cpfPesquisa){ printf("\nNome: %s", nome[i]); printf("\nEmail: %s", email[i]); printf("\nCPF: %d", cpf[i]); }else{ printf("\nNao a cadastro com esse CPF\n"); system("pause"); } } break; case '2': printf("Digite o seu email: "); scanf("%s", emailPesquisa); for(i=0; i<SIZE; i++){ if(strcmp(email[i], emailPesquisa) == 0){ printf("\nNome: %s", nome[i]); printf("\nEmail: %s", email[i]); printf("\nCPF: %d", cpf[i]); }else{ printf("\nNao a cadastro com esse Email\n"); system("pause"); } } break; case '3': printf("digite o nome: "); scanf("%s", &nomePesquisa); for(i=0; i<SIZE; i++){ if(strcmp(nome[i], nomePesquisa) == 0){ printf("\nNome: %s", nome[i]); printf("\nEmail: %s", email[i]); printf("\nCPF: %d", cpf[i]); }else{ printf("\nNao a cadastro com esse Nome\n"); system("pause"); } } break; default: printf("\n Valor invalido"); system("pause"); pesquisa(); break; } printf("\n1 - continuar \tSAIR - Qualquer tecla"); scanf("%d", &op2); }while(op==1); }
  22. Bom dia pessoal, tudo bem? Então galera meu professor pediu para a gente desenvolver um programa em C que encontre todos os pares de números amigos entre 1 e 1.000 (Para aqueles que não sabem oque é um numero amigo basta acessar esse link https://pt.wikipedia.org/wiki/Número_amigo). Então eu desenvolvi o programa mas não esta dando o resultado esperado já que de 1 a 1.000 os únicos pares de números amigos existente é 220 e 284 e não são esses números que estão sendo imprimidos na tela. Enfim vou colar meu código aqui e gostaria que vocês me ajudassem a identificar onde esta o meu erro e corrigi-lo :) ------------------------------------------------------------------------------------------------------------------------------------------------ CÓDIGO --------------------------------------------------------------------------------------------------------------------------------------------------- #include <stdio.h> int main () { int n1, divisor, r, soma1 = 0, somareal; int n2, divisor2, r2, soma2 = 0,somareal2; for (n1 = 1, n2 = 1; n1 <= 1000; n1++, n2++) { for (divisor = 1, divisor2 = 1; divisor <= 1000; divisor++, divisor2++) { if (n1 % divisor == 0) { r = n1 / divisor; soma1 += divisor; //printf("\nN1 = %d\t DIVISOR = %d\t N1 / DIVISOR = %d\n",n1, divisor, r); } if (n2 % divisor2 == 0) { r2 = n2 / divisor2; soma2 +=divisor2; //printf("\nN2 = %d\t DIVISOR2 = %d\t N2 / DIVISOR2 = %d SOMA = %d\n",n2, divisor2, r2, soma2); } } somareal = soma1 - n1; somareal2 = soma2 - n2; //printf("\nSOMA: %d\n",somareal); //printf("SOMA2: %d\n",somareal2); if (n1 == somareal2 && n2 == somareal) { printf("N1 %d e SOMA2 %d ",n1,somareal2); printf("N2 %d e SOMA %d são NUMEROS AMIGOS!\n",n2,somareal); } //printf("\n--------------------------------------------\n"); soma1 = 0; soma2 = 0; } return 0; } ----------------------------------------------------------------------------------------------------------------------------------------- FIM DO CÓDIGO----------------------------------------------------------------------------------------------------------------------------------------------- Obrigada pessoal!
  23. Boa noite pessoal! sou novo no mundo da programação e estou com um problema que não sei como resolver. Eu uso o Dreamweaver para minhas edições e não tenho do que reclamar do editor porém, ao começar os estudos de jQuery e Bootstrap, o DW encontra erros nas bibliotecas tanto do jQuery quanto do Bootstrap. Já procurei em muitos lugares e não consegui resolver.
  24. Olá, sou iniciante em programação e tenho uma atividade para fazer. Uma das questões é sobre notas e médias, logo, pensei em usar vetores. O programa roda normalmente até sair do For. Depois que ele sai, ele quebra nos If e else (PS.: eu coloquei um scanf qualquer antes do if e foi normal). Obs: utilizo o CodeBlocks. Segue abaixo um código que não funciona: #include <stdio.h> #include <stdlib.h> #include <string.h> int main() { int opc; char opcao; do { printf("+-------------------------------------+\n"); printf("|>>>>>>>>>>>>>>> MENU <<<<<<<<<<<<<<<<|"); printf("\n+-------------------------------------+"); printf("\n| 1 - IMC |"); printf("\n| 2 - Notas |"); printf("\n| 3 - CNH |"); printf("\n| 4 - Operacoes |"); printf("\n| 5 - Media |"); printf("\n+-------------------------------------+"); printf("\n--> "); scanf("%d", &opc); switch (opc) { case 5: char nomes[3][256]; float notas; float somas; float medias [3]; int posicao; printf("\n+-------------------------------------+\n"); printf("| MEDIA |"); printf("\n+-------------------------------------+\n"); for(int i=0; i < 3; i++) { printf("Informe o nome do %do aluno: ", (i+1)); nomes[i][256] = scanf("%s", &nomes); for(int k=0; k < 3; k++) { printf("Informe a nota %d:", (k+1)); scanf("%f", &notas); somas = (somas + notas); } medias[i] = (somas / 3); somas = 0; } if (medias[0] > medias[1] && medias[0] > medias[2]) { printf("A maior média pertence à : %s", nomes[0]); printf("A média é : %.2f", medias[0]); } else if (medias[1] > medias[0] && medias[1] > medias[2]) { printf("A maior média pertence a : %s", nomes[1]); printf("A media é : %.2f", medias[1]); } else if (medias[2] > medias[1] && medias[2] > medias[1]) { printf("A maior média pertence à : %s", nomes[2]); printf("A média é : %.2f", medias[2]); } break; } printf("\nDeseja continuar? (s/n)\n"); printf("--> "); scanf("%s", &opcao); printf("\n"); } while(opcao == 's'); system("pause"); return 0; }
  25. Olá, Gostaria de inserir uma linha a baixo do registro escolhido na combobox no meu formulário. exemplo: combobox 01 - escolhi esse aqui .... então o programa vai identificar ele na planilha de lançamento. 02 03 ... Depois e vai ver o de baixo que é diferente e vai inserir em cima do 02 uma linha para colocar a nova informação do 01. então fica assim na planilha somente. 01 01 - novo registro 02 03 Vou deixar o modelo do código: Sub opçoes1() Application.EnableEvents = False Application.ScreenUpdating = False Dim a As Long For a = 5 To 1048000 If Filial1 = Cells(a, 1) Then ' se Filial1 for igual célula na coluna 1 na linha variavel então If Filial1 <> Cells((a) + 1, 1) Then Plan1.Cells(a, 1).Select 'Seleciona a célula da plan1 na coluna 1 na linha variavel Plan3.Activate 'Ativar a célula da plan3 Plan3.Range("j1:O1").Select 'Selecionar e Carregar células da plan3 Selection.Copy 'Cópiar seleção Plan1.Activate 'Ativa plan1 Plan1.Select 'seleciona plan1 Plan1.Rows((a) + 1).Select 'selecina a variavel atual e cola abaixo 'Insere uma seleção na linha inferior Selection.Insert Shift:=xlDown 'Call Salve1 ActiveCell.Value = filial.Value 'O valor da célula ativada e igual ao valor de filial 'Call Vazio Dim Data As Date Data = Ldata1.Caption Dim ano As Double ano = Lano1.Caption ActiveCell.Offset(0, 1).Value = Filial1 ActiveCell.Offset(0, 2).Value = bancoconta ActiveCell.Offset(0, 3).Value = agenciabanco ActiveCell.Offset(0, 4).Value = ccbancoA ActiveCell.Offset(0, 5).Value = cpbancoA ActiveCell.Offset(0, 6).Value = Ldata1 ActiveCell.Offset(0, 7).Value = lblHora1 End If End If Next Application.EnableEvents = True Application.Calculation = xlCalculationAutomatic Application.ScreenUpdating = True End Sub
×
×
  • Criar Novo...