|
-
Nov 12th, 1999, 05:29 AM
#1
here is my code:
Private Sub Form_Load()
Dim ws As Workspace
Dim db As Database
Dim strSQL As String
Set ws = DBEngine.Workspaces(0)
Set db = ws.OpenDatabase("c:\OldDB.mdb")
strSQL = "SELECT * INTO [NewTable] IN d:\vb5\NewDB.mdb " _
& "FROM [OldTable]"
db.Execute strSQL
ws.Close
db.Close
Set ws = Nothing
Set db = Nothing
End Sub
i am trying to copy the table data and structure from OldDB.mdb into a new table NewTable.
the error #3067 occurs at the SQL code.
"query input must contain at least one table or query"
what is happening here...?
any help greatly appreciated.
Posting Permissions
- You may not post new threads
- You may not post replies
- You may not post attachments
- You may not edit your posts
-
Forum Rules
|
Click Here to Expand Forum to Full Width
|