lcConnectionString ="provider=sqloledb.1;server=cqi-termserv;uid=ctore;pwd=catdogexpress;database=sqlversion" Dim lcSQL As String Dim oConn As OleDb.OleDbConnection Dim oCommand As New OleDb.OleDbCommand() Dim dvYTD As DataView Dim myReader As OleDb.OleDbDataReader oCommand.CommandText = "ytd_SurgeonCntMinutes" oCommand.CommandType = CommandType.StoredProcedure Dim cDocID As String cDocID = Session("UserID") ' Build the Parameter list Dim oParam1 As New OleDb.OleDbParameter("@t_Command",OleDb.OleDbType.Integer) oParam1.Value = 2002 oCommand.Parameters.Add(oParam1) Dim oParam2 As New OleDb.OleDbParameter("@t_Command",OleDb.OleDbType.Integer) oParam2.Value = Integer.Parse(cDocID) oCommand.Parameters.Add(oParam2) oConn = VFPToolkit.vfpData.SqlConnect(lcConnectionString) oCommand.Connection = oConn dvYTD = VFPToolkit.vfpData.SqlExecute(oConn, oCommand, "actview") DataGrid1.DataSource = dvYTD DataGrid1.DataBind() myReader = oCommand.ExecuteReader() Chart1.DataSourceSettings.DataSource = myReader VFPToolkit.vfpData.SqlDisConnect(oConn)I'm not trying to sell it, but it is hard to find things that actually work the first time. This was something that did.