[VBA][SQL] 如何寫入資料時簡體不會被轉換為繁體?

摘要:[VBA][SQL] 如何寫入資料時簡體不會被轉換為繁體?

先變更 session 的 NLS_LANG 

Dim MyShell: Set MyShell = CreateObject("WScript.Shell")
Dim MyEn: Set MyEn = MyShell.Environment("PROCESS")
MyEn.Item("NLS_LANG") = "SIMPLIFIED CHINESE_CHINA.ZHS16GBK

後面再開始宣告資料庫物件連線與執行指令( Database connection and exec command)