У меня есть 2 совершенно одинаковые таблицы pLogData и pLogData1.
В них 4 столбца (LogDada, LogName, LogFirst, Remake)

Таблица pLogData постоянно автоматически заполняется.

Мне нужно создать запрос на перенос записей из pLogData в архивную pLogData1.

Подскажите как это сделать.

Я пробовал такой код, но он не работает.


<%@ Page Language="VB" Debug="true" %>
<%@ import Namespace="System.Data" %>
<%@ import Namespace="System.Data.OLEDB" %>

<script runat="server">

Sub SubmitBut1_Click(sender As Object, e As EventArgs)
Dim DBConn as OleDbConnection
Dim DBInsert As New OleDbCommand
DBConn = New OleDbConnection ("Provider=Microsoft.Jet.OLEDB.4.0; Ole DB Services=-4; Data Source=C:\web\Orion_!"& _
".mdb")

DBInsert.CommandText = "Insert Into pLogData1 (LogData, LogName, LogFirst, Remark) Values (Select LogData, LogName, LogFirst, Remark From pLogData)"
DBInsert.Connection = DBConn
DBInsert.Connection.Open
DBInsert.ExecuteNonQuery()
End Sub