vb.net - 连接未在 VB.NET 中打开

Question

我需要你的帮助。我最近在我的模块上遇到“连接未打开”错误，有趣的是我没有编辑代码，它只是突然出现。关于我应该做什么的任何想法？

我正在使用 Oracle 数据库 10g。

这是代码：

Public con As New OleDb.OleDbConnection
Public dbProvider As String
Public dbSource As String

Public Sub connect()
    dbProvider = "PROVIDER = MSDAORA.1;"
    dbSource = "Data Source=localhost ; User Id=user ; Password=pass;"
    con.ConnectionString = dbProvider & dbSource
    con.Open() '<------------ERROR

End Sub