Cannot Generate SSPI Context

I was trying out the Building an End-to-End Application (VB.Net) exercises on Web Matrix Guided Tour and encountered the mentioned errors. Please help. Thanks.





The code is as follows :





<%@ Page Language="VB" Debug="true"%>


<%@ import Namespace="System.Data" %>


<%@ import Namespace="System.Data.SqlClient" %>


<script runat="server">





Sub Page_Load(Sender As Object, E As EventArgs)


Welcome.Text = "Hello, " + User.Identity.Name


If Not Page.IsPostBack Then





' Databind the master grid on the first request only


' (viewstate will restore these values on subsequent postbacks).





MasterGrid.SelectedIndex = 0


BindMasterGrid()


BindDetailGrid()





End If





End Sub





Sub MasterGrid_Select(Sender As Object, E As EventArgs)


BindDetailGrid()


End Sub





Sub MasterGrid_Page(Sender As Object, E As DataGridPageChangedEventArgs)





If MasterGrid.SelectedIndex <> -1 Then





' unset the selection, details view


MasterGrid.SelectedIndex = -1


BindDetailGrid()





End If





MasterGrid.CurrentPageIndex = e.NewPageIndex


BindMasterGrid()





End Sub





Sub BindMasterGrid()





' TODO: Update the ConnectionString and CommandText values for your application


Dim ConnectionString As String = "server='WRPBI'; user id='sa'; password='sa';database=MatrixOrders;Integrated Security=SSPI"





Dim CommandText As String = "select OrderID, OrderDate, CustomerName from Orders"





Dim myConnection As New SqlConnection(ConnectionString)


Dim myCommand As New SqlDataAdapter(CommandText, myConnection)





Dim ds As New DataSet()


myCommand.Fill(ds)





MasterGrid.DataSource = ds


MasterGrid.DataBind()





End Sub





Sub BindDetailGrid()





' get the filter value from the master Grid's DataKeys collection


If MasterGrid.SelectedIndex <> -1 Then





' TODO: update the ConnectionString value for your application


Dim ConnectionString As String = "server='WRPBI'; user id='sa'; password='sa';database=MatrixOrders;Integrated Security=SSPI"





' TODO: update the CommandText value for your application


Dim filterValue As String = CStr(MasterGrid.DataKeys(MasterGrid.SelectedIndex)).Replace("'", "''")


Dim CommandText As String = "select OrderDetailID, ProductName, Quantity, UnitPrice from OrderDetails where OrderID = '" & filterValue & "'"





Dim myConnection As New SqlConnection(ConnectionString)


Dim myCommand As New SqlCommand(CommandText, myConnection)





myConnection.Open()





DetailsGrid.DataSource = myCommand.ExecuteReader(CommandBehavior.CloseConnection)





End If





DetailsGrid.DataBind()





End Sub





</script>








And this is the compilation error :





Cannot generate SSPI context.


Description: An unhandled exception occurred during the execution of the current web request. Please review the stack trace for more information about the error and where it originated in the code.





Exception Details: System.Data.SqlClient.SqlException: Cannot generate SSPI context.





Source Error:








Line 49:


Line 50: Dim ds As New DataSet()


Line 51: myCommand.Fill(ds)


Line 52:


Line 53: MasterGrid.DataSource = ds








Source File: C:WorksWebWISHDefault.aspx Line: 51





Stack Trace:








[SqlException: Cannot generate SSPI context.]


System.Data.SqlClient.ConnectionPool.GetConnection(Boolean& isInTransaction) +472


System.Data.SqlClient.SqlConnectionPoolManager.GetPooledConnection(SqlConnectionString options, Boolean& isInTransaction) +311


System.Data.SqlClient.SqlConnection.Open() +383


System.Data.Common.DbDataAdapter.QuietOpen(IDbConnection connection, ConnectionState& originalState) +44


System.Data.Common.DbDataAdapter.FillFromCommand(Object data, Int32 startRecord, Int32 maxRecords, String srcTable, IDbCommand command, CommandBehavior behavior) +304


System.Data.Common.DbDataAdapter.Fill(DataSet dataSet, Int32 startRecord, Int32 maxRecords, String srcTable, IDbCommand command, CommandBehavior behavior) +77


System.Data.Common.DbDataAdapter.Fill(DataSet dataSet) +38


ASP.Default_aspx.BindMasterGrid() in C:WorksWebWISHDefault.aspx:51


ASP.Default_aspx.Page_Load(Object Sender, EventArgs E) in C:WorksWebWISHDefault.aspx:14


System.Web.UI.Control.OnLoad(EventArgs e) +55


System.Web.UI.Control.LoadRecursive() +27


System.Web.UI.Page.ProcessRequestMain() +731