How to get size of an file stored as image in SQL Database

[Dino Buljubasic]

I want to get the size of a file stored in SQL Database (as image data
type).

Anybody knows how to do this?

Any help will be greatelly appreciated

[kjhklhkh]

Look at using CommandBehavior .SequentialAcce ss along with DataReader.
"Cor Ligthert" <no************ @planet.nl> wrote in message
news:e$******** ******@TK2MSFTN GP10.phx.gbl...

WhatEverYourNam e is,

I made a piece of code (sample) from your SQLString which test it direct.

\\\
Public Class TestLength
Public Shared Sub Main()
Dim conn As New SqlClient.SqlCo nnection("Serve r=(local);" & _
"DataBase=North wind; Integrated Security=SSPI")
Dim sqlstr1 As String = "SELECT DATALENGTH(Phot o) " & _
" FROM Employees WHERE EmployeeID = 3"
Dim sqlstr2 As String = "SELECT Photo FROM Employees WHERE
EmployeeID = 3"
Dim cm As New SqlClient.SqlCo mmand(sqlstr1, conn)
conn.Open()
Console.Write(c m.ExecuteScalar .ToString & vbCrLf)
cm.CommandText = sqlstr2
Console.Write(( DirectCast(cm.E xecuteScalar, Byte()).Length) .ToString & vbCrLf)
conn.Close()
End Sub
End Class
///

Now I still needs to know how Dino does the reading.

Cor

[Cor Ligthert]

WhateverName,

Thanks

Cor

[Dino Buljubasic]

HI Cor,

thank you for your help. I fixed the problem and it works just great.
Did not know of DATALENGTH() before, now I learned something new

And it is working great.

I appreciate your help

On Thu, 10 Mar 2005 09:13:57 +0100, "Cor Ligthert"
<no************ @planet.nl> wrote:

WhatEverYourNa me is,

I made a piece of code (sample) from your SQLString which test it direct.

\\\
Public Class TestLength
Public Shared Sub Main()
Dim conn As New SqlClient.SqlCo nnection("Serve r=(local);" & _
"DataBase=North wind; Integrated Security=SSPI")
Dim sqlstr1 As String = "SELECT DATALENGTH(Phot o) " & _
" FROM Employees WHERE EmployeeID = 3"
Dim sqlstr2 As String = "SELECT Photo FROM Employees WHERE
EmployeeID = 3"
Dim cm As New SqlClient.SqlCo mmand(sqlstr1, conn)
conn.Open()
Console.Write(c m.ExecuteScalar .ToString & vbCrLf)
cm.CommandText = sqlstr2
Console.Write(( DirectCast(cm.E xecuteScalar, Byte()).Length) .ToString
& vbCrLf)
conn.Close()
End Sub
End Class
///

Now I still needs to know how Dino does the reading.

Cor

[JD]

You're welcome.

"Dino Buljubasic" <di**@noplaceli kehome.com> wrote in message
news:5m******** *************** *********@4ax.c om...

HI Cor,

thank you for your help. I fixed the problem and it works just great.
Did not know of DATALENGTH() before, now I learned something new

And it is working great.

I appreciate your help

On Thu, 10 Mar 2005 09:13:57 +0100, "Cor Ligthert"
<no************ @planet.nl> wrote:

WhatEverYourNa me is,

I made a piece of code (sample) from your SQLString which test it direct.

\\\
Public Class TestLength
Public Shared Sub Main()
Dim conn As New SqlClient.SqlCo nnection("Serve r=(local);" & _
"DataBase=North wind; Integrated Security=SSPI")
Dim sqlstr1 As String = "SELECT DATALENGTH(Phot o) " & _
" FROM Employees WHERE EmployeeID = 3"
Dim sqlstr2 As String = "SELECT Photo FROM Employees WHERE
EmployeeID = 3"
Dim cm As New SqlClient.SqlCo mmand(sqlstr1, conn)
conn.Open()
Console.Write(c m.ExecuteScalar .ToString & vbCrLf)
cm.CommandText = sqlstr2
Console.Write(( DirectCast(cm.E xecuteScalar, Byte()).Length) .ToString& vbCrLf)
conn.Close()
End Sub
End Class
///

Now I still needs to know how Dino does the reading.

Cor