وااای!این پیغام خطای کوفتی دیگه چیه؟؟؟؟

سلام
من این کد رو نوشتم :

کد:

---


      Dim Conn2 As OleDbConnection
        Dim conns As String = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=DB\index.mdb;Persist Security Info=False"
        Conn2 = New OleDbConnection(conns)

        Dim selected As Integer
        selected = dgv1.SelectedRows(0).Cells(0).Value
        Me.TabControl1.SelectedTab = Me.TabPage1
        Dim COMM As New OleDbCommand
        COMM.Connection = Conn2
        COMM.CommandText = String.Format("select * From EP when EPnum = {0}", selected)
        Dim DR As OleDbDataReader

        Conn2.Open()
        DR = COMM.ExecuteReader

        Conn2.Close()

---

همون جایی که DR = COMM.ExecuteReader شد این ارور میاد :

کد:

---


IErrorInfo.GetDescription failed with E_FAIL(0x80004005).).

---

چه خاکی بریزم توی سرم؟؟؟

سلام

من چندان با OleDb کار نکردم ولی با Sql که کار کردم در زبانش کلمه ی کلیدی When وجود نداره !!!

شما از Where بجای When استفاده کنید اگر مشکل حل نشد بگید تا یه بررسی انجام بدم و ...

موفق باشید.