Database Permission

[Julie Barnet]

Could someone please tell me how I can trap permission errors in
vb.net on a stored procedure:
ie. Execute permission denied on object 'sel_mytable', database
'mydatabase', owner 'dbo'

I would like to print a message like
response.write( "You don't have permission to select on this table") as
opposed to the cryptic message I am receiving.

Thanks in advance
Julie Barnet

[Dan Guzman]

You can trap a SqlException and translate the error as desired in your code.
VB.Net WinForm example:

Try
sqlCommand.Exec uteReader()
Catch ex As SqlException
Dim PermissionError As Boolean = False
For Each sqlError As SqlError In ex.Errors
If sqlError.Number = 229 Then
PermissionError = True
Exit For
End If
Next sqlError
If PermissionError = True Then
MessageBox.Show ("You don't have permission to select on this
table")
Else
MessageBox.Show ("Unexpected error: " & ex.ToString())
End If
End Try

--
Hope this helps.

Dan Guzman
SQL Server MVP
"Julie Barnet" <ba*****@pr.fra serpapers.com> wrote in message
news:43******** *************** **@posting.goog le.com...

Could someone please tell me how I can trap permission errors in
vb.net on a stored procedure:
ie. Execute permission denied on object 'sel_mytable', database
'mydatabase', owner 'dbo'

I would like to print a message like
response.write( "You don't have permission to select on this table") as
opposed to the cryptic message I am receiving.

Thanks in advance
Julie Barnet

[Julie Barnet]

I am databinding a datagrid. I tried that and it still doesn't seem
to work. I will paste my code...

Is there something I'm missing?

Public Function BindGrid(ProcNa me as String, myDataGrid as
DataGrid, cmd as SqlCommand, con as SqlConnection) as Integer
Dim ds As DataSet
Dim da As new SqlDataAdapter( )

Try

cmd.CommandText = ProcName
cmd.CommandType = CommandType.Sto redProcedure
cmd.Connection = con

da.Selectcomman d = cmd

ds = new DataSet()
da.Fill(ds, "MyTable")

myDataGrid.Data Source=ds.Table s("MyTable").De faultView
myDataGrid.Data Bind()
return ds.Tables("MyTa ble").Rows.Coun t
catch exp as SqlException
HttpContext.Cur rent.Response.W rite("Exception 3")

End Try
End Function

[Dan Guzman]

I ran your code and got the "Exception3 " message. What symptoms are you
getting?

--
Hope this helps.

Dan Guzman
SQL Server MVP
"Julie Barnet" <ba*****@pr.fra serpapers.com> wrote in message
news:43******** *************** ***@posting.goo gle.com...

I am databinding a datagrid. I tried that and it still doesn't seem
to work. I will paste my code...

Is there something I'm missing?

Public Function BindGrid(ProcNa me as String, myDataGrid as
DataGrid, cmd as SqlCommand, con as SqlConnection) as Integer
Dim ds As DataSet
Dim da As new SqlDataAdapter( )

Try

cmd.CommandText = ProcName
cmd.CommandType = CommandType.Sto redProcedure
cmd.Connection = con

da.Selectcomman d = cmd

ds = new DataSet()
da.Fill(ds, "MyTable")

myDataGrid.Data Source=ds.Table s("MyTable").De faultView
myDataGrid.Data Bind()
return ds.Tables("MyTa ble").Rows.Coun t
catch exp as SqlException
HttpContext.Cur rent.Response.W rite("Exception 3")

End Try
End Function