Code to use "SELECT * INTO" with ADO

[ubub]

I have always used DAO for this task but I need to use ADO here.

I wat to select files from one table and insert them into an empty table. I understand the DAO Execute method syntax doesn't work but dont know he ADO method.

 

[bluebytez]

first u must set a reference to ADO library in vb6.
then :

dim sql as string
dim rs as recordset

SQL = "select * into newtable from oldtable"

Set rs = New Recordset
rs.Execute SQL, ConnectString, adOpenForwardOnly, adLockReadOnly, adCmdText