با سلام
می خواستم اطلاعات جدول اول به جدول دوم انتقال یابد البته با این تفاوت که بر اساس تعداد جلوی هر فیلد در جدول دوم تکرار شود
با سلام
می خواستم اطلاعات جدول اول به جدول دوم انتقال یابد البته با این تفاوت که بر اساس تعداد جلوی هر فیلد در جدول دوم تکرار شود
سلام
خب یک کوئری اپند رو درون یک حلقه اجرا کنید
میشه بگید چطوری چون هر رکوردی با تعداد متفاوتی باید تکرار بشه
z = Me.Text11
For j = 1 To z
x = Me.CountRoll
For i = 1 To x
Me.counting = i
DoCmd.RunSQL "INSERT INTO TblFoilLabel2 (ID, Size,Weight,CodeFoil,CountRoll,TypeFoil,DateEnter, counting) SELECT '" & ID &_
"','" & size & "','" & Weight & "','" & CodeFoil & "','" & CountRoll & "','" & TypeFoil & "','" & DateEnter & "','" & counting & "'"
Next i
DoCmd.GoToRecord acDataForm, "Frm2", acNext
Next j