Хранение информации в базе данных доступа - PullRequest
0 голосов
/ 20 марта 2020

Привет. Я пытаюсь сохранить информацию о новом элементе в сетке данных. В открытом приложении информация есть, но когда мы ее закрываем и открываем снова, вся новая информация исчезает, кто-то может помочь?

Dim cmdSql As String

'If txtNumero.Text = "1" Then
cmdSql = "INSERT INTO Fatura (Cliente, Data, ValorTotal) " &
        "VALUES ('" & txtCliente.Text & "', #" &
        dataFatura.Value.ToString("dd/MM/yyyy") & "#, " &
        Replace(txtValorTotal.Text.ToString, ",", ".") & ")"

GerirLigacao.ExecutarCmdSQL(cmdSql)



cmdSql = "SELECT TOP 1 Numero FROM Fatura ORDER BY Numero DESC"
Dim r As DataSet = GerirLigacao.obterDados(cmdSql)
    txtNumero.Text = r.Tables(0).Rows(0).Item("Numero")
    txtNrFatura.Text = txtNumero.Text
    Dim msg = "Fatura guardada com sucesso"
    Dim titulo = "Guardar"
    Dim botoes = MessageBoxButtons.OK
    Dim icone = MessageBoxIcon.Information
    MessageBox.Show(msg, titulo, botoes, icone)

Gerirligacao

Public Shared Sub ExecutarCmdSQL(ByVal comando As String)
    Try
        Dim cmdSql As New OleDbCommand(comando, ligacao)
        cmdSql.ExecuteNonQuery()
    Catch ex As Exception
        Dim msg = "Aconteceu um erro de execução." & vbNewLine
        Dim botoes = MessageBoxButtons.OK
        Dim icone = MessageBoxIcon.Error
        MessageBox.Show(msg & ex.Message, "ERRO", botoes, icone)
    End Try
End Sub

1 Ответ

1 голос
/ 20 марта 2020

Найдите файл базы данных в обозревателе решений, щелкните по нему и в сетке свойств установите Copy To Output Directory на Copy If Newer

enter image description here

Дополнительная информация: https://social.technet.microsoft.com/wiki/contents/articles/53248.visual-studio-copying-files-to-debug-or-release-folder.aspx

Возможно, сейчас самое время сказать вам, что вы можете внести некоторые серьезные улучшения в код доступа к вашей базе данных; таким образом, это делает работу очень сложной, а код крайне небезопасным (для получения дополнительной информации прочитайте http://bobby-table.com). Раньше у Microsoft было множество наборов пошаговых инструкций: http://msdn2.microsoft.com/en-us/library/fxsa23t6 (против 80) .aspx - эта документация сейчас заархивирована (ей не менее 15 лет), и я не могу загрузить ее на мобильный телефон, чтобы проверить это "создание простого приложения данных" все еще prt этого. На YouTube есть множество учебных пособий о том, как использовать табличные адаптеры и наборы данных, если это тот путь, который вы хотите использовать, хотя современные технологии (и самое широкое распространение знаний) в наши дни, вероятно, доступны для Entity Framework. Google для «начала работы с структурой сущностей» и посмотрите; Я бы настоятельно рекомендовал вам go таким образом, чем ваш существующий маршрут использования слабо типизированных наборов данных и прямых sql запросов

...