質問編集履歴
1
コードを追記
title
CHANGED
|
File without changes
|
body
CHANGED
|
@@ -1,4 +1,17 @@
|
|
|
1
1
|
VB6からAccess(バージョンの詳細不明、おそらく2000ぐらい)のmdbファイルをADO経由で読み込んでいます。Format関数を使用しているSQL文で令和が表示されずに平成表記となります。
|
|
2
2
|
パソコン側が対応していないかと思いExcelでセルに日付を入れて和暦表示にすると問題なく、令和が表示されます。
|
|
3
3
|
|
|
4
|
-
プログラムを変更することが難しいため、何らかの更新プログラムをインストール等の対応で解決したいのですが、可能でしょうか？
|
|
4
|
+
プログラムを変更することが難しいため、何らかの更新プログラムをインストール等の対応で解決したいのですが、可能でしょうか？
|
|
5
|
+
|
|
6
|
+
【追記】
|
|
7
|
+
令和が表示されているパソコンと平成が表示されるパソコンがあります。
|
|
8
|
+
|
|
9
|
+
```VB6
|
|
10
|
+
Dim conn As New ADODB.Connection
|
|
11
|
+
conn.Open "Provider = Microsoft.Jet.OLEDB.4.0;Data Source = " & TrnDataPath
|
|
12
|
+
Dim rs As New ADODB.Recordset
|
|
13
|
+
Dim sql As String
|
|
14
|
+
sql = "select format([hiduke],'ggge年m月')) as 年月日 from hoge"
|
|
15
|
+
rs.Open sql, conn, adOpenStatic, adLockReadOnly
|
|
16
|
+
|
|
17
|
+
```
|