Go Premium for a chance to win a PS4. Enter to Win

x
  • Status: Solved
  • Priority: Medium
  • Security: Public
  • Views: 1308
  • Last Modified:

SQL Filestream in VB 2010 --- Access Denied error

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")
        Try
            Using cnn As New SqlConnection(My.Settings.RVSoftMainDataConnectionString)

                'Open a connection and start a transaction
                cnn.Open()
                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
                r.Read()
                Dim ID As String = r(0).ToString
                Dim path As String = r(1).ToString
                r.Close()

                '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
                Try
                    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, _
                                numBytesToRead)
                            ' 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)
                        fs.Close()

                        tx.Commit()
                    End Using

                Catch ioEx As FileNotFoundException
                    Console.WriteLine(ioEx.Message)
                End Try
            End Using

        Catch ex As Exception
            'tx.Rollback()
            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
error.jpg
0
PatrickMiron
Asked:
PatrickMiron
  • 7
  • 3
1 Solution
 
Bob LearnedCommented:
Where is the FileStream configured to write to on the server?
0
 
PatrickMironAuthor Commented:
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?
0
 
PatrickMironAuthor Commented:
This is my script on the SQL Server side (stored procedure) to return a token...

CREATE procedure [dbo].[FSInsert]
WITH EXECUTE AS 'USERTHATHASALLSECURITYENABLED'
as
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

GO
0
Free Backup Tool for VMware and Hyper-V

Restore full virtual machine or individual guest files from 19 common file systems directly from the backup file. Schedule VM backups with PowerShell scripts. Set desired time, lean back and let the script to notify you via email upon completion.  

 
PatrickMironAuthor Commented:
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?
0
 
PatrickMironAuthor Commented:
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...???
0
 
PatrickMironAuthor Commented:
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\....

0
 
Bob LearnedCommented:
FILESTREAM Overview
http://technet.microsoft.com/en-us/library/bb933993.aspx

"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."
0
 
Bob LearnedCommented:
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
http://blogs.msdn.com/b/sriramg/archive/2010/06/03/moving-filestream-data-to-new-location.aspx?wa=wsignin1.0
0
 
PatrickMironAuthor Commented:
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.

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

Patrick Miron
0
 
PatrickMironAuthor Commented:
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!

Cheers!
0
 
lcog_kgCommented:
I enabled "Allow remote clients to have streaming access to FILESTREAM data" and it worked for me, thanks for your help.
0

Featured Post

Free Tool: SSL Checker

Scans your site and returns information about your SSL implementation and certificate. Helpful for debugging and validating your SSL configuration.

One of a set of tools we are providing to everyone as a way of saying thank you for being a part of the community.

  • 7
  • 3
Tackle projects and never again get stuck behind a technical roadblock.
Join Now