<div>
Whoa! Thats was quick!<br />
<br />
I just realized that I posted the blasted Q twice!! Oh well off to Support!<br />
<br />
I will test this later and drop you a mail.
</div>


Whoa! Thats was quick!

I just realized that I posted the blasted Q twice!! Oh well off to Support!

I will test this later and drop you a mail.

<div>
Hey Cool! Thats worked okay. I got a bit confused there for a moment but it works just fine.<br />
<br />
What you doing sitting on the VB Question section?<br />
<br />
I will mail you later (I am at work right now!)
</div>


Hey Cool! Thats worked okay. I got a bit confused there for a moment but it works just fine.

What you doing sitting on the VB Question section?

I will mail you later (I am at work right now!)

<div>
idorey is correct though it is a slight waste of resources using a recordset object to do this. You can do the same thing using the execute method of the connection object:<br />
<br />
Using the code supplied above:<br />
<br />
Dim MyConn As ADODB.Connection<br />
Set MyConn = New ADODB.Connection<br />
MyConn.ConnectionString = &quot;PROVIDER=Microsoft.Jet.OL<wbr />EDB.4.0;Da<wbr />ta Source=&quot; + App.Path + &quot;\&lt;DB NAME&gt;&quot; <br />
+ &quot;;&quot;<br />
MyConn.Open<br />
MyConn.Execute &quot;SELECT &lt;TABLE NAME&gt;.*,* INTO &lt;NEW TABLENAME&gt; FROM &lt;TABLE NAME&gt;&quot;<br />
MyConn.Close<br />
Set MyConn = Nothing
</div>


idorey is correct though it is a slight waste of resources using a recordset object to do this. You can do the same thing using the execute method of the connection object:

Using the code supplied above:

Dim MyConn As ADODB.Connection
Set MyConn = New ADODB.Connection
MyConn.ConnectionString = "PROVIDER=Microsoft.Jet.OLEDB.4.0;Data Source=" + App.Path + "\<DB NAME>"
+ ";"
MyConn.Open
MyConn.Execute "SELECT <TABLE NAME>.*,* INTO <NEW TABLENAME> FROM <TABLE NAME>"
MyConn.Close
Set MyConn = Nothing

<div>
<div class="content wysiwyg-content">
Is there a way (I KNOW there must be!) to use an SQL statement from VB, to copy (Duplicate) a table and its data and data type settings?<br />
<br />
I have tried to duplicate the table in code but I am unable to set the properties of each field, so duplicating it like this would be best.<br />
<br />
Thanks
</div>
</div>


Is there a way (I KNOW there must be!) to use an SQL statement from VB, to copy (Duplicate) a table and its data and data type settings?

I have tried to duplicate the table in code but I am unable to set the properties of each field, so duplicating it like this would be best.

Thanks

In VB Use SQL to Copy a table

Visual Basic is Microsoft’s event-driven programming language and integrated development environment (IDE) for its Component Object Model (COM) programming model. It is relatively easy to learn and use because of its graphical development features and BASIC heritage. It has been replaced with VB.NET, and is very similar to VBA (Visual Basic for Applications), the programming language for the Microsoft Office product line.