[geneane]

I need to create a link or button on the view pagevthat when clicked, will move the information from the current table to another table and open an add recird page with the info already in the fields from the original table.

i.e. insert into table2 (select * from table 1)
(I found this sql statement at http://forums.aspfree.com/archive/5/2003/9/3/18578

except Table 2 has more fields than Table 1 so I do not think I can just copy * to the new table.


Table 1
========
QID
Question
Notes
DateStamp


Table 2
========
QID
TopicID
Question
Notes
Hits
Status
DateStamp
ModifiedDate

The field 'question' and 'Notes' are the only fields that need to be moved. 'QID' and 'DateStamp' are automatically filled.

Is this possible? Could someone please help?
Thanks a million!

[Shane]

Originally Posted by geneane

I need to create a link or button on the view pagevthat when clicked, will move the information from the current table to another table and open an add recird page with the info already in the fields from the original table.

i.e. insert into table2 (select * from table 1)
(I found this sql statement at http://forums.aspfree.com/archive/5/2003/9/3/18578

except Table 2 has more fields than Table 1 so I do not think I can just copy * to the new table.


Table 1
========
QID
Question
Notes
DateStamp


Table 2
========
QID
TopicID
Question
Notes
Hits
Status
DateStamp
ModifiedDate

The field 'question' and 'Notes' are the only fields that need to be moved. 'QID' and 'DateStamp' are automatically filled.

Is this possible? Could someone please help?
Thanks a million!

Create a select all on the first table and create a loop that loops through each record. During the loop, just generate an insert statement on the fly and execute it.

For example:

Code:

Set RS = conn.Execute("select * from tblName")

While NOT RS.EOF

strName = RS("name")
strEmail = RS("email")

sql = "insert into tblNew(name,email) values('" & strName & "','" & strEmail & "')"

conn.Execute(sql)
RS.MoveNext
Wend

RS.Close
conn.Close

Set RS = Nothing
Set conn = Nothing

Something like that..

[geneane]

Thanks a million....got it working.