nicks60610
MIS
I keep seeing this error from this code, the query does work in the database and it does display data, but when I run this in ASP.net, I get the error...
Private Sub Page_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Dim connectString As String = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\Quality Metrics Database.mdb"
Dim conMetrics As OleDbConnection = New OleDbConnection(connectString)
conMetrics.Open()
Dim cmdSelect1 = New OleDbCommand("SELECT DISTINCT [All Plants Summary Data].Plant FROM [All Plants Summary Data] order by Plant", conMetrics)
Dim PlantDL As OleDbDataReader()
PlantDL = cmdSelect1.ExecuteReader()
If Not IsPostBack Then
Plant.DataSource = PlantDL
Plant.DataValueField = "PLANT"
Plant.DataTextField = "PLANT"
Plant.DataBind()
Plant.Items.Insert(0, New ListItem("Select Plant"))
conMetrics.Close()
End If
Dim strPlant
strPlant = Plant.SelectedItem.Value
End Sub
Private Sub Page_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Dim connectString As String = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\Quality Metrics Database.mdb"
Dim conMetrics As OleDbConnection = New OleDbConnection(connectString)
conMetrics.Open()
Dim cmdSelect1 = New OleDbCommand("SELECT DISTINCT [All Plants Summary Data].Plant FROM [All Plants Summary Data] order by Plant", conMetrics)
Dim PlantDL As OleDbDataReader()
PlantDL = cmdSelect1.ExecuteReader()
If Not IsPostBack Then
Plant.DataSource = PlantDL
Plant.DataValueField = "PLANT"
Plant.DataTextField = "PLANT"
Plant.DataBind()
Plant.Items.Insert(0, New ListItem("Select Plant"))
conMetrics.Close()
End If
Dim strPlant
strPlant = Plant.SelectedItem.Value
End Sub