更改ADODB.Recordset或ADODB.Connection的語言

Question

當我從連接中使用記錄集檢索數據時，我無法控制日期語言。 這是我檢索數據的方式：

Set rsData = New ADODB.Recordset
Set rsData = conODBC.Execute(sql)

SQL語句具有以下行：

TO_CHAR(TO_DATE(TO_CHAR(DB_MONTH), 'MM'),'MON')||DB_YEAR AS DATE_STR

它將DB_MONTH和DB_YEAR轉換為DEC16之類的東西，並與SQL Developer完美配合。

但是，如果它是帶有VBA的記錄集字段，則日期將轉換為德語（我正在使用德語Excel），並且收到DEZ16。

當我將數據卸載到工作表中並繼續使用它時，這將成為一個問題，因為我無法控制數據字符串的返回方式。

Answer 1

在運行查詢之前，必須將數據語言設置為所需的值。 應該是這樣的：

Dim cmd As New ADODB.Command
cmd.CommandType = CommandType.Text
cmd.CommandText = "ALTER SESSION SET NLS_DATE_LANGUAGE = 'AMERICAN';"
cmd.Execute