Keith Williamson
kwilliam at ashlandnet.com
Fri Aug 27 12:45:17 CDT 2004
3rd Attempt to post this...my posts to this list are not coming through.... Can someone please tell me why the code below adds data to BOTH the tblfax table AND the (tempfax_& currentuser) table?????? I'm at wits end here. All the fields being added to recordset "mytable2" are from unbound fields in the open form. The intent here is to copy an empty table "tblfax" (which has no data), and call it "tempfax_" & current user.....copy the forms data to this table...and use it for the data source for a report. For some reason...the data is being copied to both tables. I can't understand why. Any ideas??? Dim db As Database Dim stDocName As String Dim mytable2 As Recordset Dim sqlstring As String Dim recSource As String Set db = CurrentDb DoCmd.CopyObject , "tempfax_" & CurrentUser, acTable, "tblfax" Set mytable2 = db.OpenRecordset("tempfax_" & CurrentUser) With mytable2 .AddNew ![faxto] = [TempFaxTo] ![phonenum] = [tempphone] ![faxfrom] = [TempFrom] ![faxnum] = [TempFaxNum] ![Pages] = [TempPages] ![urgent] = [TempUrgent] ![review] = [TempForReview] ![comment] = [TempPleaseComment] ![reply] = [TempPleaseReply] ![message] = [TempMessage] .Update End With Thanks, Keith E. Williamson Ashland Equipment, Inc phone # (410) 273-1856 fax # (410) 273-1859