Lesen Excel mit dem Treiber xlsx vb6

Question

Ich habe ein Problem während einer Woche, und ich konnte die Lösung nicht finden. Ich versuche eine Datei in xlsx auf vb6 als Komponente des asp classic zu lesen.

erste Frage, die ich nicht in der Lage sein konnte, war dies

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 

Der Fehler, den ich in diesem Zusammenhang

war war bekam zu lösen

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

Der zweite Versuch auf diese Weise

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 

Und der Fehler war

ich auch auf eine andere Art und Weise versucht, und ich habe den Fehler:

"could not find installable isam"

aber ich habe den Code nicht mehr hören.

jemand mir helfen könnte, schaute ich in allem fast alles auf Google

Answer 1

ich nicht wirklich verstehen, was Sie zu tun versuchen, aber es scheint, wie Sie eine Verbindung herzustellen versuchen (in Ihrem Code suchen) ..... so etwas wie dies versuchen, mit dem, was Sie tun ....

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