I have constructed a query and want the data to load in specific locations in the page when the page loads. I keep getting BC30311: Value of type 'String' cannot be converted to 'System.Web.UI. WebControls.Tex tBox'. when I run the page.
Here is the code I have so far:
Dim strSQL
Dim strShift
Dim strSelDate
strShift = lblShift.Text
strSelDate = lblSelDate.Text
strSQL = "SELECT * FROM Manpower_data INNER JOIN Shift ON Shift.Shift_ID = Manpower_data.S hift_ID WHERE Manpower_data.D ate = '" & strSelDate & "' AND Shift.Shift = '" & strShift & "'"
Dim objConn As New Data.SqlClient. SqlConnection(" Data Source=SomeServ er;Initial Catalog=SomeDB; User ID=SomeUser;pas sword=XXXXXXX;" )
Dim objCmd As New Data.SqlClient. SqlDataAdapter( strSQL, objConn)
Dim objDataSet As New Data.DataSet
objCmd.Fill(obj DataSet)
objConn.Open()
objConn.Close()
txtAbsent = objDataSet.Tabl es("Absent").To String
txtTO = objDataSet.Tabl es("TO").ToStri ng
txtHeadCount = objDataSet.Tabl es("HeadCount") .ToString
txtStdHeadCount = objDataSet.Tabl es("STDHeadCoun t").ToString
txtMPNotes = objDataSet.Tabl es("Notes").ToS tring
What am I missing?
Here is the code I have so far:
Dim strSQL
Dim strShift
Dim strSelDate
strShift = lblShift.Text
strSelDate = lblSelDate.Text
strSQL = "SELECT * FROM Manpower_data INNER JOIN Shift ON Shift.Shift_ID = Manpower_data.S hift_ID WHERE Manpower_data.D ate = '" & strSelDate & "' AND Shift.Shift = '" & strShift & "'"
Dim objConn As New Data.SqlClient. SqlConnection(" Data Source=SomeServ er;Initial Catalog=SomeDB; User ID=SomeUser;pas sword=XXXXXXX;" )
Dim objCmd As New Data.SqlClient. SqlDataAdapter( strSQL, objConn)
Dim objDataSet As New Data.DataSet
objCmd.Fill(obj DataSet)
objConn.Open()
objConn.Close()
txtAbsent = objDataSet.Tabl es("Absent").To String
txtTO = objDataSet.Tabl es("TO").ToStri ng
txtHeadCount = objDataSet.Tabl es("HeadCount") .ToString
txtStdHeadCount = objDataSet.Tabl es("STDHeadCoun t").ToString
txtMPNotes = objDataSet.Tabl es("Notes").ToS tring
What am I missing?
Comment