Ir ao conteúdo
  • Cadastre-se

edsonglima

Membro Júnior
  • Total de itens

    4
  • Registro em

  • Última visita

  • Qualificações

    0%
  1. Public Sub PEntradaSaidaProdutos() Dim intEntradaSaida As Integer Using Con As SqlConnection = getconnectionSqlServer() Try Con.Open() Dim sql As String = "UPDATE EntradaSaida SET Qtd Minimo? WHERE Codigo" & TxtCodigo.Text 'Dim cmd As SqlCommand = New SqlCommand(sql, Con) intEntradaSaida = Val(TxtEstoqueMinimo.Text) + Val(TxtEntradaSaidaProdutos.Text) cmd.Parameters.Add(SqlDataReader("@Qtd Minimo", intEntradaSaida)) cmd.ExecuteNonQuery() Catch ex As Exc
  2. estou fazendo testes no Dev-pascal e no Pascalzim, tem dado mais erros no pascalzim
  3. o comando rewrite não cria o arquivo, diz arquivo não encontrado, pode me ajudar a entender o porque?
  4. Estou tentando aprender pascal, e tentando fazer um exercício que vi na internet sempre ocorre erro, alguém pode me ajudar, segue o exercício abaixo. Program Cadastro_Cliente_arquivo_texto ; uses crt; const path = 'C\temp\banco_dados.text; type cadastro = record nome:string[50]; sexo:string[20]; endereco:string[50]; complemento:string[50]; bairro:string[50]; cidade:string[50]; telefones:array[1..2] of string; datacadastro:string[50]; observacao:string[200]; end; arq_text = file of cadastro;

Sobre o Clube do Hardware

No ar desde 1996, o Clube do Hardware é uma das maiores, mais antigas e mais respeitadas comunidades sobre tecnologia do Brasil. Leia mais

Direitos autorais

Não permitimos a cópia ou reprodução do conteúdo do nosso site, fórum, newsletters e redes sociais, mesmo citando-se a fonte. Leia mais

×
×
  • Criar novo...

Aprenda a ler resistores e capacitores

EBOOK GRÁTIS!

CLIQUE AQUI E BAIXE AGORA MESMO!