Sign in to follow this  
Followers 0
qinylj

How can I transform this VBA code to Au3 code?

1 post in this topic

This is a fragment code write with VBA,How can I transform it to Au3 code,especially "TableRst!TABLE_NAME"。

DB.Open "Provider=Microsoft.Jet.OLEDB.4.0;Persist Security Info=False;  Data Source=" & FileName & ";Extended Properties='Excel 8.0;IMEX=1;HDR=no'"
    Set TableRst = DB.OpenSchema(adSchemaTables, Array(Empty, Empty, Empty, "Table"))
    TableRst.MoveFirst
    While Not TableRst.EOF
    Table = TableRst!TABLE_NAME

Share this post


Link to post
Share on other sites



Create an account or sign in to comment

You need to be a member in order to leave a comment

Create an account

Sign up for a new account in our community. It's easy!


Register a new account

Sign in

Already have an account? Sign in here.


Sign In Now
Sign in to follow this  
Followers 0