Ir para conteúdo
Fórum Script Brasil

Carlosdm

Membros
  • Total de itens

    2
  • Registro em

  • Última visita

Tudo que Carlosdm postou

  1. Boa tarde, pessoal. Tenho um programa feito em vb.net com banco de dado em access. O banco de dados precisa ser compartilhado em uma rede para que mais de um usuário possa editar o banco de dados do access. A conexão do programa com o access quando não está em rede é realizada a partir deste comando e funciona perfeitamente: Imports System.Data.OleDb Module estoque Public cnn As New System.Data.OleDb.OleDbConnection("provider=microsoft.ace.oledb.12.0;data source= c:\app\db.accdb") End Module Quando eu altero o datasource para z:\db.accdb que é o local onde eu realizei o mapeamento da rede, as consultas com select funcionam perfeitamente, porém quando executo algum botão com insert ou com update ele dá o seguinte erro: A first chance exception of type 'System.Data.OleDb.OleDbException' occurred in System.Data.dll Additional information: Operation must use an updateable query. Eu já coloquei permissão de segurança para controle total (editar) banco de dados. Alguém sabe o que pode estar ocorrendo? Até mais.
  2. Boa tarde pessoal! Estou com um problema na atualização da minha listview a partir de um banco de dados do access. Meu problema é o seguinte, o código só funciona se no access eu colocar os tipos de dados "texto curto", se eu colocar como número a listagem não é feita. Segue o comando: Private Sub refreshdata() If Not cnn.State = ConnectionState.Open Then cnn.Open() Dim dt As New DataTable Dim ds As New DataSet ds.Tables.Add(dt) Dim da As New OleDb.OleDbDataAdapter("select * from tb_cestoque", cnn) da.Fill(dt) Dim myrow As DataRow For Each myrow In dt.Rows ListView1.Items.Add(myrow.Item(0)) ListView1.Items(ListView1.Items.Count - 1).SubItems.Add(myrow.Item(1)) ListView1.Items(ListView1.Items.Count - 1).SubItems.Add(myrow.Item(2)) ListView1.Items(ListView1.Items.Count - 1).SubItems.Add(myrow.Item(3)) Next cnn.Close() End Sub Alguém sabe o que pode ser?
×
×
  • Criar Novo...