问Visual Studio 2010未连接到Oracle

EN

Protected Sub Button1_Click(sender As Object, e As System.EventArgs) Handles Button1.Click
    Dim oradb As String = "Data Source=CustomerDB;User ID=userid;Password=password"
    Dim conn As New Oracle.DataAccess.Client.OracleConnection(oradb)
    Response.Write(conn.Database.ToString())
    Response.Write(conn.State.ToString)
    conn.Open()
    Dim sql As String = "select name from customer where CustID=1"
    Dim cmd As New Oracle.DataAccess.Client.OracleCommand(sql, conn)
    Dim dr As Oracle.DataAccess.Client.OracleDataReader = cmd.ExecuteReader()
    dr.Read()
    Response.Write(dr.Item("name"))
    conn.Close()
    conn.Dispose()
End Sub