Olá Thiago,
Respondendo a sua pergunta, sim, preciso armazenar, atualizar e deletar registros na base de dados.
Criei os metodos sugeridos em vb:
Public Class clsManutencao
Public Sub VerificarBancoDeDados(ByVal StringConexao As String)
Dim oContext As New clsAcessoDadosT(StringConexao)
If Not oContext.DatabaseExists Then
CopiarBancoDeDados()
End If
End Sub
Private Sub CopiarBancoDeDados()
Dim db As Stream = Application.GetResourceStream(New Uri("DBTeste.sdf", UriKind.Relative)).Stream
Dim isoStore As IsolatedStorageFile = IsolatedStorageFile.GetUserStoreForApplication()
Dim workDB As IsolatedStorageFileStream = isoStore.CreateFile("DBTeste.sdf")
Dim bWriter As BinaryWriter = New BinaryWriter(workDB)
Dim Tamanho As Long = db.Length
Dim Buffer(32) As Byte
Dim intCont As Integer
Dim bReader As BinaryReader = New BinaryReader(db)
While intCont < Tamanho
Dim intAtual = bReader.Read(Buffer, 0, Buffer.Length)
intCont += intAtual
bWriter.Write(Buffer, 0, intAtual)
End While
End Sub
End Class
Depois, no código da MainPage
Partial Public Class MainPage
Inherits PhoneApplicationPage
Public Const SQLConn As String = "Data Source=isostore/DBTeste.sdf"
' Constructor
Public Sub New()
InitializeComponent()
Dim oManutencao As New clsManutencao
oManutencao.VerificarBancoDeDados(SQLConn)
End Sub
End Class
Até aqui sem problemas, o metodo é chamado mas quando executo o codigo já postado anteriormente, recebo o erro
Access to the database file is not allowed. [ 1981,File name = \Applications\Install\7556F360-987A-4686-BEAB-76751ECA1E48\Install\DBTeste.sdf,SeCreateFile ]
Tentei criar a base direto pela classe de contexto mas mesmo assim não funcionou:
Partial Public Class MainPage
Inherits PhoneApplicationPage
Public Const SQLConn As String = "Data Source=isostore/DBTeste.sdf"
' Constructor
Public Sub New()
InitializeComponent()
Dim oContexto As New clsAcessoDadosT(SQLConn)
If Not oContexto.DatabaseExists Then
oContexto.CreateDatabase()
Else
Stop
End If
End Sub
Quando o metodo CreateDatabase é executado ocorre o seguinte erro:
Cannot create or delete database outside of application isolated storage.
Abraço
Analista Programador .Net www.fabner.com.br
