Databases
StackOverflow2013
Postsdbo
POSave/open OLE object from .mdb in vb winform
 

Note that there are some explanatory texts on larger screens.

plurals
  1. POSave/open OLE object from .mdb in vb winform
    primarykey
    data
    text
    <p>I am trying to add a feature to my vb winform program where a user can attach files (.doc, .docx, .jpg, .pdf) to a mdb file that holds other text data. The binary file and the file name are stored in the DB. The file name with path is passed as variable 'fpath'. below is what I have thus far (It is now working, meaning it saves the file name and binary data). Now, how can the user open the saved file? And, if it is a .doc or PDF etc, how do I make the default associated program open it? . Can someone help me with the rest? </p> <p>Here is the code to store the OLE object:</p> <pre><code> Private Sub btnClear_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnClear.Click 'data connection Dim cn As New OleDb.OleDbConnection cn.ConnectionString = "Provider=Microsoft.Jet.OleDb.4.0; Data Source=" &amp; _ Application.StartupPath &amp; "\data.mdb" cn.Open() 'file name without path Dim flName As String = filename.Text 'open file from the disk (file path is the path to the file to be opened) Using fileStream As FileStream = File.OpenRead(fpath) 'create new MemoryStream object Dim memStream As New MemoryStream() memStream.SetLength(fileStream.Length) 'read file to MemoryStream fileStream.Read(memStream.GetBuffer(), 0, CInt(Fix(fileStream.Length))) Dim strImage As String = "?" Dim arr As Byte() arr = memStream.GetBuffer Dim cmd As New OleDb.OleDbCommand cmd.Connection = cn cmd.CommandText = "INSERT INTO tblstudent(name, photo) VALUES( ?, ?)" cmd.Parameters.Add("@name", OleDbType.Char).Value = flName cmd.Parameters.Add("@photo", OleDb.OleDbType.Binary).Value = arr cmd.ExecuteNonQuery() MsgBox("Data save successfully!") cn.Close() End Using End Sub </code></pre>
    singulars
    1. PO
      singulars
      1. PTAnswer
    1. This table or related slice is empty.
    1. PTQuestion
    1. USCory
    1. USCory
    plurals
    1. This table or related slice is empty.
    1. This table or related slice is empty.
    1. This table or related slice is empty.
    1. PO
      singulars
      1. PTAnswer
    1. VO
      singulars
      1. POSave/open OLE object from .mdb in vb winform
      1. This table or related slice is empty.
      1. VTUpMod
    1. COYour `MsgBox` comes too early, it should come after the `cmd.ExecuteNonQuery()` and a Try/Catch should be used here. I think you will have to store the file name as well.
      singulars
      1. POSave/open OLE object from .mdb in vb winform
      1. USOneFineDay
    2. COI added the try/catch and switched the order of the msg box. The code doesn't save anything to the db, but it doesn't throw an exception now. not sure what else to do
      singulars
      1. POSave/open OLE object from .mdb in vb winform
      1. USCory
    3. COYour code and question text don't match. The text says "the user will click a button to browse to the file, and the file name and path are displayed in lable1", but the code doesn't try to save the file name and path (it reads the file into nothing with `System.IO.File.ReadAllBytes(flName)` that doesn't use the stream you create at all, and then tries to store the uninitialized, non-existant content of that stream into the DB). What are you're trying to do? Save the file name and path? Save the binary content of the file? Please edit to clarify what it is you're asking us for help with here.
      singulars
      1. POSave/open OLE object from .mdb in vb winform
      1. USKen White
 

Querying!

 
Guidance
A row detail

Detail views are divided into sections. All the information in the data section comes from columns in the selected row. The other sections display data from other, related rows.

Related data can be related in a to-one or a to-many fashion. Captions of data related in a to-many fashion link to a list view showing a filtered view of the table.

Try moving around until you find a non-empty to-many entry and click on the label to get to one. You can move back to the root by clicking on the database name in the header.

SQuiL has stopped working due to an internal error.

If you are curious you may find further information in the browser console, which is accessible through the devtools (F12).

Reload