xlsx vb6の読書に威力を発揮

Question

私は1週間で問題があり、解決策を見つけることができませんでした。私はasp classicのコンポーネントとしてvb6でxlsxのファイルを読み込もうとしています。私は解決することができませんでした

まず問題は、これは私がこの接続に入ったエラーが

"[Microsoft][ODBC Driver Manager] Data source name not found and no default driver specified"

Dim cn As New ADODB.Connection 
Dim provider As String 
provider = "Driver={Microsoft Excel Driver (*.xlsx)};DBQ=" & nomArq & ";" 
Set cn = CreateObject("ADODB.Connection") 
cn.Open provider 

た

た2回目の試行では、このようにした

Dim cn As New ADODB.Connection 
'Dim provider As String 
With cn 
    .provider = "Microsoft.ACE.OLEDB.12.0;Data Source=" & nomArq & ";" & ";Extended Properties=\""Excel 8.0;HDR=Yes\;""" 
    .Open 
End With 

エラーは、

"Format of the initialization string does not conform to the OLE DB specification."

は、私はまた、別の方法で試してみました、私はエラーました：

"could not find installable isam"

を私は、コードはもう聞く必要はありません。

誰かが私を助けることができる、私は本当にあなたがやろうとしているものを理解していないが、あなたは（あなたのコードを見て）接続を確立しようとしているようにそれはそうグーグル

Answer 1

上のすべてのほとんどのすべてに見えました.....あなたがやっていることで、このような何かを試してみてください....

Dim g_cnDB as ADODB.Connection 
Set g_cnDB as ADODB.Connection 
g_cnDB.ConnectionString = "Provider=TEXT;User ID=TEXT; Pwd=TEXT; Initial Catalog=TEXT; Data Source=TEXT" 
'Then set it's timeout to be unlimited, so your connection remains open until you close it 
g_cnDB.CommandTimeout = 0 
'Establishing the connection 
g_cnDB.Open