请问怎么样通过SQL 语言得到某个EXcel文件的所有sheet的名字?

Question

因为以前调用excel老存在不能完全释放的问题,所以想用sql来查.

Answer 1

excel怎么用sql查呢？
dim i as integer
dim mySheet as Excel.WorkSheet
for i=0 to workbooks.worksheets.count
     set mySheet = workbooks.worksheets(i)
     操作 mySheet.Name
next i

Answer 2

这种方法我也会，感觉有点问题，有时候释放不掉，
我觉得应该可以用SQL查吧，既然可以查数据就可以查sheet 名呀。

Answer 3

Option ExplicitPrivate Sub Command1_Click()
Dim mFileCon As ADODB.Connection
Dim rst As RecordsetSet mFileCon = New ADODB.Connection
mFileCon.Open Text1.TextSet rst = mFileCon.OpenSchema(adSchemaTables)List1.ClearDo While Not rst.EOF
    List1.AddItem rst!TABLE_NAME
    rst.MoveNext
    
Looprst.Close
Set rst = Nothing
mFileCon.Close
Set mFileCon = NothingEnd Sub
'其中加入了一个TEXTBOX和一个LISTBOX
'TextBox中的Text为连接Excel的连接字符串。