Excel Dokument per VBscript auslesen

Hallo,

ich versuche schon seid einiger Zeit ein entsprechendes Script zum auslesen einer Excel Datei zu generieren.

Folgendes Szenario:

Eine vorhandene Exceltabelle mit mehreren Arbeitsmappen, in einer davon steht in Spalte 1 Zelle 1 ein Username und in Spalte 2 Zelle 1 - unendlich die Berechtigungen des Users die durch ein Makro ausgelesen wurden. Nun meine Frage:

wie kann ich diese Werte per VBscript auslesen um diese dann weiterverarbeiten zu können.
Ich habe bisher folgenden gefunden, leider funktioniert dieser Ansatz bei mir nicht???


dim rs, strConn, strSQL

strConn = "DRIVER=Microsoft Excel-Treiber (*.xls);DBQ=" & _
Server.MapPath("Test.xls")

strSQL = "SELECT * FROM [Tabelle1$a1:b]"

set rs = Server.CreateObject("ADODB.Recordset")

rs.open strSQL, strConn, 3, 3

if rs.EOF then
Response.Write("Kein Datensatz gefunden")
else
Response.Write("Anzahl der Treffer:" & rs.Recordcount)
Do while not rs.EOF
Response.Write("<br>" & rs.Fields("Vorname").Value & " " & _
rs.Fields("Nachname").Value)
rs.MoveNext
Loop
end if
rs.close
set rs = nothing


Ich hoffe Ihr könnt mir helfen...
Danke dafür

PfadXLS = "C:\MeineExceldatei.xls"  

Set objXLS = WScript.CreateObject("Excel.Application")  
objXLS.Workbooks.open PfadXLS

MeineVariable = objXLS.Range("A1").Value  

WScript.Echo MeineVariable

objXLS.Quit
'etc.