回答編集履歴
2
jsonのコード箇所修正
test
CHANGED
|
@@ -62,37 +62,49 @@
|
|
|
62
62
|
|
|
63
63
|
var rs = database.Execute(sql);
|
|
64
64
|
|
|
65
|
-
cons
|
|
65
|
+
var recCount = rs.RecordCount
|
|
66
66
|
|
|
67
|
-
console.log("S
|
|
67
|
+
// console.log("SQL:" + sql);
|
|
68
68
|
|
|
69
|
-
console.log("
|
|
69
|
+
// console.log("STATE:" + rs.State);
|
|
70
70
|
|
|
71
|
-
|
|
71
|
+
// console.log("Count:" + rs.RecordCount);
|
|
72
72
|
|
|
73
73
|
var rJson = '[' + '\n';
|
|
74
74
|
|
|
75
|
+
var j = 0;
|
|
76
|
+
|
|
75
77
|
for( ; !rs.EOF ; rs.MoveNext()) {
|
|
76
78
|
|
|
77
|
-
|
|
79
|
+
rJson = rJson + '\t' + '{ ' + '\n';
|
|
78
80
|
|
|
79
|
-
|
|
81
|
+
for (var i = 0; i < rs.Fields.Count; i++){
|
|
80
82
|
|
|
81
|
-
|
|
83
|
+
rJson = rJson + '\t\t' + '"' + rs.fields(i).Name + '":';
|
|
82
84
|
|
|
83
|
-
|
|
85
|
+
if (i == rs.Fields.Count -1){
|
|
84
86
|
|
|
85
|
-
|
|
87
|
+
rJson = rJson + '"' + rs.fields(i).Value + '"' +'\n';
|
|
86
88
|
|
|
87
|
-
|
|
89
|
+
}else{
|
|
88
90
|
|
|
89
|
-
|
|
91
|
+
rJson = rJson + '"' + rs.fields(i).Value + '",'+ '\n';
|
|
90
92
|
|
|
91
|
-
|
|
93
|
+
}
|
|
92
94
|
|
|
93
|
-
|
|
95
|
+
}
|
|
94
96
|
|
|
97
|
+
if(j == recCount - 1 ){
|
|
98
|
+
|
|
95
|
-
rJson = rJson + '\t' + '}
|
|
99
|
+
rJson = rJson + '\t' + '}' + '\n';
|
|
100
|
+
|
|
101
|
+
}else{
|
|
102
|
+
|
|
103
|
+
rJson = rJson + '\t' + '}' + ',' + '\n';
|
|
104
|
+
|
|
105
|
+
}
|
|
106
|
+
|
|
107
|
+
j= j + 1;
|
|
96
108
|
|
|
97
109
|
}
|
|
98
110
|
|
|
@@ -102,6 +114,8 @@
|
|
|
102
114
|
|
|
103
115
|
if(rs != null){
|
|
104
116
|
|
|
117
|
+
//レコードセットをクローズします
|
|
118
|
+
|
|
105
119
|
try {rs.Close();} catch(e2) {}
|
|
106
120
|
|
|
107
121
|
rs = null;
|
|
@@ -109,6 +123,8 @@
|
|
|
109
123
|
}
|
|
110
124
|
|
|
111
125
|
if(database != null){
|
|
126
|
+
|
|
127
|
+
//ADOをクローズします
|
|
112
128
|
|
|
113
129
|
database.Close();
|
|
114
130
|
|
|
@@ -120,7 +136,7 @@
|
|
|
120
136
|
|
|
121
137
|
}
|
|
122
138
|
|
|
123
|
-
|
|
139
|
+
alert(rJson);
|
|
124
140
|
|
|
125
141
|
return rJson;
|
|
126
142
|
|
1
文面補足
test
CHANGED
|
@@ -1,6 +1,8 @@
|
|
|
1
|
-
結局SQLiteで接続しました。
|
|
1
|
+
結局SQLiteで接続しました。何とかACCESSで接続を
|
|
2
2
|
|
|
3
|
+
したかったのですが、にっちもさっちもいかずSQLiteで
|
|
4
|
+
|
|
3
|
-
解決
|
|
5
|
+
32bit版ODBCドライバをインストールして一発で解決しました。
|
|
4
6
|
|
|
5
7
|
|
|
6
8
|
|