Sử dụng ADODB.Command để chạy T-SQL và gán kết quả trả về vào Chuỗi hoặc mảng 1 chiều

[lehoctk]

Xin chào cả nhà GPE, em đang gặp vấn đề khi sử dụng ADODB.Command để chạy T-SQL và gán kết quả trả về vào Chuỗi hoặc mảng 1 chiều. Hiện tại em dùng .Execute.GetRows thì nó trả về mảng 2 chiều dạng arrTemp(0,i).
Cả nhà cho em hỏi VBA có sẵn phương thức nào hỗ trợ gán trực tiếp kết quả trả về vào mảng 1 chiều hoặc Join vào chuỗi mà không cần dùng vòng lặp không ạ.
Như cách của em đang áp dụng trong file thì phải dùng vòng lặp từ mảng arrTemp(0,i) rồi gán vào mảng 1 chiều mới hoặc chuỗi.
Em gửi file đính kèm.
Em cảm ơn cả nhà!

 

[VetMini]

Trong TSQL, muốn kết quả trả về chuỗi thì Select For XML

 

[lehoctk]

Trong TSQL, muốn kết quả trả về chuỗi thì Select For XML

Bác ơi, sau khi em sử dụng For XML thì kết quả trả về không đúng như yêu cầu nữa, mong bác hướng dẫn cụ thể hơn trong file trên giúp em được không ạ
(Ở đây em muốn lấy hết các tên CSDL trong máy chủ SQL và gán vào chuỗi với dấu phân biệt giữa các tên CSDL là dấu phẩy)