SQL Filestream in VB 2010 --- Access Denied error

Posted on 2010-08-26
Last Modified: 2012-05-10
I'm getting an access denied error when I trying to copy a file that I load into a filestream
that I then send to a byte array which is then sent to a Stored Procedure on an SQL Server 2008.

The SQL Server procedure works through a local querry on the SQL Server. The filestream is also
poperly configured and setup.

Here is my vb code... I also included a copy of the error I get as a JPG.

    Public Shared Sub WriteSQLFileStream(ByVal pathSource As String)
        'Dim cnn As SqlConnection
        Dim tx As SqlTransaction = Nothing
        Dim Description As New String("TEST")
            Using cnn As New SqlConnection(My.Settings.RVSoftMainDataConnectionString)

                'Open a connection and start a transaction
                tx = cnn.BeginTransaction

                'Insert empty blob
                Dim cmd As New SqlCommand("FSInsert", cnn, tx)
                cmd.CommandType = CommandType.StoredProcedure
                Dim r As SqlDataReader = cmd.ExecuteReader(CommandBehavior.SingleRow)

                'Read the id and sql path back from the procedure
                Dim ID As String = r(0).ToString
                Dim path As String = r(1).ToString

                'Get the transaction token, required for filestream operations
                Dim cmd2 As New SqlCommand("SELECT GET_FILESTREAM_TRANSACTION_CONTEXT()", cnn, tx)
                Dim obj As Object = cmd2.ExecuteScalar

                Dim txCtx As Byte()
                txCtx = CType(obj, Byte())

                'Open the special managed "SQLFileStream" and write bytes
                    Using fsSource As FileStream = New FileStream(pathSource, _
                        FileMode.Open, FileAccess.Read)
                        ' Read the source file into a byte array.
                        Dim bytes() As Byte = New Byte((fsSource.Length) - 1) {}
                        Dim numBytesToRead As Integer = CType(fsSource.Length, Integer)
                        Dim numBytesRead As Integer = 0

                        While (numBytesToRead > 0)
                            ' Read may return anything from 0 to numBytesToRead.
                            Dim n As Integer = fsSource.Read(bytes, numBytesRead, _
                            ' Break when the end of the file is reached.
                            If (n = 0) Then
                                Exit While
                            End If
                            numBytesRead = (numBytesRead + n)
                            numBytesToRead = (numBytesToRead - n)

                        End While
                        numBytesToRead = bytes.Length

                        'Write file to SQLStream
'''' Obviously this is where I get an error! ''''
                        Dim fs As New SqlTypes.SqlFileStream(path, txCtx, FileAccess.Write)
                        fs.Write(bytes, 0, numBytesToRead)

                    End Using

                Catch ioEx As FileNotFoundException
                End Try
            End Using

        Catch ex As Exception
            MessageBox.Show("The files stream operation failed ... Error: " & ex.ToString)
        End Try
    End Sub

If you have any comments about other parts of the code, I'm open to suggestion and more efficient code!

Thanks for your help!

Patrick Miron
Question by:PatrickMiron
Welcome to Experts Exchange

Add your voice to the tech community where 5M+ people just like you are talking about what matters.

  • Help others & share knowledge
  • Earn cash & points
  • Learn & ask questions
  • 7
  • 3
LVL 96

Expert Comment

by:Bob Learned
ID: 33541400
Where is the FileStream configured to write to on the server?

Author Comment

ID: 33543402
Do you mean the data path of the Filestream? or do you mean the connection string?
  ---> Using cnn As New SqlConnection(My.Settings.RVSoftMainDataConnectionString)

I get a token back from the SQL Server and the connection strings works up to the line where I intentiate the SQLFileStream.

Or are you talking about the configuration of the SQL Server?

Author Comment

ID: 33545221
This is my script on the SQL Server side (stored procedure) to return a token...

CREATE procedure [dbo].[FSInsert]
Declare @id uniqueidentifier
Set @id = NEWID()
insert into dbo.BillImages (ImageFSID, ImageFS)
values (@id, CAST('Image Placeholder' as varbinary(max)))
select imageFSID, ImageFS.PathName() from dbo.BillImages where ImageFSID=@id

Online Training Solution

Drastically shorten your training time with WalkMe's advanced online training solution that Guides your trainees to action. Forget about retraining and skyrocket knowledge retention rates.


Author Comment

ID: 33545252
I verified the path that is return by the token and I can't get access to it on the SERVER where the SQL Server is running. I'm assuming that is supposed to happen because I did not enable "remote" access to that shared folder. Am I right?

Author Comment

ID: 33545568
Is it possible that the filestream storage is corrupted and if so, how do I create another and remove the old one. Not sure when I add filegroups where things go and if it removes the other filegroups...???

Author Comment

ID: 33545844
Just to clarify my comment on the path that is returned. It is return as a UNC path \\SERVER\NAMEOFFILEGROUP\...

But I can access the folders not under the shared path but under the path on the c:\Program Files\MSQL\....

LVL 96

Expert Comment

by:Bob Learned
ID: 33547784

"Only the account under which the SQL Server service account runs is granted NTFS permissions to the FILESTREAM container. We recommend that no other account be granted permissions on the data container."
LVL 96

Expert Comment

by:Bob Learned
ID: 33547795
I am still studying FILESTREAMS, so take any advice with a grain of salt.

One test possibility might be to move the FILESTREAM to a different location:

Moving FileStream data to new location

Author Comment

ID: 33559979
I have tried changing the location and the backup/restore options.

I'm still trying to figure out wht comment about the NTFS permission to the filestream container.... Do you have more information on this and how I would go about configuring the account properly for that. I tried giving allrights to the SQL Server Agent runing on our server and also configuring a SQL Account only with all access to make this work. Again, the accounts where able to create the filestream localy on my Store Procedure, but I can't seem to have the rights to send a request to write to the filestream from my VB software. I'm starting to thinks its an Windows server 2008 problem.

There has to be someone that knows about this issue???!!!

Patrick Miron

Accepted Solution

PatrickMiron earned 0 total points
ID: 33570741
Well, you will never believe this. I was so sure that I did not need to enable the "Allow remote clients to have streaming acces to FILESTREAM data" that I misread this. That options seems to actually mean that if your software is not running on the same machine as the SQL Server is, then you have to enable this. I was under impression that it was an option to access the files through a local UNC path.

If you guys have more comments I still would appreciate them. I hope that my 5 days of searching for an answer actually helps other!


Expert Comment

ID: 37766781
I enabled "Allow remote clients to have streaming access to FILESTREAM data" and it worked for me, thanks for your help.

Featured Post

Back Up Your Microsoft Windows Server®

Back up all your Microsoft Windows Server – on-premises, in remote locations, in private and hybrid clouds. Your entire Windows Server will be backed up in one easy step with patented, block-level disk imaging. We achieve RTOs (recovery time objectives) as low as 15 seconds.

Question has a verified solution.

If you are experiencing a similar issue, please ask a related question

Ever wondered why sometimes your SQL Server is slow or unresponsive with connections spiking up but by the time you go in, all is well? The following article will show you how to install and configure a SQL job that will send you email alerts includ…
Recently we ran in to an issue while running some SQL jobs where we were trying to process the cubes.  We got an error saying failure stating 'NT SERVICE\SQLSERVERAGENT does not have access to Analysis Services. So this is a way to automate that wit…
Via a live example, show how to setup several different housekeeping processes for a SQL Server.
Viewers will learn how to use the SELECT statement in SQL and will be exposed to the many uses the SELECT statement has.

624 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question