Ir para conteúdo
Fórum Script Brasil

Pesquisar na Comunidade

Mostrando resultados para as tags ''vb.net''.

  • 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. Bom dia pessoal, convertir essa função do C# para vba ele funciona perfeitamento no excel e access porem estou tentendo usar ela no vb.net editor VISUAL STUDIO 2013, aparece o erro conforme a imagem enexo, alguém consegue corrigir esse erro; Function crc_ccitt_ffff(strParam As String) As String Const CRC_POLY_CCITT As Long = &H1021& Const CRC_START_CCITT_FFFF As Long = &HFFFF& Dim crc As Long, b() As Byte, c As Long, i As Long, j As Long Dim crc_tabccitt(0 To 255) As Long For i = 0 To 255 crc = 0 c = i * 256 For j = 0 To 7 If (crc Xor c) And 32768 Then crc = (crc * 2) Xor CRC_POLY_CCITT Else crc = crc * 2 End If c = c * 2 Next j crc_tabccitt(i) = crc Next i b = strParam crc = CRC_START_CCITT_FFFF For i = 0 To UBound(b) Step 2 crc = (crc * 256) Xor crc_tabccitt(((crc \ 256) Xor b(i)) And 255) crc = ((crc \ 65536) * 65536) Xor crc Next i crc_ccitt_ffff = Hex(crc) End Function
  2. Bom Dia!!! Alguém poderia me auxiliar nesta questão: Estou precisando criar um agendamento armazenado para uma tela de agendamento, isso tenho 03 tabelas Resumindo as tabelas: TB_Clientes: id_cliente, (incrimento automático) Nome_cliente (Varchar(60)) TB_Horarios id_horario, (auto incrimente) horario, (Tempo) estatus, (varchar(15)) esse estatus recebe ('livre', ou 'ocupado') TB_agendamento id_agendamento, (auto incrimente) cod_cliente, (int) cod_horario, (int) data_agendamento, (Dados) Antes de fazer a inclusão na tb_agendamentos, preciso verificar se os dados e o horário já existem na tb_agendamentos, Se não existir a inclusão do agendamento do caso e existir a existência de campo estatus da tb_horarios para 'ocupado', existirá devo mandar uma mensagem de horário indisponível. alguém tem uma luz para mim dar?
  3. Olá pessoal, gostaria de saber como faço para pegar o caminho do arquivo que eu selecionei através do FileUpLoad. Exemplo: Selecionei, através do FileUpLoad, o arquivo em c:\Temp\Teste.xls Gostaria de guardar esse caminho c:\Temp\ mas não consigo. Alguém sabe? Uso Asp.net com Vb.Net Agradeço.
  4. Bom Dia! Pessoal, Eu estou com o seguinte problema: Eu tenho um formulário de login, neste formulário faz a consulta no banco para validar o usuário, tudo beleza, porém, ao validar, eu dou um MDI.show e no load do MDI eu coloquei frmlogin.close e ele fecha o MDI também, porque isto acontece? Pois o frmlogin mão tem vínculo nenhum com o MDI, alguém pode me ajudar? Obs: para quebrar o galho neste momento, eu coloquei um frmlogin.visible=false após ele abrir o MDI, mas sei que isto não é o correto, pois ao fechar o MDI o frmlogin permanece aberto, isto com o visual studio aberto, pois após parar de executar o projeto, o botão Iniciar da barra de ferramentas fica desabilitado e o Stop habilitado e se tentar alterar algo ele diz que está rodando, então, imagino que após compilado, ele irá manter uma instância rodando nos processos do Windows mesmo após fechar o MDI desde já eu agradeço Obrigado!
  5. Pessoal ! Estou usando um arquivo de ajuda CHM para help da aplicação VB.NET e quando fecho o arquivo ajuda, fecha a aplicação. O que pode estar acontecendo ?
  6. Olá, sou iniciante em VB.NET e estou desenvolvendo um sistema onde preciso multiplicar 2 valores de uma linha (PrecoUnitario e Quantidade) e jogar o resultado numa terceira coluna PrecoTotal mas não estou conseguindo de forma alguma... alguém pode dar um Help? Estou adicionando as linhas através de 3 TextBox e um DomainUpDown organizado da seguinte forma: (txtBox) (domainUpDown) (txtBox) (txtBox) Código Quantidade Nome PrecoUnit Total Para adicionar os valores ao DataGridView estou usando o seguinte código: Private Sub btnAdd_Click(sender As Object, e As EventArgs) Handles btnAdd.Click Me.dgvProdutos.Rows.Add(txtCodigo.Text, updQuantidade.Text, cboNomeProduto.Text, txtPreco.Text) End Sub Agradeço qualquer ajuda desde já...
  7. kALAND

    Vb.net

    Olá pessoal boa tarde, estou tentando fazer com que ao efetuar uma venda ao clicar em finalizr abre um forme onde me passe apenas as informações dessa ultima venda, mas no meu código ele esta retornando todas as vendas, alguém poderia me ajudar? Private Sub btnfinalizar_Click(sender As Object, e As EventArgs) Handles btnfinalizar.Click Dim numero As Integer con.Open() sql = "select * from faturas where nfaturas = '" & txtnfatura.Text & "'" da = New FbDataAdapter(sql, con) tabela = New DataTable() da.Fill(tabela) numero = tabela.Rows.Count con.Close() obterultimoregistro() F_relfaturas.Show() End Sub Private Sub obterultimoregistro() Try con.Open() Dim cmd As New FbCommand cmd.CommandText = "select MAX (nfaturas) from faturas" cmd.CommandType = CommandType.Text cmd.Connection = con da.SelectCommand = cmd con.Close() tabela.Clear() da.Fill(tabela) Dim nfaturas As String = tabela.Rows.Item(0).Item(0).ToString Catch ex As Exception MsgBox(ex.Message) End Try End Sub
  8. Ola Gostaria de saber como colocar um filtro de busca para nome e data e data até. Que os tres textbox se relacionassem nesse filtro.
  9. Pessoal, tenho um form com uma picturebox que contem um gif de loading. Estou tentando fazer com que antes de executar um método ele exiba essa imagem de carregando e feche quando terminar. ele até funciona mas em determinado momento conforme o uso ele me retorna o erro: An unhandled exception of type 'System.Threading.ThreadAbortException' occurred in System.Drawing.dll Additional information: O thread estava sendo anulado. Public Class clsModoCarregando Dim FrmLoading As New Loading Dim trdelegate As New ThreadStart(AddressOf carregarFormLoading) Dim trd As New Thread(trdelegate) Private Sub carregarFormLoading() Try FrmLoading.ShowDialog() Catch ex As ThreadAbortException Thread.ResetAbort() End Try End Sub Public Sub ExibirLoad() If Not trd.IsAlive Then trd.Name = "threadCarregando" trd.IsBackground = True trd.Start() End If End Sub Public Sub FecharLoad() If trd.IsAlive Then trd.Abort() trd.Join() End If End Sub End Class 'evento do botao pesquisar do form Private Sub btnPesquisar_Click(sender As Object, e As EventArgs) Handles btnPesquisar.Click Dim ModoCarregando As New Ambiente.clsModoCarregando If lstConsulta.Items.Count > 0 Then ModoCarregando.ExibirLoad() dtgPesquisa.DataSource = insPesquisa.pesquisar(lstConsulta, dtNomesPesquisa.Rows(0)("Tabela")) dtgPesquisa.DataMember = dtNomesPesquisa.Rows(0)("Tabela") ModoCarregando.FecharLoad() Else If txtValorPesquisa.Text = String.Empty Then MsgBox("informe o valor a ser pesquisado.", vbInformation) txtValorPesquisa.Focus() Else MsgBox("Adicione a consulta antes de pesquisar.", vbInformation) btnAdicionar.Focus() End If End If End Sub
  10. Tenho uma tabela defeitos e uma de processos, sendo que um defeito pode ter um ou vários processos. Por enquanto tenho a funcionar uma dropdownlist para um defeito, um processo, que alterações preciso fazer para poder seleccionar varios processos, segue o codigo abaixo: ' GET: DEF_DEFECT/Create Function Create() As ActionResult PopProcessDropDownList() Return View() End Function ' POST: DEF_DEFECT/Create 'To protect from overposting attacks, please enable the specific properties you want to bind to, for 'more details see http://go.microsoft.com/fwlink/?LinkId=317598. <HttpPost()> <ValidateAntiForgeryToken()> Function Create(<Bind(Include:="CODE_DEF,DESCRIPTION_DEF")> ByVal dEF_DEFECT As DEF_DEFECT) As ActionResult If ModelState.IsValid Then db.DEF_DEFECT.Add(dEF_DEFECT) Dim processSelected As String = Request.Form("ProcessesList").ToString() UpdateDefectProcess(dEF_DEFECT, processSelected) db.SaveChanges() Return RedirectToAction("Index") End If Return View(dEF_DEFECT) End Function ' GET: DEF_DEFECT/Edit/5 Function Edit(ByVal id As String) As ActionResult If IsNothing(id) Then Return New HttpStatusCodeResult(HttpStatusCode.BadRequest) End If Dim dEF_DEFECT As DEF_DEFECT = db.DEF_DEFECT.Find(id) If IsNothing(dEF_DEFECT) Then Return HttpNotFound() End If PopulateProcessesDropDownList(dEF_DEFECT.PRO_PROCESS) Return View(dEF_DEFECT) End Function Sub PopProcessDropDownList() Dim listSelectListItems As List(Of SelectListItem) = New List(Of SelectListItem) For Each p As PRO_PROCESS In db.PRO_PROCESS Dim selectItem As SelectListItem = New SelectListItem() selectItem.Text = p.CODE_PRO listSelectListItems.Add(selectItem) Next ViewBag.ProcessCode = listSelectListItems End Sub Sub PopulateProcessesDropDownList(selectedprocesses As Object) ' Dropdown Lists Dim allProcesses = From s In db.PRO_PROCESS Order By s.CODE_PRO Select s.CODE_PRO, s.DESCRIPTION_PRO Distinct ViewBag.PList = New SelectList(allProcesses, "CODE_PRO", "CODE_PRO", selectedValue:=selectedprocesses) End Sub ' POST: DEF_DEFECT/Edit/5 'To protect from overposting attacks, please enable the specific properties you want to bind to, for 'more details see http://go.microsoft.com/fwlink/?LinkId=317598. <HttpPost()> <ValidateAntiForgeryToken()> Function Edit(<Bind(Include:="CODE_DEF,DESCRIPTION_DEF")> ByVal dEF_DEFECT As DEF_DEFECT) As ActionResult If ModelState.IsValid Then Dim processToUpdate = db.DEF_DEFECT _ .Include(Function(i) i.PRO_PROCESS) _ .Where(Function(i) i.CODE_DEF = dEF_DEFECT.CODE_DEF) _ .Single() Dim processSelected As String = Request.Form("ProcessesList").ToString() UpdateDefectProcess(processToUpdate, processSelected) db.Entry(processToUpdate).State = EntityState.Modified db.SaveChanges() Return RedirectToAction("Index") End If Return View(dEF_DEFECT) End Function Private Sub UpdateDefectProcess(updateDefect As DEF_DEFECT, processSelected As String) 'Dim selectedProcessHS = New HashSet(Of String)(processSelected) Dim selectedProcessHS = processSelected Dim defectProcess As IEnumerable(Of String) = New HashSet(Of String)(updateDefect.PRO_PROCESS.Select(Function(c) c.CODE_PRO)) For Each c In db.PRO_PROCESS If selectedProcessHS.Contains(c.CODE_PRO.ToString()) Then updateDefect.PRO_PROCESS.Add(c) Else If defectProcess.Contains(c.CODE_PRO) Then updateDefect.PRO_PROCESS.Remove(c) End If End If Next End Sub Estou a usar VB.NET
  11. Olá Estou tentando fazer um formulário de seleção no meu sistema. A ideia é a seguinte: o usuário terá imagens na tela (que serão exibidas em PictureBox). Essas figuras representam as opções de seleção que ele tem. Para selecionar uma ou mais opções o usuário tem que clicar na imagem e arrastá-la para dentro de um Painel (Panel). Cada PictureBox receberá um nome específico que a identificará. A tela de exemplo onde estou tentando aplicar isso está na imagem em anexo. Consegui fazer essa funcionalidade de clicar e arrastar para o Panel usando o código em anexo, isso está funcionando. Mas agora preciso saber como faço para identificar qual imagem foi arrastada para dentro do panel?? Pois para cada uma delas tenho que executar uma tarefa diferente no programa. Desde de já agradeço a atenção. O código é este: Public Class Form2 Public Property SizeMode As PictureBoxSizeMode Private MouseIsDown As Boolean = False Dim pos As Integer = 10 Private Sub Form2_Load(sender As Object, e As EventArgs) Handles MyBase.Load, Pic1.MouseEnter, Pic1.DragLeave PanelDrop.AllowDrop = True End Sub Private Sub Pic1_MouseDown(sender As Object, e As MouseEventArgs) Handles Pic1.MouseDown If Not Pic1.Image Is Nothing Then ' Set a flag to show that the mouse is down. MouseIsDown = True End If End Sub Private Sub Pic2_MouseDown(sender As Object, e As MouseEventArgs) Handles Pic2.MouseDown If Not Pic2.Image Is Nothing Then ' Set a flag to show that the mouse is down. MouseIsDown = True End If End Sub Private Sub Pic3_MouseDown(sender As Object, e As MouseEventArgs) Handles Pic3.MouseDown If Not Pic3.Image Is Nothing Then ' Set a flag to show that the mouse is down. MouseIsDown = True End If End Sub Private Sub Pic1_MouseMove(sender As Object, e As MouseEventArgs) Handles Pic1.MouseMove If MouseIsDown Then ' Initiate dragging and allow either copy Pic1.DoDragDrop(Pic1.Image, DragDropEffects.Copy Or DragDropEffects.Move) End If MouseIsDown = False End Sub Private Sub Pic2_MouseMove(sender As Object, e As MouseEventArgs) Handles Pic2.MouseMove If MouseIsDown Then ' Initiate dragging and allow either copy or move. Pic2.DoDragDrop(Pic2.Image, DragDropEffects.Copy Or DragDropEffects.Move) End If MouseIsDown = False End Sub Private Sub Pic3_MouseMove(sender As Object, e As MouseEventArgs) Handles Pic3.MouseMove If MouseIsDown Then ' Initiate dragging and allow either copy or move. Pic3.DoDragDrop(Pic3.Image, DragDropEffects.Copy Or DragDropEffects.Move) End If MouseIsDown = False End Sub Private Sub PanelDrop_DragEnter(sender As Object, e As DragEventArgs) Handles PanelDrop.DragEnter If e.Data.GetDataPresent(DataFormats.Bitmap) Then 'Copia a imagem do picture box quando clico e arrasto e.Effect = DragDropEffects.Copy End If End Sub Private Sub PanelDrop_DragDrop(sender As Object, e As DragEventArgs) Handles PanelDrop.DragDrop 'Size of picturebox inside the panel Dim u As New PictureBox u.Width = 100 u.Height = 100 u.BackColor = Color.BlueViolet u.Left = pos u.Top = 10 pos += 120 'Set the SizeMode to center the image. u.SizeMode = PictureBoxSizeMode.StretchImage u.Image = e.Data.GetData(DataFormats.Bitmap) 'Um condição IF aqui? COmo saber o nome da picturebox selecionada?? 'Insert picture in the Panel PanelDrop.Controls.Add(u) End Sub End Class Obrigadaa!!! Toda ajuda é bem vinda.
  12. Ola Pessoal Estou Precisando Muito dessa Ajuda Quem poder me ajudar ate o fim Agradeço com Soluções. , Vou tenta Explicar oque Tento Fazer e desde já Aviso que Provavelmente Precisará de um Site e eu Tenho Host paga o meu site então sem problemas. Continuando... eu quero que no meu Projeto uma Área Pedi Codigo de Acesso para Fazer Login/Desbloquear vamos dizer (Mais o Login é apenas o Codigo de Acesso) ae fica Obter Codigo de Acesso Gratis. você clica , ae vou Usar uns Encurtado de Link q espera 5 Segundos etc. e cair no site onde Gera os Códigos ai que estar Fazer essa Conexão do Códigos (exibido no site Site com o vb.net ) Lembrando que esse Código tem que ser Diferente para Cada Usuário e Trocar depois de um Tempo 20 min exemplo. Sei que vai alem da Programação no VB , Acho que envolve Banco de dados n sei ou um php Resolve + como n manjo de php ;/ fica Difícil Igual a esse ! as Imagens estão em Ordem , o NBT/code é o link que abre e depois vira o Próximo , isso eu vejo como kkk Negocio é o sistema. desde já Grato
  13. Bom dia pessoal. Agora a pouco fui compilar um projeto que estou desenvolvendo e me deparei com um seguinte erro na compilação: Error 62 Unable to open module file 'C:\\Users\\Rafael\\AppData\\Local\\Temp\\.NETFramework,Version=v4.0.AssemblyAttributes.vb': O sistema não pode encontrar o arquivo especificado. C:\\Users\\Rafael\\AppData\\Local\\Temp\\.NETFramework,Version=v4.0.AssemblyAttributes.vb 1 1 Login Acessei dentro da pasta Temp e existe um arquivo com um ícone do VB escrito assim: .NETFramework,Version=v4.0.AssemblyAttributes O que isso quer dizer? Obs: O meu projeto roda e abre normalmente, mas fica acusando esse erro citado acima.
  14. Olá para todos, sou iniciante em vb.net e estou tentando traduzir uma macro em vb que era usada em um software CAD antigo e estou tendo problemas com os códigos. Gostaria de uma ajuda para traduzir para vb.net. Em resumo, esta macro lê um arquivo .txt delimitado por ",". Neste arquivo tem as informações de Nome e posição x e y de um conjunto de pontos que fecha um polígono qualquer. Depois de ler o arquivo esta macro atribui estes valores à uma variável Type(Structure) definida pelo usuário e usa para fazer um cálculo de área entre outros. Meu problema é justamente na linha que atribui os valores à variável Type(Structure). Segue o código que já consegui fazer: Public Class Form1 Structure DadosdoPonto 'variavel definida por mim Dim nome As Integer Dim coordE As Double Dim coordN As Double End Structure Dim Ponto() As DadosdoPonto Dim Contador As Integer = 0 Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click If OpenFileDialog1.ShowDialog() = DialogResult.OK Then FileOpen(1, OpenFileDialog1.FileName, OpenMode.Input) 'Open Arquivo For Input Access Read As #1 =>código antigo 'tive dificuldade nesta linha (FileOpen) mas consigo ler o arquivo com ela, fiz um teste com uma msgbox Do While Not EOF(1)'aqui a macro deveria ler linha por linha até o final do arquivo e atribuir 'os valores ao formato definido pelo structure ReDim Preserve Ponto(Contador) 'Input #1, Ponto(Contador).Nome, Ponto(Contador).CoordE, Ponto(Contador).CoordN =>código antigo Contador += 1 Loop FileClose(1) End If End Sub End Class
  15. Gostaria de uma ajuda com um certo problema. Tenho uma text box em meu Form onde eu informo o codigo de um produto,este codigo é passado para meu banco.Eu queria que esse codigo tivesse fixo 5 char's Exemplo: Codigo : 00000 Quando eu digitasse o codigo ele alteraria apenas a quantidade de Char que eu digitei Exemplo: Text: 123 Codigo:00123 Queria que ele fizesse está conversão automaticamente, isto é possivel ? Alguem pode me ajudar ? Ouvi falar na função trim, mas não estou conseguindo fazer isto acontecer!
  16. Boas pessoal, preciso de ajuda. Tenho um report.rdlc, tenho la um textbox com um texto que gostava de justificar o texto. Conto com a vossa ajuda obrigado.
  17. Estava tentando converter um valor de TextBox para String e consegui com o seguinte código: String Nome Nome = jnlMenu_Principal.tbxNome_do_Produto_Adicionar_Produto.ToString '(jnlMenu_Principal.tbxNome_do_Produto_Adicionar_Produto) é o nome da TextBox porém quando fui ver na lista ele adicionou o nome mas assim: Como se estivesse com o endereço da TextBox queria tirar isso mas não faço a minima ideia de como se alguém souber oque se pode fazer agradeço desde já!
  18. Boa tarde! Estou desenvolvendo uma aplicação em vb.net que recebe informações de um programa chamado Blender 3D o qual é escrito em Python e gera imagens em 3 dimensões. Eu gostaria de saber se alguém poderia me dar uma luz de como eu posso converter uma imagem gerada no Blender em uma string base64 para enviar ao meu aplicativo .net. Em outras palavras: como converter imagem em string base64 de modo que o vb.net decodifique as informações recebidas? Abaixo a função que estou usando para decodificar as imagens: 'Converte uma string Base64 de volta para uma imagem Public Function Base64StringToImage(ByVal strBase64 As String) As Image If strBase64 <> "" Then 'String Base64 Dim ms As MemoryStream = New MemoryStream(Convert.FromBase64String(strBase64)) 'Criar um novo Bitmap baseado na MemoryStream Dim bmp As Bitmap = New Bitmap(ms) 'Retorna o Bitmap criado Return bmp Else Return Nothing End If End Function
  19. O formulário fez referência a si próprio durante a construção a partir de uma instância padrão, que levou a recursão infinita. Dentro do construtor de Form, faça referência ao formulário usando 'Me'. Estava desenvolvendo uma função para redimensionar automaticamente(Como essa): jnlMenu_Principal.gbxAcoes.Height = jnlMenu_Principal.Height - 62 mas por ser muito extensa decide criar um modulo (Criei um modulo para poder acessa-la de qualquer classe) para funções e implementa-la lá porem ao compilar para testar a função ele da um erro (Citado acima) já procurei como resolver mas não achei nem entendi o porque de ter dado esse erro! Quem puder ajudar agradeço desde já!
  20. Olá, eu estou tentando editar um arquivo .RTF via vb.net sem ter que carregá-lo em um richtextbox, utilizo o arquivo salvo como modelo pra não precisar usar nenhum tipo de relatório, assim eu o abro toda vez, substituo as informações necessárias e salvo uma cópia. Estou usando o seguinte: Código (vb.net): 'Abrir Dim fileReader As String fileReader = My.Computer.FileSystem.ReadAllText(Application.StartupPath & "\modelo.rtf") fileReader = fileReader.Replace("<nome_da_pessoa>", TextBox1.Text) 'Aqui, eu gostaria de substituir a string "<foto_pessoa>" por uma imagem fileReader = fileReader.Replace("<foto_pessoa>", my.resources.imagem) 'Salvar Dim StreamW As New IO.StreamWriter(SaveFileDialog1.FileName, True, System.Text.Encoding.Default) StreamW.Write(fileReader) StreamW.Close() Eu gostaria de substituir a string "foto_pessoa" por uma imagem e salvar essa imagem no arquivo RTF, como posso fazer isso de uma maneira bem simplificada? O método Replace só substitui string por outra string? Obrigado
  21. Boa noite, estou iniciando no Visual Studio 2012 (vb.net), porém estou com dificuldades, gostaria de uma ajuda para carregar uma variavel com informação de um banco access... no VB6 eu faço assim: Abre tabela, faço o select... ... dim nome as string nome = Tabela("nome") ... Dessa forma eu carreguei a variavel com o conteudo do campo nome alguém poderia me dar um exemplo de como fazer algo igual a isso no visual studio 2012 (vbnet)?? agradeço
  22. Alguém pode me ajudar com o problema demonstrado no vídeo abaixo ?
  23. AlexMunhoz

    Erro no vb.net

    Olá amigos, meu vb está apresentando esse erro aqui, já quebrei a cabeça com isso e até agora não consegui resolver, alguém poderia me ajudas. já fiz o procedimento indicado e nada. Obrigado
  24. Bom dia pessoal, Estou criando um aplicativo para acessar um banco de dados db2 iSeries via DAO. A conexão pelo visual studio ocorre com sucesso. Porém quando tento realizar um select ocorre o erro abaixo: {"SQL0204: LOCAL, na 'tabela', tipo *FILE, não foi encontrado. Causa . . . . . : LOCAL, na 'tabela', tipo *FILE, não foi encontrado. Se o nome do membro for *ALL, a tabela não será particionada. Se esta for uma instrução ALTER TABLE e o tipo *N, uma restrição ou restrição não foi encontrada. Se esta não for uma instrução ALTER TABLE e o tipo for *N, uma função, um procedimento, um acionador ou um objeto de seqüência não foi localizado. Se uma função não foi encontrada, LOCAL será o programa de serviços que contém a função. A função não será encontrada, a menos que o nome externo e o nome de uso correspondam exatamente. Examine o registro de jobs para uma mensagem que fornece detalhes adicionais sobre qual nome de função está sendo pesquisado e nome que não correspondia. Recuperação . . : Altere o nome e tente o pedido novamente. Se o objeto for um grupo de nós, certifique-se de que o produto DB2 Multisystem esteja instalado no sistema e crie um grupo de nós com o comando de CL CRTNODGRP. Se uma função externa não foi localizada, certifique-se de que este seja o caso EXTERNAL NAME na instrução CREATE FUNCTION corresponda exatamente ao caso do nome exportado pelo programa de serviços."}
  25. threshsupport

    Erro vb.net

    Olá, fiz meu projeto e agora gostaria de exportar o .exe dele para usar em outro computador. Porém, meu aplicativo não quer abrir no .exe. Ele abre somente no debug dó proprio visual studio. já usei o visual studio 2010 e o 2015 e o problema parece o mesmo, até em outro projeto também coloquei o programa em outro pc e não abriu. Ele fica com aquela seta do mouse de loading Alguém poderia me ajudar?
×
×
  • Criar Novo...