如何確定VB6中連接的數據庫類型？

Question

我正在編寫一個可以連接到多種數據庫（例如：SQL Server，Oracle，MySQL等）的應用程序。 這是一個面向國際的應用程序，因此，我理想地希望能夠做到這一點，並且在可能的情況下不必依賴字符串文字。 目前，我正在檢查驅動程序名稱並使用case語句。 有一個更好的方法嗎？

提前致謝！

Answer 1

一種方法是檢查連接對象的“數據源名稱”和“ DBMS”屬性

例

'lets say you have a connection object like below
Cn1.ConnectionString =  "Driver={MySQL ODBC 5.1 Driver};Server=localhost;Database=dbname;User=root;Password=;Option=3"
Cn1.open
'Once the connection is opened, get the properties you are interested in
If Cn1.Properties(9) = "MS Jet" Then 'if you are connected to Access
  strDBType = "Jet"
ElseIf Cn1.Properties(11) = "MySQL" Then 'if you are connected to MySQL or MSSQL
  strDBType = "MySQL"
End If

高溫超導

Answer 2

如果我可能會建議另一種對我來說很有效的方法，那時候我與VB6一起工作。

創建一個定義您的方法，屬性等的Interface類。也許其中一個屬性應該是DatabaseType。 然后為您將要使用的每種類型的數據庫創建一個實現上述接口的類。

實例化適當的類之后，您始終可以查詢其DatabaseType屬性，以查找要使用的數據庫。