Dim connectionString As String = "server='abc'; user id='***'; password='***'; Database='***'" Dim sqlConnection As SqlClient.SqlConnection = New SqlClient.SqlConnection(connectionString) sqlConnection.Open() Dim queryString As String = "SELECT Time_stamp, BB_ID, Status, " & _ "(CASE WHEN Status = 'R' THEN 0 WHEN status = 'O' THEN 1 ELSE 2 END) AS newstatus"& _ "FROM(dbo.rawdata)" & _ "WHERE (BB_ID = '3100') AND (Time_stamp >= '6/24/2013 8:38:00 AM') AND (Time_stamp <= '6/24/2013 8:38:23 AM')" Chart1.Series("line_area").Points.AddXY("3100", "10") Chart1.Series("line_area").Points.AddXY("3100", "8") Chart1.Series("line_area").ChartType = System.Web.UI.DataVisualization.Charting.SeriesChartType.Line sqlConnection.Close()
var
This content, along with any associated source code and files, is licensed under The Code Project Open License (CPOL)